Mit ServerSocket einen Text zum Client senden

Rene1802 · Beiträge: 24

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 · Beiträge: 511 Windows XP Delphi 05 Pers

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

Hoffe das ging so

_________________
Wo's nix zu gucken gibt, gibts vielleicht was zu hören.

robertthronhill · Hält's aus hier Beiträge: 8

Hallo!

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

markieren

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 · Beiträge: 511 Windows XP Delphi 05 Pers

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

_________________
Wo's nix zu gucken gibt, gibts vielleicht was zu hören.

Rene1802 · Beiträge: 24

der Tip von Adler war Goldrichtig.
Danke

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme