Question

delphi中enter键代替tab键

当按下enter键的时候之走edit控件 窗体上的button按钮不走

Answer 1

把FORM1的Keypreview 属性改为TRUE
在KeyPress加上事件
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
perform(WM_NEXTDLGCTL,0,0);
end;