来者有分:设计期怎样使两个Form共用一个事件?如Button 的 OnClick

hhf2688 2005-05-12 10:15:56
如题
大家出出主意啊,来都有分
...全文
110 点赞 收藏 7
写回复
7 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
hellolongbin 2005-05-13
相互引用后直接调用即可,跟在一个form里没什么区别
你甚至可以直接在events事件的下拉框里找到它
回复
go_all_out 2005-05-13
恩没错,我都是直接调用,就像上面的兄弟们一样

就像数据库编成时,几个form共用一个login一样
回复
hhf2688 2005-05-13
问题解决,用TActionList就OK了
谢谢各位,给分
回复
dreamonce 2005-05-12
何不继承
回复
pink1234 2005-05-12
form1中button1 form2中button2
unit1
procedure Tform1.Button1Click(SenderTobject);
begin
//
end;

unit2的

implementation
uses unit1;
procedure Tform2.Button2Click(SenderTobject);
begin
//
Form1.Button1.Click;//或者Form1.Button1Click(Self);
end;
回复
duanhai 2005-05-12
方法很多呀

你直接调用也可以呀

如在Form2中调用Form1的Button的Click事件
Form1.Button.OnClick(nil);//即可

不过在之前需要在Form2中引用Form1单元
回复
Erice 2005-05-12
用TACTIVE控件
回复
发帖
语言基础/算法/系统设计
创建于2007-08-02

1.6w+

社区成员

Delphi 语言基础/算法/系统设计
申请成为版主
帖子事件
创建了帖子
2005-05-12 10:15
社区公告
暂无公告