我在DbEdit中如何按回车键自动跳到下一个Dbedit中.(0分)

  • 主题发起人 主题发起人 Wangchieh
  • 开始时间 开始时间
W

Wangchieh

Unregistered / Unconfirmed
GUEST, unregistred user!
我在DbEdit中如何按回车键自动跳到下一个Dbedit中.
 
设置taborder,然后用回车代替tab键
 
是设置他的顺序吧.我设置了还是不行啊.实在是对不起.我是新手.打扰你了.
 
先设好ORDER顺序
if key=#13 then
keybd_event(0,0,0,9);
 
将属性KeyPreview设为True,然后设定
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key=VK_RETURN then
Perform(WM_NEXTDLGCTL,0,0);
end;
 
手工设置onkeypress事件
if key = VK_RETURN then
dbeditx.setfocus
 
后退
顶部