perpindahan kursor dari edit1 ke edit2 dengan menggunakn tobbol enter

apabila anda menginginkan perpindahan kursor dari edit1 ke edit2 dst dengan tombol enter (seperti tombol tab) coba yang satu ini, jangan lupa event keypress pada edit1,2,dll link juga ke eventkeypressnya form1 ini....

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then // tombol enter 
begin 
Key := #0;
PostMessage(Handle, WM_NEXTDLGCTL, 0, 0); 
end;
end;