delphi7的tactionlist位于哪个选项卡
1个回答
展开全部
粗略点说到底就是一个封装了丛弊滑 一个TNotifyEvent类型方法(当然不止这一个,主要用的就是这个)和一些控制这个方法执行的属性的类,可以把一些控件的事件用TactionList集中起来管理,用卜此的时候,可以向控件的事件指定执行哪一个Taction,就比如,你可以向一个Button的单击事件指定一个Taction.OnExecute事件来执行同样的方法……
procedure TForm1.act1Execute(Sender: TObject);
begin
ShowMessage(Sender.ClassName);
end;
procedure TForm1.btn2Click(Sender: TObject);
begin
act1.OnExecute(Sender);//其实就是执行的上面的方法
btn3.OnClick:= act1.OnExecute;//动态的指定btn3的单击事件,当再次单击btn3时执行TAction
end;
还有TAction类因为是个类,而不是单纯的是个方法类型的变量,渗腊它还有其他很多属性,比如热键,enabled。。都可以控制方法的执行,比较方便~
procedure TForm1.act1Execute(Sender: TObject);
begin
ShowMessage(Sender.ClassName);
end;
procedure TForm1.btn2Click(Sender: TObject);
begin
act1.OnExecute(Sender);//其实就是执行的上面的方法
btn3.OnClick:= act1.OnExecute;//动态的指定btn3的单击事件,当再次单击btn3时执行TAction
end;
还有TAction类因为是个类,而不是单纯的是个方法类型的变量,渗腊它还有其他很多属性,比如热键,enabled。。都可以控制方法的执行,比较方便~
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询