bsDialog窗体怎样实现回车到下一控件(10分)

  • 主题发起人 主题发起人 tswhq
  • 开始时间 开始时间
T

tswhq

Unregistered / Unconfirmed
GUEST, unregistred user!
1.在Form的KeyPress事件加
procedure TProductRegForm.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
Key := #0;
SelectNext(ActiveControl, True, True);
end;
end;

2.在属性面板上将Form的KeyPreview的属性设为True

3.设置TabOrder的顺序


只要按"Enter"立即激活"OK"按钮
我用了各种方法都不行,我也不想用其他窗体模式,请大家赐教
 
把你的OK按钮的默认去掉不就完了。
它绝对不点击OK,你的回车就绝对有效。
 
to 蓝叶菱
你说的太笼统了,我找了半天
将BitBtn.Default:=False;就行了
 
接受答案了.
 
后退
顶部