怎样改写事件?(不知道是否overload、override等等) 控件:form1、button1问题:我就不想用button1自带的事件button1click来处理,我就要用自己的button1click来处理!求救 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 button1.OnClick := YourProcedure ; procedure TForm1.FormShow(Sender: TObject);begin Button1.onClick:=myClick;end;procedure TForm1.myClick(Sender: TObject);begin showmessage('ok');end; 你自己寫一個繼承BUTTON的控件﹐在其中寫一個click事件﹐在這個事件后要加上override 不太明白你的意思,取得原事件的参数;--什么参数?你可以直接重载message处理事件通过message结构得到参数(代理服务器有问题,不能发长的留言,请原谅) --------------------------------------看!那支正飞向太阳的蛾子.....就是我!-------------------------------------- To bbs791109(小别):具体如何做:1。如何创建新的控件;2。如何在application中给出事例;thx!To firetoucher(风焱):如果我用的控件是Tsocket之类的空间,那么他的一些事件相对应的message有时什么呢?参数又如何取得呢? object1 的“点击”动作的原事件为 event1,现在我想 创建自己的事件处理程序event2,并且不继承原有的 event1。 说白了还是楼顶两位兄弟说的那样procedure TForm1.FormShow(Sender: TObject);begin Button1.onClick:=myClick;end;procedure TForm1.myClick(Sender: TObject);begin ……end;只要两个过程的格式一样(参数相同),就可以直接赋值的 delphi 读取xml问题 用delphi编编译器可行否? [50分]postmessage可以传送负数吗? access数据库压缩失败怎么解决阿? question3 这样行吗??? 关于erp中报废出库并且还要单位转换流程如何走更合适 关于Quickreport的问题? 电子商务问题的解决! 在Delphi中如何修改其他程序的图标 ◇◆◇◆◇求delphi下用winsock.pas做的网络实例!◇◆◇◆◇ 难题啊,大侠近来看一看啊!!是D6的Bug吧,破折号的显示问题
begin
Button1.onClick:=myClick;
end;procedure TForm1.myClick(Sender: TObject);
begin
showmessage('ok');
end;
取得原事件的参数;--什么参数?你可以直接重载message处理事件通过message结构得到参数
(代理服务器有问题,不能发长的留言,请原谅)
--------------------------------------
看!
那支正飞向太阳的蛾子.....
就是我!
--------------------------------------
具体如何做:
1。如何创建新的控件;
2。如何在application中给出事例;thx!To firetoucher(风焱):
如果我用的控件是Tsocket之类的空间,那么他的一些事件相对应的message有时什么呢?参数又如何取得呢?
procedure TForm1.FormShow(Sender: TObject);
begin
Button1.onClick:=myClick;
end;procedure TForm1.myClick(Sender: TObject);
begin
……
end;只要两个过程的格式一样(参数相同),就可以直接赋值的