Passing buffer under pointer to TCPSend

[rindeal]

Hello,

I have a function which looks like this:

func callback($buf_p, $len)
    TCPSend($iSocket, ...)
    Return 1
EndFunc

buf_p - pointer to a binary buffer

len - length of the data

 

How is it possible to send the data under the pointer via TCPSend()?

[rindeal]

So this is what I've got so far

 

Func callback($ptrBuf, $iLen)
    Local $tBuf = DllStructCreate("byte [" & $iLen & "]", $ptrBuf)
    Local $data = DllStructGetData($tBuf, 1)
    TCPSend($iSocket, $data)
    Return 1
EndFunc