Registriert seit: 4. Apr 2004
Ort: Templin
290 Beiträge
Delphi 6 Enterprise
|
Re: Taste/Buchstabe im TEdit ignorieren
7. Jul 2004, 18:57
Delphi-Quellcode:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#32 then key:=#0;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
button1.Click;
end;
|