剖析Delphi中的构造和析构

领测软件测试网

//向窗口发CM_RELEASE消息到消息队列，当所有的窗口事件消息处理完之后，
//再调用CM_RELEASE消息处理过程CMRelease 
end;
再看看下面CM_RELEASE消息处理过程CMRelease的定义:
procedure CMRelease(var Message: TMessage); message CM_RELEASE;
procedure TCustomForm.CMRelease;
begin
Free; //最后还是free; 
end;
4 VCL构造&析构体系结构
 
TObject    
constructor Create;//静态方法
destructor Destroy; virtual;   

 

文章来源于领测软件测试网 https://www.ltesting.net/