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:
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.

Sender übermitteln Client<->Server

Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Re: Sender übermitteln Client<->Server

Forumregeln

Delphi-Narr Registriert seit: 29. Aug 2009 Ort: Duisburg 437 Beiträge Delphi 2007 Professional	#1 Sender übermitteln Client<->Server 2. Dez 2009, 18:44 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!
	Zitat

sirius Registriert seit: 3. Jan 2007 Ort: Dresden 3.443 Beiträge Delphi 7 Enterprise	#2 Re: Sender übermitteln Client<->Server 2. Dez 2009, 18:51 Wie hast du es denn gemacht? Die RemoteIP ist bei TCP oder UDP kein Problem Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.
	Zitat

Delphi-Narr Registriert seit: 29. Aug 2009 Ort: Duisburg 437 Beiträge Delphi 2007 Professional	#3 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:01 Ich habs bisher mit Client.Socket.SendText('...'); und mit ReceiveText.
	Zitat

hugo1990 Registriert seit: 27. Dez 2006 166 Beiträge Turbo Delphi für Win32	#4 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:16 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.
	Zitat

Delphi-Narr Registriert seit: 29. Aug 2009 Ort: Duisburg 437 Beiträge Delphi 2007 Professional	#5 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:24 Hab ich gefunden. Klappt, danke. Kann man auch den Inhalt von Memos versenden?
	Zitat

gsh Registriert seit: 24. Okt 2004 1.542 Beiträge Delphi XE Architect	#6 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:28 Klar, einfach: Client.Socket.SendText(Memo1.Text); Alex "Sage nicht alles, was du weißt, aber wisse alles, was du sagst!" Matthias Claudius "Wer sich über Kritik ärgert, gibt zu, daß er sie verdient hat." Tacitus
	Zitat

Delphi-Narr Registriert seit: 29. Aug 2009 Ort: Duisburg 437 Beiträge Delphi 2007 Professional	#7 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:37 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?
	Zitat

hugo1990 Registriert seit: 27. Dez 2006 166 Beiträge Turbo Delphi für Win32	#8 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:38 Das sollte mittels try-except funktionieren.
	Zitat

SirThornberry (Moderator) Registriert seit: 23. Sep 2003 Ort: Bockwen 12.235 Beiträge Delphi 2006 Professional	#9 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:47 try-except sollte da nicht funktionieren da die Sockets, wenn ich mich richtig entsinne, das ganze über ein extra Event auslösen (asyncron) Jens Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
	Zitat

hugo1990 Registriert seit: 27. Dez 2006 166 Beiträge Turbo Delphi für Win32	#10 Re: Sender übermitteln Client<->Server 2. Dez 2009, 19:49 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.
	Zitat