在DELPHI7中如何实现用回车替代Tab?我用GOOGLE搜索一下，都是用如下代码： 需要用回车键代替TAB键下移一个控件时，把KeyPress设为True，加入下列代码拦截击键： Procedure TForm1.FormKeyPress(Sender:Tobject;Var Key:Char); Begin if key=#13 then { 判断是按执行键} if not (ActiveControl is TDbgrid) Then Begin { 不是在TDbgrid控件内} key:=#0; perform(WM_NEXTDLGCTL,0,0);{移动到下一个控件} end else if (ActiveControl is TDbgrid) Then{是在 TDbgrid 控件内} begin With TDbgrid(ActiveControl) Do if Selectedindex Selectedindex:=Selectedindex 1{ 移动到下一字段} else Selectedindex:=0; end; End; 首先我连keypress都找不到在哪里？ 其次运行时第一个if key=#13语句就出错，好象提示是不合法字符，请问如何实现这种功能?

您好﹗    應沒有問題吧﹐OnKeyPress事件在Form中和DBGrid元件中都有﹐就您的問題來講﹐因為是需要Form接收OnKeyPress事件中指令﹐故需先將Form的KeyPreview屬性設為True﹐作用是讓Form接收KeyPress的触發﹒        ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

------
忻晟

在 Form1 的 KeyPreview 屬性設為 True。 在 Form1.OnKeyPress 事件處理。

我知道了！这段代码粘贴过去时，要把IF 前面的空格删去，不然会提示出错！ 谢谢两位前辈！