摘要:
本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids, ExtCtrls; type TForm1 = class(TForm) Tr... 阅读全文
posted @ 2008-03-12 19:49
万一
阅读(4973)
评论(8)
推荐(0)
摘要:
本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids, ExtCtrls; type TForm1 = class(TForm) Tr... 阅读全文
posted @ 2008-03-12 15:31
万一
阅读(6059)
评论(15)
推荐(0)
摘要:
本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids, ExtCtrls; type TForm1 = class(TForm) Tr... 阅读全文
posted @ 2008-03-12 13:17
万一
阅读(8945)
评论(7)
推荐(0)
摘要:
判断一个对象是否存在(赋值)的三种办法如下: if obj nil then ... if Boolean(obj) then ... if Assigned(obj) then ... 通过下面的测试, 结论是 obj nil 最慢; Boolean(obj) 与 Assigned(btn) 相当! 测试图: 测试源码: unit Unit1; interface u... 阅读全文
posted @ 2008-03-12 09:03
万一
阅读(8722)
评论(16)
推荐(0)
摘要:
本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, Grids; type TForm1 = class(TForm) TreeView1: T... 阅读全文
posted @ 2008-03-12 01:59
万一
阅读(5923)
评论(8)
推荐(0)
浙公网安备 33010602011771号