摘要：
【数据库】数据库基础一、SQL语句（1）Select 查询语句 语法：SELECT [ALL|DISTINCT] <目标列表达式> [AS 列名][,<目标列表达式> [AS 列名] ...] FROM <表名> [，<表名>…] [WHERE <条件表达式> [AND|OR <条件表达式>...] [GROUP BY 列名 [HAVING <条件表达式>]] [ORDER BY 列名 [ASC | DESC]] 解释：[ALL|DISTINCT] ALL：全部 DISTINCT：不包括重复行 <目标列表 阅读全文
摘要：
Windows界面设计标准1.1.Windows界面设计标准1.1.1.易用性l界面元素的名称、标签应该易懂，用词准确，避免使用模楞两可的字眼，要与同一界面上的其他元素易于区分，能望文知意最好。理想的情况是用户不用查阅帮助就能知道该界面的功能并进行相关的正确操作作。•disable而不是not visible。•完成相同或相近功能的按钮用GoupBox框起来，常用按钮要支持快捷方式。•完成同一功能或任务的元素放在集中位置，减少鼠标移动的距离。• 按功能将界面划分局域块，用GoupBox框括起来,并要有功能说明或标题。•界面要支持键盘自动浏览按钮功能，即按Tab键的自动切换功能。•界面上首先应. 阅读全文
摘要：
sql 同时实现行转列和列转行 select Name,序号,类型,[1月]=MAX(case when Month=1 then Value end),[2月]=MAX(case when Month=2 then Value end),[3月]=MAX(case when Month=3 then Value end)from (select Name,Month,'序号'=1,'类型'='吃饭',Meet as Value from aaaunion allselect Name,MONTH,'序号'=2,'类型&# 阅读全文
摘要：
Delphi控制输入为数字或字母Delphi 控制输入为数字或字母if not (Key in ['0'..'9', 'a'..'z', 'A'..'Z', #8, #13]) thenbegin Key := #0; ShowMessage('请输入数字或字母');end; 阅读全文
摘要：
Delphi中动态加载Image控件图片的方法作者：海豚王子procedure TForm1.Button1Click(Sender: TObject);var jpg: TJPEGImage; // 要use Jpeg单元begin // 显示jpg大图片的方式 jpg := TJPEGImage.Create; jpg.LoadFromFile(getcurrentdir() + '\pic.jpg'); Image1.Picture.Bitmap.Assign(jpg); // 因为 img 控件是基于bmp的 jpg.Free;end;procedure TForm1. 阅读全文
摘要：
TClientDataSet的使用技巧本文从以下几个方面阐述TClientDataSet的使用，希望对你有所帮助.1.动态索引procedure TForm1.DBGrid1TitleClick(Column: TColumn);beginif (not column.Field is Tblobfield) then//Tblobfield不能索引，二进制ClientDataSet1.IndexFieldNames:=column.Field.FieldName;end;2.多层结构中主从表的实现设主表ClientDataSet1.packetrecord为-1，所有记录设从表ClientD 阅读全文
摘要：
SQL触发器作者：海豚王子一、创建一个简单的触发器触发器是一种特殊的存储过程，类似于事件函数，SQL Server? 允许为 INSERT、UPDATE、DELETE 创建触发器，即当在表中插入、更新、删除记录时，触发一个或一系列 T-SQL语句。触发器可以在查询分析器里创建，也可以在表名上点右键->“所有任务”->“管理触发器”来创建，不过都是要写 T-SQL 语句的，只是在查询分析器里要先确定当前操作的数据库。创建触发器用CREATE TRIGGERCREATE TRIGGER 触发器名称ON 表名FOR INSERT、UPDATE 或 DELETEAST-SQL 语句注意：触 阅读全文
摘要：
Delphi编程防止界面卡死的方法作者：海豚王子1.循环里面防止界面卡死的方法可以使用Application.ProcessMessages； 例如下列方法： var n:Integer;begin for n := 0 to 10000 dobegin Edit1.Text := IntToStr(n); end; end; 在程序里执行的时候，界面肯定会卡死的，但如何防止界面出现卡的情况呢，加入Application.ProcessMessages即可，修改后的代码为： var n:Integer;begin for n := 0 to 10000 dobegin Application. 阅读全文