Einzelnen Beitrag anzeigen

chillywilly

Registriert seit: 1. Okt 2005
11 Beiträge
 
#5

Re: delphi konsolen tcp server

  Alt 2. Okt 2005, 16:24
Hi leute.
Also hab es geschafft, dass beim Ereignis OnListen etwas passiert. bei onclientconnect getsocket und disconnect passiert aber nichts. (der client sagt aber er sei verbunden :/)

help plz

Delphi-Quellcode:
procedure TApplication.procStart;
begin
 ServerSocket := TServerSocket.Create(nil);
 ServerSocket.OnListen := procSocketListen;
 ServerSocket.OnClientConnect := procSocketClientConnect;
 ServerSocket.OnClientDisconnect := procSocketClientDisconnect;

 ServerSocket.Port := 1234;
 ServerSocket.Open;
end;
  Mit Zitat antworten Zitat