我是delphi初学者:用onkepdown事件怎样调用dll

调用dll接口KeyDown时,参数不够,你仅传递一个参数key,还有两个参数Sender和Shift你没有传递,改成这样:

===================================================================

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);

begin

showmessage(KeyDown(Sender,key,Shift));

end;

===================================================================