Menjadikan Tab Sebagai Enter

Di delphi Bagi programmer Delphi tentunya tidak asing lagi akan istilah ini. Form aplikasi yang dibuat tentunya akan terdiri dari banyak komponen, dan untuk memindahkan kursor ke komponen berikutnya tentunya menggunakan tombol TAB. Nah, untuk menggantinya agar tombol ENTER yang dipakai maka berikut ada beberapa cara : 
Set keypreview pada form menjadi true  procedure TForm1.FormCreate(Sender: TObject);
begin   
     keyPreview := true;
end;
Cara 1 procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin  
   if Key = #13 then     
begin              
Key := #0;
    PostMessage(Handle, WM_NEXTDLGCTL, 0, 0);     
end;
end;
Cara 2 procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;   Shift: TShiftState);
var   KodeScan : Integer;
begin   if Key = VK_RETURN then 
begin     Key := 0; { hilangkan bunyi beep } 
   KodeScan := Lo(MapVirtualKey(VK_TAB,0)); 
   keybd_event(VK_TAB, KodeScan, 0,0);  
end;
end;