lyxvision.button

TButton — klickbare Schaltfläche mit Tastaturkürzel und Fokus-Handling. Erzeugt ein evCommand-Ereignis mit dem konfigurierten Command-Code wenn der Benutzer Enter drückt oder die Schaltfläche mit der Maus klickt. Tastaturkürzel werden durch Tilde-Markup im Label definiert (~O~K → Alt+O).

lyxvision · lyxvision.group · lyxvision.types


Verwendung

import lyxvision.button;

// Standard-Buttons
var btnOk:     TButton := TButtonNew(dlg, 10, 12, "  ~O~K  ", cmOK);
var btnCancel: TButton := TButtonNew(dlg, 24, 12, " ~A~bbruch ", cmCancel);

// Standard-Button (doppelter Rahmen, wird mit Enter bestätigt)
TButtonSetDefault(btnOk, true);

// Button deaktivieren
TButtonSetEnabled(btnOk, false);

// In Dialog einfügen
TGroupInsert(dlg, btnOk);
TGroupInsert(dlg, btnCancel);


Funktionen

Signatur Sichtbarkeit Beschreibung
TButtonNew(parent: TGroup, x: int64, y: int64, label: pchar, cmd: int64): TButton pub Erzeugt Button mit Label und Command; Tilde markiert Tastaturkürzel
TButtonSetDefault(b: TButton, def: bool): void pub Setzt Button als Standard (wird mit Enter ausgelöst)
TButtonSetEnabled(b: TButton, on: bool): void pub Aktiviert/Deaktiviert Button
TButtonSetLabel(b: TButton, label: pchar): void pub Ändert Button-Beschriftung
TButtonGetCommand(b: TButton): int64 pub Gibt zugewiesenes Command zurück

Letzte Aktualisierung: 2026-05-22