delphi中调用本身的单击事件

答案:2 悬赏:40 手机版

解决时间 2021-12-29 07:07

提问者网友：最美的风景
2021-12-29 02:19

在delphi 中我想单击图片实现另一个按钮单击的事件,但是我不想用到重复的代码,想调用按钮的单击事件,请问可以吗?怎么实现?谢谢

最佳答案

五星知识达人网友：有你哪都是故乡
2021-12-29 02:29

可以的
比如说你的按钮单击事件是
procedure Button1Click(Sender:TObject);

那么单击图后写以下代码就行
Button1Click(self);

全部回答

1楼网友：蕴藏春秋
2021-12-29 03:51

这个问题很好回答。在tedit控件所在的单元中的type。。。private中间加上这样一段声明： procedure edit1click(sender:tobject); 然后在implementation下面写如下代码 procedure form1.edit1click(sender: tobject); begin edit1.selectall; end; 注意，form1是你当前窗体的name，edit1是你要加入事件的tedit控件的name 然后在窗体的设计视图中单击要加入事件的tedit控件，在左边的object inspector中点击event选项卡，在input一栏中找到onclick一项，右边有小三角，点一下，选择edit1click，这样，按f9编译运行，你的控件就有单击事件了。

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息