AutoIt DllCall转USB

Question

我在使用AutoIt的DLLCall时遇到了麻烦。

我正在尝试使用AutoIT控制Delcom USB指示灯LED灯。为此，我有一个.dll，其中包括以下功能：

DelcomGetDeviceCount：返回Delcom USB设备的数量

DelcomGetNthDevice：搜索指定的设备类型，获取设备名称字符串

DelcomOpenDevice：获取设备名称并返回USB设备的句柄

DelcomLEDControl：采用USB手柄，设置LED的状态

这是关于这些DLL函数的文档的a link。

我认为我的问题是没有正确格式化指向设备名称的指针，因为我对DelcomGetNthDevice的调用返回0，无法找到设备，即使我使用DelcomGetDeviceCount检测到一个设备。

我试过了

Local $handleDLL = DLLOpen("C:\DelcomDLL.dll")
Local $stString = DllStructCreate("wchar Name[512]")

Local $devices = DllCall($handleDLL,"dword","DelcomGetDeviceCount","dword",0)

Local $result = DllCall($handleDLL,"dword","DelcomGetNthDevice","dword",1,"dword",0,"ptr",DllStructGetPtr($stString))

Local $handleUSB = DllCall($handleDLL,"handle","DelcomOpenDevice","str",DllStructGetData($stString,"Name"),"dword",0)
Local $result2 = DllCall($handleDLL,"dword","DelcomLEDControl","handle",$handleUSB[0],"dword",0,"dword",1)


MsgBox(0,"# of Devices",$devices[0])
MsgBox(0,"Bool Found Device",$result[0])

DllClose($handleDLL)

和

Local $handleDLL = DLLOpen("C:\Users\b46020\Documents\Asher Project\DelcomDLL.dll")
Local $stString

Local $devices = DllCall($handleDLL,"dword","DelcomGetDeviceCount","dword",0)

Local $result = DllCall($handleDLL,"dword","DelcomGetNthDevice","dword",1,"dword",0,"str*",$stString)

Local $handleUSB = DllCall($handleDLL,"handle","DelcomOpenDevice","str*",$stString,"dword",0)
Local $result2 = DllCall($handleDLL,"dword","DelcomLEDControl","handle",$handleUSB[0],"dword",0,"dword",1)


MsgBox(0,"# of Devices",$devices[0])
MsgBox(0,"Bool Found Device",$result[0])

DllClose($handleDLL)

但在每种情况下我都会调出1个设备，但无法得到它的名字。

非常感谢你的帮助。

谢谢， 乔纳森

Answer 1

解决了它：

Local $handleDLL = DllOpen("C:\DelcomDLL.dll")

$strName = DllStructCreate("char Name[512]")
$ptrName = DllStructGetPtr($strName)

Local $result = DllCall($handleDLL, "dword", "DelcomGetNthDevice", "dword", 0, "dword", 0, "ptr", $ptrName)
Local $handleUSB = DllCall($handleDLL, "handle", "DelcomOpenDevice", "str", DllStructGetData($strName, "Name"), "dword", 0)
Local $result2 = DllCall($handleDLL, "dword", "DelcomLEDControl", "handle", $handleUSB[0], "dword", $color, "dword", $state)

Local $closed = DllCall($handleDLL,"dword","DelcomCloseDevice","handle",$handleUSB[0])
DllClose($handleDLL)