with TButton.Create(Self) do
begin
Top :=y;
left :=x;
Parent := self;
Caption := fill_phrase[1];
phrase:=fill_phrase[1];
visible := true;
onclick:=showinfo;
//color:
end;
我想在按钮事件中传递变量fill_phrase[1]给showinfo可不可以啊?如果可以是不是直接在showinfo过程中加一个变量procedure showinfo(Sender:TObject;str:string);如果不可以,请问怎样实现每一个动态生成的按钮的点击事件跟不同的变量联系?
begin
Top :=y;
left :=x;
Parent := self;
Caption := fill_phrase[1];
phrase:=fill_phrase[1];
visible := true;
onclick:=showinfo;
//color:
end;
我想在按钮事件中传递变量fill_phrase[1]给showinfo可不可以啊?如果可以是不是直接在showinfo过程中加一个变量procedure showinfo(Sender:TObject;str:string);如果不可以,请问怎样实现每一个动态生成的按钮的点击事件跟不同的变量联系?
解决方案 »
- 祝端午节快乐!端午节散分!
- cxgrid 小数显示为百分比模式 pivotgrid 分类小记不同颜色显示
- 请教一个由句柄获取对象实例的问题
- 注册表问题:为什么不能创建子项?
- 十一了,大家去哪儿玩,别忘了要关爱一下自己和亲人(9.30结贴)
- 小妹今年大二,非常想结识各位开发软件的大哥哥!
- 用鼠标可以拖动打印的位子如何实现
- 征集免费电影、评书下载站点
- 动态按钮的删除问题!
- 用shellexcute调用帮助文件太低级,有没有人用htmlhelp这个API调用过chm的帮助文件?到底该如何调用?
- ComboBox的items 怎么往里面写内容呢,用程序,能够真正写进去呢? 在线等.....
- 怎样知道焦点在哪个cxGrid控件上
showinfo只能带一个Sender:TObject参数,;至于你的要求需要变通解决。比如。。你可以在
创建 BUTTON的时候,给他们的TAG 属性 设置成不同的值然后用 TButton(Sender).tag来区分是哪个按牛的事件发生了。