Zitat von
mkinzler:
Dann gib mal was anderes wie ne Zahl ein.
Na, vielleicht hat er ja noch dieses in seinem Code:
Delphi-Quellcode:
procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9',#8]) then
key:=#0;
end;
Grüße
Klaus