ghyghost大有长进阿 刮目相看 同意你的看法 onkeyup事件中 if key=vk_return postmessage(dbgrid.handle,wm_keydown,vk_tab,0)
DELPHI本身不能修改ENTER为TAB 但这样编译出来的程序是行的
procedure TFrm_Nzxx.DBGrid1KeyPress(Sender: TObject; var Key: Char); begin if key=#13 then begin Postmessage(DBGrid1.handle,WM_KeyDown,VK_Tab,0); end; end;
刮目相看
同意你的看法
onkeyup事件中
if key=vk_return
postmessage(dbgrid.handle,wm_keydown,vk_tab,0)
但这样编译出来的程序是行的
begin
if key=#13 then
begin
Postmessage(DBGrid1.handle,WM_KeyDown,VK_Tab,0);
end;
end;