Einzelnen Beitrag anzeigen

Jake Foly

Registriert seit: 29. Jun 2007
6 Beiträge
 
#7

Re: Indy 10 - 1 Server 2 Clients

  Alt 1. Sep 2007, 09:55
So habe mich mit dem Code nochmal beschäftigt.
Es war wohl noch Indy9 ?
Ist mir anfangs gar nicht aufgefallen.
Naja kein Problem
Hab den Code umgearbeitet.
Er funktioniert auch.
Hier für alle die das selbe Problem haben:

Delphi-Quellcode:
var
  i: integer;
  Thread: TIdContext;
  clientliste: TList;
begin
  clientliste:=server1.Contexts.LockList;
  try
        for i:=0 to ClientListe.Count-1 do
        begin
          Thread:= ClientListe.items[i];
          Thread.Connection.Socket.WriteLn(msg);
        end;
  finally
    server1.Contexts.UnlockList;
  end;
end;
Was sich mir jetz nur noch für eine Frage stellt ist Wie ich Clienten identifizieren kann.
Also was steht in der Locklist?
Die IP adresse? oder was?
Wenn ich das wüsste wäre es ja dann auch möglich Daten nur an gezielt einen Clienten zu schicken.

Aber ansonsten bedanke ich mich schonmal bei DP und dessen Usern für die gute Hilfe.
Werd wohl jetz auch öfters hier sein um vlt selbst fragen zu beantworten.

Thx

Jake
  Mit Zitat antworten Zitat