keydown事件

Question

请问各位高手我用以下代码不好用请指教，以下是EDIT7的KEYDOWN事件代码：
if key=vk_return then
 edit8.text:=inttostr(strtoint(edit6.text)*strtoint(edit7.text));
 edit9.setfocus;在运行时，当我在EDIT7中输入数值时，还没等数值输入完就到EDIT9中，而且EDIT8中还没有数，不知错在哪里请指教，如何改正
我要实现的功能是当我在EDIT7中输入完数据我按回车键，自动到EDIT9中，而且EDIT8中要有数值，请指教

Answer 1

if key=vk_return then
  begin
   edit8.text:=inttostr(strtoint(edit6.text)*strtoint(edit7.text));
   edit9.setfocus;
  end;

Answer 2

if key=vk_return then
begin
 edit8.text:=inttostr(strtoint(edit6.text)*strtoint(edit7.text));
 edit9.setfocus;
end;

Answer 3

procedure TForm1.Edit2KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  case key of
    vk_return:
    begin
       edit3.text:=inttostr(strtoint(edit1.text)*strtoint(edit2.text));
       key := 0;
       edit4.setfocus;
    end;
  end;
end;

Answer 4

这样做我试过实现不了以上的功能，会出现以下的现象
在运行时，当我在EDIT7中输入数值时，还没等数值输入完就到EDIT9中，而且EDIT8中还没有数，，

Answer 5

你是不是把代码写在onChang事件中？

Answer 6

我的方法測試通過! Win2000