Thema: Delphi On Key Press

Einzelnen Beitrag anzeigen

Benutzerbild von blondervolker
blondervolker

Registriert seit: 14. Sep 2010
Ort: Bei: Leeeiipzzhhh
381 Beiträge
 
Delphi XE2 Architect
 
#1

On Key Press

  Alt 17. Feb 2015, 20:29
Hab in meiner Form ein Pagecontrol1 und ein TabSheet2 und ein AdvSmoothTabPager3(von TMS)

In meiner Form :

TImmo.FormKeyPressOnKeyPress hab ich eingefügt:
Delphi-Quellcode:
procedure TImmo.FormKeyPress(Sender: TObject; var Key: Char);
begin
   if Key = #13 then begin
         Key := #0;
          PostMessage(Handle, WM_NextDlgCtl, 0, 0);
       end;
end;
Bei DBRichEdit1,kloppe ich auf die "Enter-Taste" und wollte nur eine Leerzeile bei DBRichEdit1 einfügen.

Wie kann man dies unterdrücken, dass bei Eingabe der Entertaste in ein anderes DBEdit weiterspringt?
www.bewerbungsmaker.de
  Mit Zitat antworten Zitat