Vega.MaskEdit — Eingabefeld mit fester Form

TMaskEdit — eine Maske sagt, was an welcher Stelle stehen darf: „00/00/0000“ nimmt an acht Stellen Ziffern und hält die Schrägstriche fest. Die Maskenzeichen sind dieselben wie in Delphi.

Quelldatei: Vega/MaskEdit.lyx

→ Alle Units · Alle Steuerelemente · Vega VCL

Klassen

Klasse	Basis	Zweck
TMaskEdit	TEdit	Eingabefeld, das nur maskengerechte Zeichen annimmt

Konstanten

Name	Typ	Wert	Bedeutung
`MC_LITERAL`	int64	`0`	Zellart: festes Zeichen, nicht bearbeitbar
`MC_LETTER`	int64	`1`	Zellart: Buchstabe
`MC_ALPHANUM`	int64	`2`	Zellart: Buchstabe oder Ziffer
`MC_ANY`	int64	`3`	Zellart: beliebiges Zeichen
`MC_DIGIT`	int64	`4`	Zellart: Ziffer
`MC_SIGNED`	int64	`5`	Zellart: Ziffer, `+` oder `-`
`MK_CASE_NONE`	int64	`0`	Schreibweise: wie getippt
`MK_CASE_UPPER`	int64	`1`	Schreibweise: Großbuchstaben
`MK_CASE_LOWER`	int64	`2`	Schreibweise: Kleinbuchstaben
`MK_DEFAULT_BLANK`	int64	`95`	Vorgabe-Füllzeichen `_` (Zeichencode 95)

Freie Funktionen

Signatur	Zweck
`NewMaskEdit(mask: pchar): TMaskEdit`	Erzeugt ein Feld mit dieser Maske

Zu beachten

Der Inhalt liegt nicht in TEdit.Text: eine Maskenstelle hält genau ein Zeichen, und ein Zeichen kann mehrere Bytes lang sein. Deshalb ein Feld aus Codepoints, eine Zelle je Stelle — der Text für TEdit wird daraus gebaut.
EditText() liefert den Text mit Literalen, TextWithoutMask(dst) ohne sie; SaveLiteralChars legt die Vorgabe fest.
Keine Ausnahme bei ungültiger Eingabe — Lyx kennt keine: Validate() liefert das Ergebnis, OnValidationError meldet es.
SetEditMask(„“) schaltet die Maske ab und ersetzt Lazarus’ DisableMask/EnableMask.

Abhängigkeiten

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

Wird importiert von: keiner anderen Vega-Unit

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