W wks666 Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-18 #1 在我输完edit1.text后,回车能自动把光标到edit2.text上.
邹 邹光先 Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-18 #2 form1.active=edit2; 语法好象是这样的,我现在没有 delphi环境,所以不能给你明确的答案。
X xWolf Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-18 #3 if Edit2.TabOrder = Edit1.TabOrder + 1 then SelectNext(Edit1, True, True); or PostMessage(Handle, WM_KEYDOWN, VK_TAB, 0);
if Edit2.TabOrder = Edit1.TabOrder + 1 then SelectNext(Edit1, True, True); or PostMessage(Handle, WM_KEYDOWN, VK_TAB, 0);
L liuge Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-18 #4 onKeyPress 事件:if key=char(13) then edit2.setfocus();
P popeye Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-18 #7 先把form的keypreview:=true 然后,在keypress事件中 if key=#13 then perform(WM_NEXTDLGCTL,1,0)
W www Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-18 #8 >在keypress事件中 if key=#13 then perform(WM_NEXTDLGCTL,1,0) 或者干脆edit2.setfocus;
X xlf Unregistered / Unconfirmed GUEST, unregistred user! 2000-02-05 #11 if key = #13 then PerForm(Cm_Dialog1,wparam(Vk_Tab),0); 注意:设置Edit2的TabOrder值为Edit1的TabOrder的下一个数.
X xlf Unregistered / Unconfirmed GUEST, unregistred user! 2000-02-05 #12 if key = #13 then PerForm(Cm_DialogKey,wparam(Vk_Tab),0); 注意:设置Edit2的TabOrder值为Edit1的TabOrder的下一个数.