一个困扰我的问题!!一个想法! 可以的呀,关键是你的这些功能是需要预先写好的,例如写在一个TActionList里,然后动态创建按钮,并将某个ACTION分配给这个按钮,即可实现你要的效果,如果你需要,可以写信给[email protected]并告之比较详细的要求,我写个例子给你。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 比如,动态生成了一个button:procedure TForm1.Button1Click(Sender: TObject);var t:tButton;begin t:=tbutton.Create(application); t.Parent:=form1; t.Left:=75;end; 现在我要让它们响应一些事件,如click事件,自己写一个事件, 如:Procedure MyClick(Sender: Tobject);beginend;然后在生成BUTTON的时候:t := TButton.create(application);t.OnClick := MyClick; 我的EMAL:[email protected]谢了,一会儿给分!! 同意venne(感觉一下)的思路参考:TComponent.FindComponent()TComponent.NameTButton.Action 关于delphi程序在后台运行的问题 如何向730卡(同串口),在指定的端口,位,写一个植(0或1) 访问网页简单,如何最节省资源呢,请各抒己见 wwDbEdit的高度大於21時,其PasswordChar屬性有問題,有否方法解決? 请教大家怎样编程实现两个不同局域网内的单机通信? 一个递归的问题 关于access随机抽题问题 各位高人过来看一看~~~~ 用OleContainer打开Word文档,如何在其失去焦点之后又重新获得(或重新激活) 一个关于表格数据输入的问题(急) delphi操作ORACLE的问题 关于多层结构中的负载平衡问题 100分大出血
procedure TForm1.Button1Click(Sender: TObject);
var
t:tButton;
begin
t:=tbutton.Create(application);
t.Parent:=form1;
t.Left:=75;
end;
现在我要让它们响应一些事件,如click事件,
自己写一个事件, 如:
Procedure MyClick(Sender: Tobject);
begin
end;然后在生成BUTTON的时候:
t := TButton.create(application);
t.OnClick := MyClick;
谢了,一会儿给分!!
TComponent.FindComponent()
TComponent.Name
TButton.Action