很怪很怪的很小很小的问题。

Question

我新建一个窗体，添加一个tedit 然后在edit1 的keydown中判断 if key=13 then 
showmessage('ok'); 
没有问题。 但是在我原有的程序里就是不行。。怪了。。

Answer 1

在我原来的窗体里的EDIT的KEYDOWN事件，也是if key=13 then 
showmessage('ok'); 
一点反应也没有。
怎么回事？

Answer 2

靠，搞错地方了。。哈哈。
为了不乱费分，还得继续啊。我用的是delphi

Answer 3

if key=#13 then 
showmessage('ok'); 

Answer 4

procedure TQJ_F.Edit1KeyDown(Sender: TObject; var Key: Word; 
  Shift: TShiftState); 
begin 
  if Key = Word(#13) then 
  begin 
    ShowMessage('ok'); 
  end; 
end; 

Answer 5

那就是你的begin end之间的程序的问题,设置断点跟踪一下