how can i convert this fucn to au3

[sunless]

i want use a delphi fucn

Function GetVolume(strVolumeMountPoint, strVolumeName:String; intBufferLength:Longword):integer; stdcall; external 'DiskVolume.dll';

but i convert it au3 ,it not work

Func _GetVolume($diskname)

$str = "char[128]"

$a = DllStructCreate($str)

$rc= DllCall("DiskVolume.dll","ubyte","GetVolume","str",$diskname,"ptr",DllStructGetPtr ($a))

$dd = DllStructGetData($a,1)

Return $dd

EndFunc

[PaulIA]

i want use a delphi fucn

Function GetVolume(strVolumeMountPoint, strVolumeName:String; intBufferLength:Longword):integer; stdcall; external 'DiskVolume.dll';

but i convert it au3 ,it not work

Func _GetVolume($diskname)

$str = "char[128]"

$a = DllStructCreate($str)

$rc= DllCall("DiskVolume.dll","ubyte","GetVolume","str",$diskname,"ptr",DllStructGetPtr ($a))

$dd = DllStructGetData($a,1)

Return $dd

EndFunc

You're not providing the correct parameters in DllCall. The function requires 3 parameters and you're only passing 2. I have no way of testing this because I could not find DiskVolume.dll anywhere in any of the Delphi environments that I have, but if you posted the prototype correctly, the function should look like this:

Func GetVolume($sMountPoint)
  Local $aResult
  $aResult = DllCall("DiskVolume.dll", "int", "GetVolume", "str", $sMountPoint, "str", "", "int", 128)
  Return SetError($aResult[0], 0, $aResult[2])
EndFunc