请问如何把回车键和TAB键作为等同起来处理

Question

你可以这样，在OnKeyPress事件中。
if key=VK_RETURN then
begin
   SendMessage(handle,WM_NEXTDLGCTL,0,0);
   Key:=0;
end;

Answer 1

把 Form.KeyPreview 设为 true, 在 Form 的 OnKeyDown 事件中加入:
  if Key = VK_RETURN then
    PostMessage(Handle, WM_NEXTDLGCTL, 0, 0);

Answer 2

设Form的KeyPreview为True;
procedure Form.OnKeyPress
begin
   IF Key = #13 then 
       begin
            Key ：= #0；
            PerForm(WM_NEXTDLGCTL,0,0);
       end;
end;

Answer 3

把 Form.KeyPreview 设为 true, 在 Form 的 OnKeyDown 事件中加入:
  if Key = VK_RETURN then
    begin
    end

Answer 4

我用过上述方法，可按ENTER后总有BEEP声，可以消除吗？我是用在EDIT之间切换。

Answer 5

if Key = #13 then Key := #9;

Answer 6

我看还不如在窗体的隐蔽之处，也就是 把一个默认的按钮放在窗体之外，每次用户按enter后，会激发按钮的onclick事件，再在这个事件里写上
PostMessage(Handle, WM_NEXTDLGCTL, 0, 0);
或别的什么什么的，一切ok,用不了那么复杂：））
have a try,anyway.... no more beep,i'm sure of it!