Text vom Server zum Client senden

[gerritlober]

Hallo,

wenn ich von einem TServerSocket einen Text an einen Client schicke, wie
nimmt der Client den Text denn an, mit welchem Ereignis und mit welcher Methode
kopiere ich den Text in einen String?

Hier der Server-Code

Delphi-Quellcode:

  for i:=0 to ServerSocket.Socket.ActiveConnections do
    ServerSocket.Socket.Connections[i].SendText(msg);

[gerritlober]

Noch ein weiteres Problem. Wenn diese Code-Zeile mit dem Programm Compiliert
wird, und anschließend ein Client die Verbindung beendet, bekomme ich immer Asynchroner
Socket-Fehler.

Woran liegt das?

[NewWave]

hi

bei dem Client Socket gibt es ein ereignis was sich OnRead nennt, das tritt ein wenn daten an den Client geschickt werden. hier ein beispiel in C++:

Code:

RichEdit1->Lines->Add(cl1->Socket->ReceiveText());

es sollte auch in Delphi gehen. cl1 ist die Komponente, Socket die verbindung und ReciveText enthält den String vom Server du kannst es nun einer variable zu weisen und verarbeiten

Code:

msg := cl1.Socket.ReceiveText;