Vega.Dialogs — Meldungen, Rückfragen, Eingabe

ShowMessage, MessageDlg, ConfirmDlg, InputBox — die kleinen Dialoge. Es sind gewöhnliche TForm-Fenster mit ein paar Controls darin, kein Sonderweg. Besonders ist allein, dass sie über TApplication.ShowModal gezeigt werden: der Aufruf kehrt erst zurück, wenn ein Ergebnis feststeht.

Quelldatei: Vega/Dialogs.lyx

→ Alle Units · Alle Steuerelemente · Vega VCL

Aufzählungen

Enum	Werte	Zweck
`TMsgButtons`	`MB_OK` (0), `MB_OK_CANCEL` (1), `MB_YES_NO` (2), `MB_YES_NO_CANCEL` (3)	Welche Knöpfe der Dialog zeigt

Konstanten

Name	Typ	Wert	Bedeutung
`VEGA_DLG_PAD`	int64	`16`	Innenabstand im Dialog
`VEGA_DLG_BTN_W`	int64	`90`	Knopfbreite
`VEGA_DLG_BTN_H`	int64	`28`	Knopfhöhe
`VEGA_DLG_MIN_W`	int64	`260`	Mindestbreite eines Dialogs

Freie Funktionen

Signatur	Zweck
`ShowMessage(app: TApplication, text: pchar): void`	Meldung mit einem `OK`-Knopf
`ShowMessageTitled(app: TApplication, caption: pchar, text: pchar): void`	Wie `ShowMessage`, mit eigenem Fenstertitel
`MessageDlg(app: TApplication, text: pchar, buttons: int64): int64`	Meldung mit wählbaren Knöpfen; liefert `mrOk`, `mrCancel`, `mrYes`, `mrNo`
`MessageDlgTitled(app: TApplication, caption: pchar, text: pchar, buttons: int64): int64`	Wie `MessageDlg`, mit eigenem Fenstertitel
`ConfirmDlg(app: TApplication, text: pchar): bool`	Rückfrage mit Ja/Nein; `true` bei Ja
`InputBox(app: TApplication, caption: pchar, prompt: pchar, dflt: pchar, result: TTextBuffer): bool`	Fragt eine Zeile Text ab; `false` bei Abbruch, sonst steht das Ergebnis im Puffer

Zu beachten

Jeder dieser Aufrufe braucht die TApplication als erstes Argument — aus einem Handler über AppOfControl(sender).
Die Dialoge werden selbst gezeichnet und nicht beim Fenstersystem bestellt: derselbe Grund wie bei Vega.FileDlg — überall gleich aussehen.
InputBox schreibt in einen übergebenen TTextBuffer; der Aufrufer legt ihn an und gibt ihn frei.

Abhängigkeiten

Importiert: Vega.Types, Vega.Events, Vega.Canvas, Vega.Theme, Vega.Control, Vega.Font, Vega.Strings, Vega.Style, Vega.StdCtrls, Vega.Edits, Vega.Forms

Wird importiert von: Vega.ColorDlg, Vega.EditBtn, Vega.FileDlg, Vega.FontDlg

Letzte Aktualisierung: 2026-08-20 — Klassen, Aufzählungen, Konstanten und freie Funktionen maschinell aus Vega/Dialogs.lyx erhoben.