Hallo!
Für den Fall, dass du die Eingabe bei "OnChange" überprüfst, versuche mal das:
Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
begin
Edit1.Text := trim(Edit1.Text);
// ...
end;
Trim Routine: Entfernt alle am Anfang und Ende eines Strings vorhandenen Leer- und Steuerzeichen.
Ansonsten könntest du in OnKeyDown die Eingabetaste #13 sperren, oder bei der überprüfung der Eingabe nur die ersten x-Stellen untersuchen.
Wenn Du noch mehr Tips brauchst, ruhig schreiben