Delphi-PRAXiS - Einzelnen Beitrag anzeigen

Hallo,

warum magst Du sowas nicht?

Delphi-Quellcode:

			procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

  if Key = #32 then

    Key := #0;

end;

Grüsse, Daniel

Daniel B (Gast) n/a Beiträge	#9 25. Jun 2003, 21:02 Hallo, warum magst Du sowas nicht? markieren Delphi-Quellcode: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if Key = #32 then Key := #0; end; Grüsse, Daniel
	Zitat