Registriert seit: 24. Okt 2004
Ort: Walldorf
197 Beiträge
Delphi 10.1 Berlin Starter
|
Re: Set Next Focus !?
2. Sep 2007, 19:58
Habe es nun mit der Folgenden Methode gelöst :
Delphi-Quellcode:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
If (Key = #13) Then
begin
Self.Perform(WM_NEXTDLGCTL, 0, 0);
Key := #0;
end;
end;
war wohl nicht schlecht der Hinweis. Danke
gruss Sascha
Sascha Nickel Man muss die Dinge nehmen wie sie kommen, man kann aber auch dafür sorgen das die dinge so kommen wie man sie nehmen möchte.
|