====== lyxvision.dialog ====== ''TDialog'' — modaler Dialog-Container. Blockiert die übergeordnete Anwendung bis der Benutzer den Dialog mit einem Befehl (''cmOK'', ''cmCancel'' …) beendet. Gibt das auslösende Command als Ergebniswert zurück. → [[lyx_-_programmiersprache:units:lyxvision|lyxvision]] · [[lyx_-_programmiersprache:units:lyxvision:window|lyxvision.window]] · [[lyx_-_programmiersprache:units:lyxvision:button|lyxvision.button]] · [[lyx_-_programmiersprache:units:lyxvision:inputline|lyxvision.inputline]] ---- ===== Verwendung ===== import lyxvision.dialog; import lyxvision.button; import lyxvision.inputline; import lyxvision.statictext; fn ShowNameDialog(app: TApplication): pchar { var dlg: TDialog := TDialogNew(15, 6, 65, 16, "Name eingeben"); TGroupInsert(dlg, TStaticTextNew(dlg, 2, 3, "Ihr Name:")); var input: TInputLine := TInputLineNew(dlg, 12, 3, 30, 64); TGroupInsert(dlg, input); TGroupInsert(dlg, TButtonNew(dlg, 10, 7, " OK ", cmOK)); TGroupInsert(dlg, TButtonNew(dlg, 22, 7, "Abbruch", cmCancel)); var result: int64 := TApplicationExecView(app, dlg); if (result = cmOK) { return TInputLineGetText(input); } return ""; } ---- ===== Funktionen ===== ^ Signatur ^ Sichtbarkeit ^ Beschreibung ^ | ''TDialogNew(x1: int64, y1: int64, x2: int64, y2: int64, title: pchar): TDialog'' | pub | Erzeugt modalen Dialog | | ''TDialogGetResult(d: TDialog): int64'' | pub | Gibt letztes Ergebnis-Command zurück | | ''TDialogEndModal(d: TDialog, cmd: int64): void'' | pub | Beendet modalen Dialog mit Ergebnis-Command | | ''TDialogValid(d: TDialog, cmd: int64): bool'' | pub | Prüft ob Dialog mit cmd beendet werden darf (Validierung) | Letzte Aktualisierung: 2026-05-22