WinSocket Buffer richtig angeben?

[DarkPressure]

Falls es hilft, so soll es eingesetzt werden in der DLL
Programm schickt:

Delphi-Quellcode:

    if AskRO(IntToStr(Socket) + '§' + IntToStr(Integer(Place)) + '§' + IntToStr(Lenge) + '§' + IntToStr(Flags)) = True then
    FreeMemEx(Place, Proc);

Angenommen und eingesetzt so:

Delphi-Quellcode:

procedure GetMsgFromEXE(name       : pchar;
                        messageBuf : pointer; messageLen : dword;
                        answerBuf  : pointer; answerLen  : dword); stdcall;
begin                                   
  // this code has to be thread safe!
    Stringarray := Explode('§', pchar(messageBuf));
    Send(StrToInt(Stringarray[0]), Pointer(Stringarray[1]), StrToInt(StringArray[2]), StrToInt(StringArray[3]));
    boolean(answerBuf^) := True;
end;