摘要：
unit Unit1; interface usesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls; type //定义一个事件格式，要传参数的格式 后面... 阅读全文
摘要：
TerminateProcess(GetCurrentProcess,0); 阅读全文
摘要：
Delphi语言受众多程序员追捧，主要原因之一就是它有很多第三方的控件可供使用。很多资深的Delphi程序员都把自己积累的函数、过程等设计成控件，以方便使用，提高开发效率。 本文通过一个只允许输入数字、并且可以设置输入值范围和小数点位数的编辑框控件的设计，详细介绍了控件的实现方法。该控件继承自edi... 阅读全文
摘要：
表示关闭的方法有如下几种， Hide Close Free Release Destroy Terminate FreeAndNil() Halt Free：先对象判断不为空再destroy。释放对象，对于窗体来说，只会释放对象，而不将窗体对象的指针指向nil，所以free后用assigned函数来... 阅读全文
摘要：
1定义一个结构 PItemData Type //节点信息 PItemData=^_ItemData; _ItemData=packed record S:shortstring; i:integer; f:double; B:boolean; P:Pointer; Next:PItemData;... 阅读全文
摘要：
浅谈Object Pascal的指针 大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其灵活的指针运用上。因此，说指针是C语言的灵魂，一点都不为过。同时，这种说法也让很多人 产生误解，似乎只有C语言的指针才能算指针。Basic不支持指针，在此不论。其实，Pascal语言本身也是支持指针的。... 阅读全文
摘要：
新建一个类，存储我们需要的数据： TItemEx=class(TObject) public caption:string; StringValue:string;end; //使用adoquery中的值填充comboboxfunction FillInComBoBoxWithAdoQuery(... 阅读全文
摘要：
Type //节点信息 PItemData=^_ItemData; _ItemData=packed record S:shortstring; i:integer; f:double; B:boolean; P:Pointer; Next:PItemData;end; 初始化窗体proce... 阅读全文
摘要：
☆、在Delphi中调用 在百度上找到了一个超强的回答，呵呵，很搞笑： 就像上厕所： 门锁了，就等着，等到别人出来了，进去锁上，然后该干什么干什么，干完了，把门打开 门没锁，就进去，锁上，然后该干什么干什么，干完了，把门打开 -----------------------------------... 阅读全文
摘要：
new动态生成一个指针，初始化指针为空，用dispose释放 getmem申请一块内存，用freemem释放 allocmem从堆中申请内存，并且用#0进行初始化！用freemem释放 Fillchar是Turbo/Borland Pascal的System单元的一个标准过程，它的使用格式是：Fil... 阅读全文