如何用数字键盘的回车键模拟TAB键？

Question

如何用数字键盘的回车键模拟TAB键？
我想在一个FORM中放几个DBEdit，用数字键盘的回车键模拟TAB键
大回车键功能正常，用来提交数据。
请各位大虾解释得详细点。

Answer 1

在Key事件中判断到回车键时,将Key值换为tab的ascii码

Answer 2

例如:
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
  if  Key = #13 then
    key := #9
end;我是笔记本,没有数字键盘,你试一下数字键盘的回车的ascii是不是13

Answer 3

按照你的要求区分两个回车的唯一办法就是键盘扫描码。
不过Delphi获得它并不方便。

Answer 4

pazee说得对,我突略了这点.用我的方法应该没办法分辩是否是数字键盘回车.

Answer 5

非常赞同pazee(耙子)(灵感点亮生活)

Answer 6

if key=#13 then
    begin
     perform(WM_NEXTDLGCTL,0,0);
     key:=#0;
    end;