@progandy:
Noch mal danke ne
Also ich nehm mir jetzt die Funktion tsrGetPlayers von der TSRemote.dll vor. Sie funktioniert auch, aber die art und weise gefällt mir nicht ^^.
Func tsrGetPlayers ( $iNumberofPlayers = 1000, $vDLL = 'TSRemote.dll')
Local $vStructPlayersInfo, $vStructRecords, $avReturn
$vStructPlayersInfo = DllStructCreate ('byte[51200]')
$vStructRecords = DllStructCreate ('int')
DllStructSetData ($vStructRecords, 1, $iNumberofPlayers)
$avReturn = DllCall ($vDLL, 'int', 'tsrGetPlayers', 'ptr', DllStructGetPtr ($vStructPlayersInfo), 'ptr', DllStructGetPtr ($vStructRecords))
if @error or $avReturn[0] <> 0 Then
return SetError(1, @error, 0)
EndIf
Local $avPlayerList[DllStructGetData ($vStructRecords, 1)][6]
For $i = 0 To DllStructGetData ($vStructRecords, 1)-1
$vStructPlayer = DllStructCreate ($tagPlayerInfo, DllStructGetPtr ($vStructPlayersInfo) + (50 * $i))
For $j = 1 To 6
$avPlayerList[$i][$j-1] = DllStructGetData ($vStructPlayer, $j)
Next
Next
Return $avPlayerList
EndFunc