W wmff Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-04 #1 窗体包括Datetimepicker、edit、combobox等等!不知道怎么排放,使用TAB键也不能让它 按我想要的顺序移动下来!请各位指教!谢谢!
F Fyx Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-05 #3 先把你的控件的TabOrder按你想要跳转的顺序排好,然后: procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then begin Key := #0; Perform (CM_DialogKey, VK_TAB, 0); end; end;
先把你的控件的TabOrder按你想要跳转的顺序排好,然后: procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then begin Key := #0; Perform (CM_DialogKey, VK_TAB, 0); end; end;