如何删除一个控件?(50分)

X

xy_c

Unregistered / Unconfirmed
GUEST, unregistred user!
我在程序中生成好几个控件。代码如下
for i:=1 to n do
myi:=Tpicture.create;
pictureloadfrom('c:/ddd.jpg");
然后在运行中,当我用鼠标点中其中任一个时,如何把它删除?
 
建立控件时给它关连一个单击事件,在事件中用Free释放Sender
 
你的程序好像有问题吧? myi 应该是 my
my := TPicture.Create;
my.OnClick := MyEvent;

其中MyEvent如下:
(Sender as TPicture).Free;
 
实在不明白,你可以请教delphi的帮助文档呀!!
或者调一下系统源程序!!
 
顶部