Delphi的学习笔记十二——方法2

最新推荐文章于 2024-04-26 06:00:00 发布

「已注销」

最新推荐文章于 2024-04-26 06:00:00 发布

阅读量294

点赞数

CC 4.0 BY-SA版权

分类专栏： Delphi

本文链接：https://blog.youkuaiyun.com/lygcalm/article/details/8491113

Delphi 专栏收录该内容

22 篇文章

订阅专栏

本文深入探讨了Delphi编程语言中的构造方法、析构方法和消息方法，解释了它们的功能和用法，并通过实例演示了如何在实际编程中应用这些概念，帮助开发者构建更加高效、安全的程序。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1.构造方法和析构方法
我们都知道，构造方法是对象建立时调用的方法；析构方法是在对象销毁时调用的方法。例如：


TMyClass = class(TObject)  
public  
  constructor Create;           {构造方法}  
  destructor Destroy; override; {析构方法}  
end;

必须使用constructor和destructor来定义，其实现如下：


constructor TMyClass.Create;  
begin  
  inherited;  
  //...  
end;  
  
destructor TMyClass.Destroy;  
begin  
  //...  
  inherited;  
end;

这里，create是用的最多的方法，而Destory则是用的最少的方法，因为系统已经为我们定义了Free方法来处理，这比单单用Destory会更安全。

2.消息方法
我们先来看一下消息方法的定义。


procedure KeyDown(var msg:TWMKeyDown);message WM_KEYDOWN;

消息方法与其他方法的不同在于，其后多了一个message指示字，后面是拦截的消息名称WM_KEYDOWN。
消息方法的实现


procedure TForm1.KeyDown(var msg: TWMKeyDown);  
begin  
  Self.Text := Char(msg.CharCode);  
end;

消息方法与事件方法如在同一个窗体中，消息方法会拦截事件方法。如需要事件方法和消息方法都能执行，则可以按如下操作：


{把消息的实现改为:}  
procedure TForm1.KeyDown(var msg: TWMKeyDown);  
begin  
  ShowMessage('消息: ' + Char(msg.CharCode));  
  inherited;  
end;  
{会先执行消息, 后调用方法}  
  
  
{把消息的实现改为:}  
procedure TForm1.KeyDown(var msg: TWMKeyDown);  
begin  
  inherited;  
  ShowMessage('消息: ' + Char(msg.CharCode));  
end;  
{会先调用方法, 后执行消息}

3.方法的调用约定

Delphi默认对参数的读取是从左到右，Window API是从右到左。