如何在delphi中load一个dll??(100分)

  • 主题发起人 主题发起人 yuezw123
  • 开始时间 开始时间
Y

yuezw123

Unregistered / Unconfirmed
GUEST, unregistred user!
dll是别人的,好象是c写的,没有lib文件,给了下面一点代码:
var
key:Integer;
key:=KeyScan_560HandSet; //Key is a const stand for the hardware device
keystring : string;

...//Init hardware and call other functions.

keystring := GetNewKey(Key);

The value GetNewKey(Key) returns:
'1','2','3','4'...
'Dial','Clear','Hangup','Power'..
我该如何在delphi中调这段代码!
 
loadlibrary()
 
和调用一般的dll一样调用就是了.就是不知道函数申明是怎么样的,看你的代码,可以这样
试试:
将dll文件拷贝到system32目录下,然后在implementation前加
function GetNewKey(Key : word): PChar; stdcall;external 'dll名字.dll';


 
因为不知道,所以才放到这里,让大家想个办法!!
呵呵!!还有一个原因,最近刚学delphi!!没办法!!
 
把你的dll给我寄一份,我试试看.snap_sun@263.net
 
你可以把DLL引用到控件中
 
简单,用exescope6打开一看就知道了。
 
bluerain, 多谢,您的email ??
 
snap_sun@263.net
 
多人接受答案了。
 
后退
顶部