有关memo 在线等待

Question

我想在程序中添加常用的工具按钮：复制，粘贴等，为了保持这些按钮（菜单）随时取得应有的状态：可用，不可用。需要。当在memo控件中选择文本时，是否触发事件，触发什么时间。拜托各位大虾。

Answer 1

用Action添加一个ActionList增加一个actCut, 把你Cut按钮的Action属性指向它，再写下面的代码
procedure TForm1.actCutUpdate(Sender: TObject);
begin
  TAction(Sender).Enabled := Memo1.SelLength > 0;
end;