Edit-Feld im Exit-Ereignis prüfen

[Helmi]

Hallo,

du kannst natürlich auch ein MaskEdit verwenden (mit Trick was ich grad rausgefunden habe).

Nimm ein MaskEdit und mach im OnCreate der Form folgendes:

Delphi-Quellcode:

var
  S: String;

begin
  S := #32;                                  //Leerzeichen

  MaskEdit1.EditMask  := 'AAA00;1;' + S;     //A = Buchstaben-Eingabe erforderlich, 0=Zahl-Eingabe erforderlich
end;

So werden die Unterstriche ausgeblendet (da nicht mehr Unterstriche sondern Leerzeichen angezeigt werden)

[edit]
es geht auch so:

Delphi-Quellcode:

begin
  MaskEdit1.EditMask := 'AAA00;1;' + #32;    //A = Buchstaben-Eingabe erforderlich, 0=Zahl-Eingabe erforderlich + Leerzeichen

[/edit]