奥，不对，应该是showmessage(inttostr(key)); 另外，用chechy提到的Key = VK_ENTER也是一样的。关键是在哪个事件里用。你试试onkeypress和onkeydown到底是哪一个。 再另外，送给你另一个： 限制edit1里只能输入字母或<-键： 在edit1的onkeypress里写 if (not(key in ['a'..'z','A'..'Z'])) and (not (key=#8)) then begin showmessage('请输入字母'); key:=#0; end; 限制edit里只能输入数字也是一样的道理。
To: chechy From: frankzheng 断点我设过，但是没有起作用，你的怀疑可能是对的。
edit2.SetFocus;
在edit1的onkeypress中写：
if key=#13 then
edit2.setfocus;
Shift: TShiftState);
begin
if key=13 then ......
end;
另外，用chechy提到的Key = VK_ENTER也是一样的。关键是在哪个事件里用。你试试onkeypress和onkeydown到底是哪一个。
再另外，送给你另一个：
限制edit1里只能输入字母或<-键：
在edit1的onkeypress里写
if (not(key in ['a'..'z','A'..'Z'])) and (not (key=#8)) then
begin
showmessage('请输入字母');
key:=#0;
end;
限制edit里只能输入数字也是一样的道理。
From: frankzheng
断点我设过，但是没有起作用，你的怀疑可能是对的。
我的程序不在单位，可以把你EMAIL地址给我吗？ 如果有问题我想通过EMAIL和你联系。