Also ich Versuch von meinem Serverprogramm (realisiert mit einem IdTCPServer) ne Message an nen Client zu schreiben. Jetz aber des knifflige, ich befind mich net in der OnExecute Methode des Server, von wos ja zum Client ein leichtes is.
Ich hab jetz folgende Prozedur geschrieben:
Delphi-Quellcode:
Procedure SendMes(index: Int64; Mes: string);
var LThreads: TList;
begin
LThreads := Form1.IdTCPServer1.Contexts.LockList;
try
with TIdContext(LThreads[index]) do
begin
WriteLn(Mes);
end;
finally
Form1.IdTCPServer1.Contexts.UnlockList;
end;
end;
Nu meine Frage: Wie fang ich des auf anderer Seite mit dem IdTCPClient auf, ich hab ja keine OnExecute Methode wie der Server?
Danke für jegliche Antwort, bis denn dann
Für die einen ist Windows nur ein Betriebssystem, für die anderen ist es der größte Virus der Welt.