TsRemote ^^

  • @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 ^^.

    [autoit]

    Func tsrGetPlayers ( $iNumberofPlayers = 1000, $vDLL = 'TSRemote.dll')
    Local $vStructPlayersInfo, $vStructRecords, $avReturn
    $vStructPlayersInfo = DllStructCreate ('byte[51200]')
    $vStructRecords = DllStructCreate ('int')
    DllStructSetData ($vStructRecords, 1, $iNumberofPlayers)

    [/autoit][autoit][/autoit][autoit]


    $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

    [/autoit]