Sender übermitteln Client<->Server

[Delphi-Narr]

Hallo,
habe einen kleinen Chat programmiert, der im LAN Nachrichten verschicken kann.
Ich möchte jetzt nur noch, das auch ein Sender angegeben wird.
Also wie finde ich heraus, WER geschickt hat? interne IP reicht völlig aus.
Liebe Grüße!

[sirius]

Wie hast du es denn gemacht? Die RemoteIP ist bei TCP oder UDP kein Problem

[Delphi-Narr]

Ich habs bisher mit
Client.Socket.SendText('...');
und mit ReceiveText.

[hugo1990]

Ich bin mir jetzt nicht ganz sicher, ob es funktioniert, aber beim OnRead-Event bekommst du doch ein Socket-Objekt übergeben und da sollte dass doch eigentlich unter dem Attribut RemoteAddress zu finden sein.

[Delphi-Narr]

Hab ich gefunden. Klappt, danke.
Kann man auch den Inhalt von Memos versenden?

[gsh]

Klar, einfach:

Delphi-Quellcode:

Client.Socket.SendText(Memo1.Text);

[Delphi-Narr]

Oh, hatte es bisher mit Lines versucht. So einfach^^
Ich bekomm leider immer einen Fehler, wenn der Server nicht verfügbar ist... Kann ich das auch irgendwie abfangen?

[hugo1990]

Das sollte mittels try-except funktionieren.

[SirThornberry]

try-except sollte da nicht funktionieren da die Sockets, wenn ich mich richtig entsinne, das ganze über ein extra Event auslösen (asyncron)

[hugo1990]

Ah stimmt, da gibt es ja extra das Ereignis OnError.

Edit: Achja und um das Auslösen der Exception zu verhindern, muss man den ErrorCode innerhalb der OnError Methode auf 0 setzen.