2013年09月_hrdzkj

10月 09月 08月 07月 06月 05月 04月 03月 02月 01月

原创 delphi 变量初始化

Delphi默认初始化的变量是：全局变量，类成员；函数体内的变量不会初始化：全局变量：Delphi编译器自动对全局变量赋初值。当程序开始时，所有的整数赋为0，浮点数赋为0.0，指针为null，字符串为空。因此，在源代码中不必对全局变量赋其默认初值.函数体内的变量不会初始化：局部变量中的值不确定，随机的。包括随机指向一个地址，指针不为nil

2013-09-29 08:46:04 4078

原创 delphi 发送字符串

发送procedure TForm1.SendString(strMSG: string);var Data: tagCOPYDATASTRUCT; pBuf: PChar;begin GetMem(pBuf, Length(strMSG) + 1); try ZeroMemory(pBuf, Length(strMSG) + 1); Str

2013-09-26 09:21:44 969

原创资料选择方案，另外更好的方式

资料选择OptinEh中的dghClearSelection = False;

2013-09-24 14:22:14 417

原创 delphi 消息（自己理解）

第一点，各个类，在public区有响应各种各样消息的消息函数；第二点，各个消息函数，本类先该处理，能处理则处理，没有处理的用inhrited WndProc 交给父类来处理,逐级调用。另外系统发消息给程序的入口是：Application.OnMessage，如果Application.OnMessage：=AppMsg; --所有发到这个程序消息都被拦截了下来了

2013-09-23 22:26:39 551

原创透明 delphi

Transparent 控制是否透明

2013-09-08 19:51:14 1087

转载 delphi xe2下的datasnap心跳包设置

http://blog.csdn.net/beiguofengguang/article/details/7578056 delphi盒子sdhzth(通慧)：delphi xe2下的datasnap心跳包设置1、在servercontainer文件中，先增加一个private变量, FConnections:TDictionary;2、在servercontai

2013-09-06 14:42:52 3666