jetzt habe ich mit dieser Prozedur geprüft ob ein nichtausgefülltes Zeichen in der Maske ist:
Delphi-Quellcode:
procedure TfrmMain.laengepruefen(Sender: TObject);
var i : integer;
begin
if pos(' ',txtgeburtstag.Text) <> 0
then Showmessage('Alle _ ersetzen!');
end;
Aber wenn ich dieese Prozedur auf das Event OnChange lege dann zeigt er jedes mal die nachricht das noch nihct alle _ ersetzt sind. und ich müsste dann noch wissen wie ich die Fehlermeldung blocken kann.