Thema: Delphi Editbox funktion gesucht

Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.771 Beiträge
 
Delphi 10.4 Sydney
 
#10

Re: Editbox funktion gesucht

  Alt 18. Apr 2007, 16:50
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
Klaus
  Mit Zitat antworten Zitat