摘要：
//例1: begin raise Exception.Create('抛出异常'); end; //例2: begin raise Exception.CreateFmt('%s %d', ['错误代码:', 999]); end; //例3: var exc: Exception; begin exc := Exception.Create('发现异常'); ra... 阅读全文
posted @ 2008-03-27 23:26
万一
阅读(10200)
评论(2)
推荐(0)
摘要：
举例: var Source,Dest: string; begin Source := '123456789'; Dest := '---------'; Move(Source[5], Dest[3], 4); ShowMessage(Dest); {--5678---} end; System 单元下的公用函数目录 阅读全文
posted @ 2008-03-27 23:18
万一
阅读(7203)
评论(8)
推荐(0)
摘要：
本例是顺着 GetMem 的例子往下做的: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Send... 阅读全文
posted @ 2008-03-27 22:39
万一
阅读(4570)
评论(3)
推荐(0)
摘要：
如果只为单个指针分配内存, 和 New 和 Dispose 是一样的; 与之不同的是: GetMem 可以申请连续的多个内存块. 举例: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TFor... 阅读全文
posted @ 2008-03-27 18:09
万一
阅读(10052)
评论(11)
推荐(2)
摘要：
举例: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TB... 阅读全文
posted @ 2008-03-27 17:41
万一
阅读(4939)
评论(4)
推荐(0)
摘要：
在 Delphi 中, 几乎所有的类型都有对应的指针类型, 譬如:Char PCharWord PWORDDouble PDoubleTPoint PPoint甚至一种类型对应这着几种指针类型, 譬如:Integer PInteger PINTWideChar PWideChar PWChar即使它没有定义, 我也可以直接使用一个类型的指针, 譬如声明一个整数的指针变量:var px: ^In... 阅读全文
posted @ 2008-03-27 16:13
万一
阅读(5692)
评论(13)
推荐(1)
摘要：
我原来以为 TList 可能是一个链表, 其实只是一个数组而已. 你知道它包含着多大一个数组吗? MaxListSize 个! MaxListSize 是 Delphi 在 Classes 单元定义的一个常量: MaxListSize = Maxint div 16; 也就是 134217727; 这也是 TList 的最大容量. 其中的 Maxint(2147483647) 也就是 2个G, 这... 阅读全文
posted @ 2008-03-27 11:53
万一
阅读(7192)
评论(22)
推荐(0)
浙公网安备 33010602011771号