怎样给动态创建的控件加上响应事件!!! 先写一个click过程,注意参数类型与个数与TImage的onclick事件一样然后在你创建了image之后加入以下语句:image.onclick :=Clickevent;搞定. 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.ImaClick(Sender: TObject);begin ShowMessage('aa');end;MyImage.OnClick := ImaClick; procedure TForm1.yourClick(Sender: TObject);begin ShowMessage('ok');end;/////////////yourimage.onclick:=yourclick; 做自动更新程序时遇到点问题不明白了,请帮看一下是什么意思? 界面设计 在做打开文件的时候,如果判断出文件不存在,如何做使点确定后,打开文件对话框不关闭 数据库操作问题 如何将DEDE反编译的内容转为Delphi语句? 发布我的开发的网游--注册模块 ??关于消息?? 两个找不出错误的错误。请大虾们指点。 各位老大:听说宝兰有一个查看是否用宝兰工具编的程序,不只知叫甚么,宝兰网上哪里有,谢了!! 一个电脑白痴要用多久才能学会Delphi?是心话,请不要笑话!^v^~ run time package,Design time package? 高分求助! 先给100
begin
ShowMessage('aa');
end;MyImage.OnClick := ImaClick;
begin
ShowMessage('ok');
end;
/////////////
yourimage.onclick:=yourclick;