neues Ereignis in TServerSocket

[oki]

Jo Man,

da bin ich ja noch gar nicht drauf gekommen. hört sich irgentwie brutal nach direktem Weg an. Die Standardsockets nehmen aber den Umweg über TServerWinSocket.

Codemäßig meinst du das so?

Delphi-Quellcode:

procedure TMyServerSocket.GetSocket(Sender: TObject; Socket: Integer;
  var ClientSocket: TServerClientWinSocket);
begin
  ClientSocket := TGPRSReceiveServerClientWinSocket.Create(Socket, self.socket);
  Clientsocket.OnIdentify := self.OnIdentify;
  ....
end;

OnIdentify ist dann halt mal so 'n neues Ereignis.

Hmmmm.?! Klingt aber erst mal simpel.


Übrigens, wenn, dann sollen sich dort natürlich auch alle melden.

Gruß oki