Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Bei Enter ins nächste EDIT-Feld

**bernd2000**

Hallo burn

Code:

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

begin

   if Key = #13 then Self.Perform(WM_NEXTDLGCTL, 0, 0);

end;

KeyPreview von Form1 auf true setzen nicht vergessen!!!

Gruß Bernd

bernd2000 Registriert seit: 12. Jan 2004 Ort: Linz-Steyr (A) 43 Beiträge Delphi 7 Professional	#2 Re: Bei Enter ins nächste EDIT-Feld 1. Jul 2004, 08:27 Hallo burn markieren Code: procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then Self.Perform(WM_NEXTDLGCTL, 0, 0); end; KeyPreview von Form1 auf true setzen nicht vergessen!!! Gruß Bernd
	Zitat