Korreekte Verwendung TActionList.OnUpdate / TAction.OnUpdate

[BigAl]

Hallo zusammen,

ich hoffe ich bin mit dem Thema hier richtig. Die Actions betreffen ja im Wesentlich die Controls GUI (Controls).

Ich habe eine grundsätzlich Frage zu den Actions bzw. wie implementiert ihr üblicherweise das OnUpdate. Bisher habe ich die Verwaltung der Zustände der Aktionen immer in die zentrale TActionList.OnUpdate verfrachtet. Also:

Delphi-Quellcode:

procedure TfrmSomething.ActionListUpdate(Action: TBasicAction; var Handled: Boolean);
begin
  aAction1.Enabled := ...;
  aAction2.Enabled := ...;
  usw.

  Handled := True;
end;

Das müsste aber kontraproduktiv zu sein, da das OnUpdate wohl für jede Aktion einmal aufgerufen wird. Eine Alternative wäre:

Delphi-Quellcode:

procedure TfrmSomething.ActionListUpdate(Action: TBasicAction; var Handled: Boolean);
begin
  if Action = aAction1 then
    aAction1.Enabled := ...
  else if Action = aAction2 then
    aAction2.Enabled := ...
  usw.

  Handled := True;
end;

Das ist aber auch irgendwie umständlich bzw. macht den Code unübersichtlich. Die dritte Alternative wäre das TActionList.OnUpdate nicht zu verwenden und stattdessen die Zustandsverwaltung mit TAction.OnUpdate jeder Aktion selbst zu überlassen. Macht das ganze aber noch unübersichtlicher.

Ich mache das seit jeher wie ganz am Anfang gezeigt. Performance-Probleme hatte ich da noch nie, da die Boolschen Zustände die ich zum Aktivieren bzw. Deaktivieren der Aktionen verwende alle bereits vorliegen und nicht im OnUpdate erst ermittelt bzw. berechnet werden.

Um zum Anfang zurück zu kommen: Wie macht ihr das normalerweise? Ich suche da nach einer "Best Practice". Man will ja keine Rechenzeit / Energie verschwenden .

Alex