无法定位程序输入点SetupDiGetClassDevs于动态链接库setupapi.dll ( 积分: 0 )

  • 主题发起人 主题发起人 fcyseu
  • 开始时间 开始时间
F

fcyseu

Unregistered / Unconfirmed
GUEST, unregistred user!
xp系统,delphi6,编译运行程序出现"无法定位程序输入点SetupDiGetClassDevs于动态链接库setupapi.dll"  检查函数参数设置和调用规则都正确的,不知道是什么原因,请知道的帮忙解答
 
这个是函数声明,动态链接库我也已经拷到程序目录下:<br>function&nbsp;SetupDiGetClassDevs(ClassGuid:&nbsp;PGUID;&nbsp;Enumerator:&nbsp;PAnsiChar;&nbsp;hwndParent:&nbsp;LongWord;&nbsp;Flags:&nbsp;LongWord):Thandle;&nbsp;stdcall;&nbsp;external&nbsp;'setupapi.dll';&nbsp;&nbsp;&nbsp;<br>函数调用为:<br>var<br>&nbsp;&nbsp;HardwareDeviceInfo:&nbsp;Thandle;<br>&nbsp;&nbsp;MyPGuid:&nbsp;PGUID;<br>begin<br>&nbsp;&nbsp;HardwareDeviceInfo&nbsp;:=&nbsp;&nbsp;SetupDiGetClassDevs(MyPGuid,Nil,0,2);<br>&nbsp;&nbsp;if&nbsp;HardwareDeviceInfo&nbsp;=&nbsp;Invalid_Handle_Value&nbsp;then&nbsp;showmessage('获取设备信息集');<br>end;
 
已解决!<br>具体原因是因为函数声明的问题:应该在后面添加&nbsp;name&nbsp;'SetupDiGetClassDevsA'<br>整个声明如下:function&nbsp;SetupDiGetClassDevs(const&nbsp;ClassGuid:&nbsp;PGUID;&nbsp;Enumerator:&nbsp;PChar;&nbsp;hwndParent:HWND;&nbsp;Flags:&nbsp;DWORD):&nbsp;Thandle;stdcall;&nbsp;external&nbsp;'setupapi.dll'&nbsp;name&nbsp;'SetupDiGetClassDevsA';
 
后退
顶部