TActionlist -> 2 Buttons -> Welcher wurde gedrückt ?

[Sharky]

Delphi-Quellcode:

procedure TDemo_Form.ac_blubbExecute(Sender: TObject); // Action : ac_blubb
begin
  ShowMessage((Sender as TAction).ActionComponent.Name); // Zeigt den Namen des Controls über den die Action gestartet wurde
end;