出了奇怪的事了，不知道是什么原因，请高手相助，谢谢

Question

下面的一段代码的功能是：当单击Enter键时，自动跳到下一个文本框，
现在的问题是：当我这样做了之后，向文本框里面输入数据时，文本框里
面不会显示，不知道这是什么原因？请大家帮助一下，谢谢！
　此窗体的keypreview的属性设置为：true;
procedure Treaderadd.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if key=#13 then
     begin
       perform(wm_nextdlgctl,0,0);
       key:=#13;
     end
  else
       key=:#0;
end;end.

Answer 1

procedure Treaderadd.FormKeyPress(Sender: TObject; var Key: Char);
begin
    if key=#13 then
    begin
      key:=#0;
      perform(WM_NEXTDLGCTL,0,0);
    end;
end;end.

Answer 2

你自己 Key := #0;
将它清除了嘛