button按钮按下触发IMage控件按钮点击事件

2017-11-22 19:49:10来源:CSDN作者:bettyzhang1996人点击

分享

设置image控件的点击事件

procedure TForm1.img1Click(Sender: TObject);
begin
  Application.MessageBox('我被点击了啊','提示');
end;

设置button按钮的点击事件,并将点击传给image控件

procedure TForm1.btn1Click(Sender: TObject);

begin
  Self.img1Click(btn1);

end;

点击button按钮时就会弹出对话框‘我被点击了啦’

实现点击button按钮触发image的点击事件

最新文章

123

最新摄影

闪念基因

微信扫一扫

第七城市微信公众平台