Korrekte Typumwandlung nach TSocket

[engel90]

Zitat von sirius:

Hast du mal überprüft, ob der Inhalt der Variablen (sckt und client) identisch ist? Sollte eigentlich funktionieren.

Und die Funktion Socket (und evtl. bind/connect) hast du auch aufgerufen.

Zum überprüfen hab ich einfach an den Anfang der Threadfunktion folgendes geschrieben:

Delphi-Quellcode:

  EnterCriticalSection(mutex_state);
  if (client = sckt) then begin
    Writeln('parameter und orginal gleich');
  end;
LeaveCriticalSection(mutex_state);

Dabei kommt heraus, das die Handles client und sckt nich gleich sind. Die Funktionen WSAStartUp(), Socket(), Bind(), und Listen() wurden erfolgreich ausgeführt.

mfg
engel