在一窗体中，放置多个TEdit、TCombobox，如何可同时用Tab或Entry转换输入焦点位置。

Question

首先在form的tab order中设置相应的顺序，
然后再相应的控件的on key press事件里写控制程序
比如
if key=#13 then
...

Answer 1

用Enter只有自己编程了。用Tab则可以用TabOrder属性设置。

Answer 2

设置一下Tedit，Tcombobox的Taborder属性，如0，1，2，3然后在edit的keyup事件里写if key=13 then Perform(WM_NEXTDLGCTL,0,0);即可

Answer 3

要注意把keypreview属性设置为true
在键盘事件中写
begin
  if Key = #13 then begin
    if UpperCase(Sender.ClassName) <> UpperCase('TDBGrid') then begin
      Key := #0;
      PerForm(WM_NEXTDLGCTL,0,0);
    end;
  end;
  if Key = #27 then close;
end;

Answer 4

if Key = #13 then 
    key:=#27;