DELPHI多个按钮的click事件问题

动态创建了N个按钮,click事件都是procedure clickme(sender:TObject),
那么clickme中要怎么分辨是哪个按钮执行的?
因为要根据每个按钮编号来执行结果。

比如 你在动态创建的时候 加上 btns[I].tag:=i;
Sender 就能 判断

if TButton(Sender).tag = 0 then
就说点击是你动态创建的按钮里面的第一个按钮
温馨提示:内容为网友见解,仅供参考
无其他回答

delphi自动点击按钮的问题
你好,这个问题所在我可能告诉你,因为点击是两个事件才有效,你只写了一个,就是按下,没有写弹起的,前两个是因为有第三个按下的,所以系统会调弹起的,最后一个没有再调用按下——弹起的没执行,所以不成功,需要改一下。下面是演示代码,不一定正确,你自己 查查。SendMessage(j, BM_CLICK_U...

delphi oncellclick 事件
其实比较符合程序规范的是把那个button1里面的方法独立出来 放到privte里面 然后在再两个按钮的onclick事件中分别调用

delphi按钮问题
begin myClick:=btn1.OnClick;\/\/原来的按钮事件保存起来 btn1.OnClick:=nil;\/\/按钮事件 没有了.btn1.OnClick:=myClick;\/\/恢复按钮事件.end;多看下pascal语法就知道了.

delphi中 在 程序中ButtonClick(nil) 作用
StopButtonClick(nil) 是调用的一个name为stop的控件的onclick事件。Sender是表示哪个控件触发的该事件,如果stop的onclick代码内容不跟任何控件相关,则可用nil。

delphi 的按钮的onclick事件中要以edit的内容是否发生改变做为条件...
Delphi全部代码如下:{ 根据Edit的内容,决定Button的动作 by 宋银海 QQ:25337012 } unit Unit3;interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;type TForm3 = class(TForm)Edit1: TEdit;Button1: TButton;procedure Button1Click(Sender...

DELPHI 给动态创建的控件指定onclick事件处理过程,如何传递自己的参数...
label的onClick事件 对应的只有Sender:Tobject 一个参数 你的 LabOnClick(Sender:Tobject,msgStr:String);怎么也是对不起来的。所以不行 要么 1 重写一个label 2 我惯用的偷懒办法 newLabel.OnClick:=LabOnClick(Sender);然后每个label的hint不一样 每次点击 就获取其中的hint procedure TForm1....

delphi 按钮问题
先设置好各数据控件连接信息 在form1的create事件中:Edit1.Text:=ADOQuery.FieldByName('字段').AsString;然后在Button的Click事件写 ADOQuery.MoveNext

Delphi中动态生成的button调用onclick如何传递参数
Delphi中的事件(Event)实际上是一个方法指针。象楼上写的 btn.OnClick := OnClick; 这样的语句实际上就是把新生成的Button的Onclick这个方法指针指向自己写的OnClick这个过程。第二个问题,有办法,就是Sender参数。它就是调用本过程的主体。如果你看一下TButton的源代码,会发现传入的参数就是本...

Delphi中如何覆盖一个复合控件中的多个Button子控件的click方法?
FButton1.OnClick = FButton1Click;FButton2.OnClick = FButton1Click;FButton3.OnClick = FButton1Click;

delphi中dbgrid的ondblclick和onTitleClick事件怎么用?以及用法?_百度...
1、ondblclick事件指的是在表格中(主要是数据行及空行)双击鼠标左键时候触发的事件。2、onTitleClick事件指的是双击表格控件的表头部分时候触发的事件。

相似回答