enter for dbgrid same as tab key

[as_re63]

چگونه می توانم بر روی ستونهای dbgrid کلید enter را برای جابجایی بین ستونها استفاده کنم به این شرط که در آخرین ستون با زدن کلید enter به سطر بعد انتقال پیدا کند

[N_D]

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

begin

 if (Key = #13)and(DBGrid1.EditorMode) then

 begin

  keybd_event( 9,0,KEYEVENTF_EXTENDEDKEY,0);

  keybd_event(13,0,KEYEVENTF_EXTENDEDKEY,0);

 end;

end;

آدرس EMAil من n_daneshi@yahoo.com
چون دیر یه دیر تو این سایت میام