![](https://img-blog.csdnimg.cn/20201014180756757.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
delphi
文章平均质量分 71
guanguan241
这个作者很懒,什么都没留下…
展开
-
insideVCL书中提到的两个设计模式:dispatcher和broadcasting
下面是按照书中例子写的:首先是TDispatcher类,负责储存所有处理消息的方法unit untDispatcher;interfaceuses Messages;const MY_BASE = $BE00; MY_MSG1 = MY_BASE + 01; MY_MSG2 = MY_BASE + 02;type TMessageHandler =原创 2012-11-22 19:00:34 · 807 阅读 · 0 评论 -
Delphi 2007 的重构功能
Move移动1、将选定的静态函数从一个类移动到另一个类2、将选中的类或接口移动到其他单元Extract Interface抽取接口将选定的函数抽取到一个新的接口中Extract Superclass抽取基类将选定的函数、属性、字段从一个类里抽取到一个基类中Pull Member Up将成员向转载 2012-11-22 13:59:48 · 425 阅读 · 0 评论 -
关于动态数组指针操作的两个例子
最近突然感觉 Delphi 的动态数组非常好用, 善用它可以省略很多 GetMem、ReallocMem; 并且它是被自动维护的。动态数组变量 arr 本身就是指针, 不能再用 @arr 获取;但要获取某个元素位置的指针, 应该是 @arr[x]; 但随着数组的再分配, 这个地址是变化的。//动态数组地址测试 var i: Integer; arr: TBytes; p: PB转载 2012-11-22 13:49:41 · 479 阅读 · 0 评论 -
delphi接口问题——当类继承自TComponent和TObject
因为TComponent已经实现了接口IInterface,所以它的子类,继承接口之后不需要再重新实现引用计数之类的方法。而直接继承自TObject的类则没有,所以要实现接口,必须实现IInterface接口中的引用计数等方法,或者可以直接继承system单元中的TInterfacedObject(已经将这些方法实现)。 但是要注意,XX类如果直接继承自TInterfacedOb原创 2012-11-23 21:27:26 · 1505 阅读 · 0 评论 -
DELPHI高精度计时方法,取毫秒级时间精度
//取毫秒级时间精度(方法一):var t1,t2:int64; r1:int64; begin t1:=GetTickCount;//获取开始计数 WINDOWS API sleep(1000);{do...}//执行要计时的代码 t2:=GetTickCount;//获取结束计数值 r1:=t2-t1;//取得计时时间,单位毫秒(ms) showme转载 2012-12-20 18:18:05 · 2141 阅读 · 0 评论