Zitat von
xxl1:
Dies sind also meine Funktionsaufrufe. Natürlich bleibt der "server" bei der funktion accept hängen solange keine verbindung duch den "client" mit connect() erstellt wurde. Danch führt der "client" die bereit erwähnte send() funktion durch und der "server" soll dies "nurnoch" mit dem der oben geposteten funtion recv() auslesen. Leider geschiet dies nicht.
versuch es mal mit folgender Receive-Function:
Delphi-Quellcode:
function TNet.Winsock_reciveTCP;
Var
Buffer : String;
R : Integer;
begin
SetLength(Buffer,1024);
R:=recv(S_accepting, buffer[1], Length(buffer),0);
If (R < 0) Then --fehler--
SetLength(Buffer,R); // Empfangene Daten stehen nun im Buffer (String)
OutputDebugString(PChar(Buffer)); // Sichtbar im Eventlog - Ctrl-Alt-V
end;