Message vom Server zum Client schicken (Indy)

[VirusXP]

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

[SirThornberry]

ich hab es damals so gemacht das ich mir im OnConnect den AThread in eine Liste gepackt hab und im OnDisconnect wieder entfernt. Somit konnte ich über meine eigene Liste auf die einzelnen Verbindungen zugreifen.

[VirusXP]

Welche Seite meinst du jetz, Server oder Client. Serverseitig is alles da, alles in ner Liste, bloß ich weiß net wie ich mit dem Client drauf reagieren soll wenn ne Message kommt. Der Client hat ja keine OnExecute Methode wie der Server.

[inherited]

Garnicht, Sockets verwenden oder selbt implementieren

[DataCool]

Hi,

ganz einfach, erzeug Dir einen Thread der nichts anders macht als aus der Connection zu Lesen.

Kommt beim ReadLn was an, must Du dann nur noch darauf reagieren.

Gruß Data

[VirusXP]

Wie meinst du das, soll ich die ganze Zeit nen Timer oder ähnliches laufen lassen und bei jedem Intervall prüfen ob der server was gschickt hat?

[DataCool]

Hi,

mit nem Timer hättest Du den gleichen Effekt, nur kann ich Dir davon nur abraten.
Mach das ganze in einen Thread und das ganze läuft einwandfrei !
Ich habe das so schon diverse Male auf diese Weise umgesetzt.

Gruß Data

[VirusXP]

Und wie mach ich des mit dem Thread, bin aufem Gebiet Netzwerk und Internet noch recht neu.

[DataCool]

Hi,

ein Thread hat doch absolut nichs mit Internet zu tuen,
schau mal in der Delphi Hilfe nach TThread,
da solltest Du alles finden was Du brauchst.
Ansonsten wird Dir hier zu dem Thema bestimmt geholfen.

Gruß Data

[VirusXP]

Danke, werd mich mal umschaun