IP Adresse der an den Server conectierten Clients...

[ssach]

hy,

hab mal wieder ne frage parat :

wie bekommeich dieIP adresse von den connectierten clients heraus? will in meinem chat alle user anzeigen..

und da aere noch was kleines, kann ich eine funktion ausfuhren wenn sich ein client disconnectiert hat, z.b. : aus meiner liste mit den connectierten clients raus loeschen?

danke,

cu

[sakura]

Welche Komponenten nutzt Du denn, um die Server- und Clientanwendungen zu schreiben? Eigentlich geben alle Komponenten die IP des Clients als eine Eigenschaft zurück.

...:cat:...

[ssach]

benutze die normalen serversocket und clientsocket !

cu

[sakura]

Mal schau'n, einen Moment bitte...

Delphi-Quellcode:

// auf dem Server (wenn ich jetzt die richtige Komponente erwischt habe):
procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to Pred(TcpServer1.ServerSocketThread.ThreadPool.Count) do
    ShowMessage(TClientSocketThread(TcpServer1.ServerSocketThread.ThreadPool[
        I]).ClientSocket.LocalHostAddr);
end;

...:cat:...