Registriert seit: 15. Apr 2006
Ort: Kassel
64 Beiträge
Delphi XE Professional
|
Re: Indy Client bekommt keine Nachrichten vom Server
8. Jul 2007, 04:01
Du könntest mal folgendes versuchen:
Delphi-Quellcode:
procedure AddKontaktliste(const User: String);
var
contextList: TList;
i: Integer;
begin
contextList := Contexts.LockList;
try
for i:=0 to contextList.Count-1 do
TIdContext(contextList[i]).Connection.IOHandler.WriteLn('/AddKontaktliste'+','+User);
finally
Contexts.UnlockList;
end;
end;
|