Entwickler-Ecke

Internet / Netzwerk - Mit ServerSocket einen Text zum Client senden


Rene1802 - Mo 24.05.04 12:12
Titel: Mit ServerSocket einen Text zum Client senden
Hallo
Ich möchte mit einem serverSocket eine Text zu einen Client senden.
Der Verbindungsaufbau ist erfolgreich und der Client kann mir einen Text senden.
Ich habe versucht mit dem Befehl 'ServerSocket.Socket.SendText(Edit1.text);' einen Text zu senden.
Die Routine steigt mit dem Fehlercode 10057 aus.Danach ist die Verbindung unterbrochen.
Was muß ich machen, damit ich den Text vom Server zum Client Senden kann?

Bin für jede anregung dankbar
Bis dann Rene


adler - Mo 24.05.04 12:30

serversocket.socket.connections[clientid].sendtext('hallo');

Hoffe das ging so ;)


robertthronhill - Mo 24.05.04 14:29

Hallo!

Ich programmiere momentan auch an einem Chatprogramm und habe das so erledigt:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure TForm1.Button3Click(Sender: TObject);
var msg: String;
begin
        msg:=Edit1.Text; //Text aus Edit1 auslesen und in den String msg schreiben
        chat.Lines.Add(msg); //Den Inhalt des Strings msg in einem Memo anzeigen
        cs.Socket.SendText(msg); //Den Text über den clientsocket cs versenden
end;

und es funktioniert Tadellos.
Ich kann mir vorstellen, dass du vergessen hast einen Server für den Client anzugeben, weil als meine "Nachrichten" nicht gesendet wurden, weil meine Firewall sie nicht durchgelassen haben, habe ich genau den gleichen Fehler bekommen.


adler - Mo 24.05.04 14:37

Er möchte vom Server zum client senden, nicht anderstrum ;)


Rene1802 - Mo 24.05.04 14:55
Titel: Danke für die Hilfe
der Tip von Adler war Goldrichtig.
Danke