怎样获得焦点(50分)

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

wks666

Unregistered / Unconfirmed
GUEST, unregistred user!
在我输完edit1.text后,回车能自动把光标到edit2.text上.
 
form1.active=edit2;
语法好象是这样的,我现在没有 delphi环境,所以不能给你明确的答案。
 
if Edit2.TabOrder = Edit1.TabOrder + 1 then
SelectNext(Edit1, True, True);
or PostMessage(Handle, WM_KEYDOWN, VK_TAB, 0);
 
onKeyPress 事件:if key=char(13) then
edit2.setfocus();
 
liuge说的对。
 
answer wks66:
you can.
 
先把form的keypreview:=true
然后,在keypress事件中 if key=#13 then
perform(WM_NEXTDLGCTL,1,0)
 
>在keypress事件中 if key=#13 then
perform(WM_NEXTDLGCTL,1,0)
或者干脆edit2.setfocus;
 
多人接受答案了。
 
if key = #13 then
PerForm(Cm_Dialog1,wparam(Vk_Tab),0);
注意:设置Edit2的TabOrder值为Edit1的TabOrder的下一个数.
 
if key = #13 then
PerForm(Cm_DialogKey,wparam(Vk_Tab),0);
注意:设置Edit2的TabOrder值为Edit1的TabOrder的下一个数.
 
后退
顶部