创建无法在表单上多次添加的简单组件

时间:2013-01-10 07:58:31

标签: delphi components custom-controls

如何编写一个从不允许它在表单上多次删除的简单组件? 比方说,我已经在表单上删除了我的TMyComponent,如果我将删除另一个TMyComponent,它会通知'组件已经存在!'并取消在表格上删除组件。

1 个答案:

答案 0 :(得分:10)

组件构造函数采用Owner参数:通常是您的表单(或DataModule)。只需浏览Owner.Components列表,看看是否还有其他人。如果有,请提出异常。

这将阻止在设计时和运行时添加组件。