Delphi 遍历控件 遍历组件
特别在动态创建控件时,有时经常需要遍历控件。 如果知道控件名称,则可以通过FindComponent – 查找(定位)组件,如果不知道的话,只能遍历控件了。 遍历一个Panel上的所有控件: Var i: integer; begin for i:=0 to Panel1.ControlCount do begin // 控件: Panel1.Controls[i] // 自己的业务逻Read More…
– Charlie.Wang's API site
特别在动态创建控件时,有时经常需要遍历控件。 如果知道控件名称,则可以通过FindComponent – 查找(定位)组件,如果不知道的话,只能遍历控件了。 遍历一个Panel上的所有控件: Var i: integer; begin for i:=0 to Panel1.ControlCount do begin // 控件: Panel1.Controls[i] // 自己的业务逻Read More…
开发软件的人经常也要接触到数据库,无论是做视图,还是做存储过程,都会接触到Select日期。 有时候根据不同的项目需求,选择出的日期有时候会有不同的格式要求,比如只取日期不取时间,比如计算日期间隔等。 我每次遇到这个问题,都要重新打开浏览器,重新搜索以便复制黏贴。
Read More…
周末在一次偶然的情况下,发现局域网中的Win7无法被PING通。 一开始以为是网络问题,遂检查网络,网络一切正常。 Win7可以访问外网,可以PING通主机,也可以PING通同网段的其他非Win7系统(一台XP),但是那台XP无法回PING通这台Win7。 接下来我通过services.msc关闭了Windows Firewall ServiceRead More…
Delphi中的StringReplace函数是SysUtils单元中自带的函数,该函数可以替换字符串中的指定字符。 function StringReplace (const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string; // rfReplaceAll:全部替换 // rfIgnoreCase:忽略大小写 // For Example: var aStr: String; begin aStr := 'This is a book, not a pen!'; Read More…
最近的项目中经常在程序中动态创建控件,势必用到Create。 但是随之而来的问题就是动态创建的控件是否可以正确的释放内存? 以及 Create(nil), Create(self), Create(Application)的区别又是什么呢? Create(nil);//需要自己释放 Create(Self);//当Self释放时自动触发释放 Create(ApplRead More…
随机数: RAND 返回从 0 到 1 之间的随机 float 值。 语法: RAND ( [ seed ] ) seed 提供种子值的整数表达式(tinyint、smallint 或 int)。如果未指定 seed,则 Microsoft SQL Server 数据库引擎 随机分配种子值。对于指定的种子值,返回的结果始终相同。 随机数是我们经常会用到的,几乎所有的语言Read More…
指定对表的所有列进行计算。如果有任一列是非可比数据类型,则 CHECKSUM 返回错误。 非可比数据类型有 text、ntext、image、XML 和 cursor,还包括以上述任一类型作为基类型的 sql_variant。 expression 除非可比数据类型之外的任何类型的表达式。 返回值是int CHECKSUM 对其参数列表计算一个Read More…
SQL Server的主键需要唯一性,以便数据的检索。 一般使用36位的GUID或者自增长的Integer类型数字。 GUID是一个32位数字字符+4个'-'符号的,总共36位字符串,而且它不会重复。 从存储的空间节约来看,数字型占用更少的位数,而GUID占用的更多。 但是从移植性和全局唯一性来Read More…
在同时使用多个SQL SERVER数据库的时候,经常需要两个数据库之间进行同步工作。 同步可以由SQL SERVER通过作业来自动完成,如下逻辑代码供参考: — INSERT INTO [172.29.11.212].FlexSFS.dbo.tbWorkOrder — select * from tbWorkOrder where DateCreated>@THEDATE AND CodeWorkorder NOT IN — (SELECT CodeWorkorder FROM [172.29.11.212Read More…
SQL SERVER中的替换函数 Read More…