如何向TCustomControl添加OnClick事件?

Lit*_*per 6 delphi delphi-7 event-handling mouseevent

如何创建OnClick事件?我需要TCustomControl的帮助.

And*_*and 17

OnClick事件已经定义TCustomControl.您所要做的就是让它可见.添加行

published
  property OnClick;
Run Code Online (Sandbox Code Playgroud)

在你的控制下,你就完成了!