Sobald eine Anwendung „Speichern“ im Menü, in der Werkzeugleiste und auf einem Knopf anbietet, steht dieselbe Sache dreimal im Code — dreimal die Beschriftung, dreimal der Hinweis, dreimal das Sperren. TAction bündelt das an einer Stelle, TActionList hält die Befehle einer Anwendung und aktualisiert sie regelmäßig.
Quelldatei: Vega/Actions.lyx
→ Alle Units · Alle Steuerelemente · Vega VCL
| Klasse | Basis | Zweck |
|---|---|---|
TAction | — | Ein Befehl: Beschriftung, Hinweis, Kürzel, Zustand, OnExecute, OnUpdate |
TActionList | — | Sammlung der Befehle; ruft die OnUpdate-Handler in festem Abstand |
| Name | Ist | Zweck |
|---|---|---|
TActionEvent | fn(action: TAction): void | Handler eines Befehls |
| Name | Typ | Wert | Bedeutung |
|---|---|---|---|
VEGA_ACTION_UPDATE_MS | int64 | 150 | Abstand, in dem OnUpdate gerufen wird |
| Signatur | Zweck |
|---|---|
NewActionList(): TActionList | Erzeugt eine leere Befehlsliste |
NewAction(caption: pchar): TAction | Erzeugt einen Befehl mit dieser Beschriftung |
ActionOf(c: TControl): TAction | Der Befehl, der an diesem Control hängt |
ActionOfItem(m: TMenuItem): TAction | Der Befehl, der an diesem Menüeintrag hängt |
app.AddActionList(al) läuft kein OnUpdate und kein Tastenkürzel.LinkMenuItem und LinkControl; Beschriftung, Hinweis und Gesperrt-Zustand wandern von dort aus in jedes verbundene Element.OnUpdate ist der Ort für „darf man das gerade?“ — nicht der Handler des Knopfes.Importiert: Vega.Types, Vega.Events, Vega.Canvas, Vega.Theme, Vega.Control, Vega.Font, Vega.Strings, Vega.Lists, Vega.Style, Vega.StdCtrls, Vega.Menus
Wird importiert von: Vega.Forms
Letzte Aktualisierung: 2026-08-20 — Klassen, Aufzählungen, Konstanten und freie Funktionen maschinell aus Vega/Actions.lyx erhoben.