LOADLIBRARY("GETIT.DLL") FAILED. GETLASTERROR RETURNS 0X00000485
说明这个dll可能只是一个普通的dll,并不是ActiveX DLL。而且Delphi编写的可能是COM
服务器,这样VB也无法调用,只有在Delphi编写的OLE Automation的COM组件才可以被VB
调用
将定义改为
private declare getimage lib "c:\windows\system\getid.dll" (a as string,b as string)
试试
说明这个dll可能只是一个普通的dll,并不是ActiveX DLL。而且Delphi编写的可能是COM
服务器,这样VB也无法调用,只有在Delphi编写的OLE Automation的COM组件才可以被VB
调用
将定义改为
private declare getimage lib "c:\windows\system\getid.dll" (a as string,b as string)
试试
//Delphi 中 a 和 b 最好声明为 pchar 类型
procedure getimage (a:pchar);stdcall;export;'你可以先将 getid.dll copy 到 c:
private declare getimage lib "c:\getid.dll" (byval a as string,byval b as string) 'as longhttp://www.playyuer.com 提供
一个 VB 凋用 Delphi 编写的标准 Dll 的例子下载:
http://microinfo.top263.net/Zip/D5Dll.zip