Entwickler-Ecke :: Thema anzeigen - ServerSocket und ClientSocket....HELP

Scrat - Do 05.06.03 11:33
Titel: ServerSocket und ClientSocket....HELP

Hi,
also ich habe ja ein Chat programmiert wo erstmal nur zwei leute miteinander kommunizieren können. (1x Server u. 1x Client)

Ich habe allerdings immernoch das Problem, dass der Client nicht die geschriebenen Sätze vom Server empfängt.
Der Server empfängt aber wie er soll alle Sätze (die eigenen und die vom Clienten).

CLIENT-SOCKET
OnConnect:

Quelltext

1:	Statusbar2.Panels[0].Text := 'Verbunden mit: ' + Socket.RemoteHost +' \| Status: Server';

OnDisconnect:

Quelltext

1:	Statusbar2.Panels[0].Text := 'Der Server hat die Verbindung getrennt';

OnError:

Quelltext

1:
2:
3:

 
Memo2.Lines.Add('Verbindung mit  '+Server+'  konnte nicht hergestellt werden.');
ErrorCode := 0;

OnRead:

Quelltext

1:	Memo2.Lines.Add(Socket.ReceiveText);

SERVER-SOCKET
OnAccept:

Quelltext

1:
2:

 
Statusbar2.Panels[0].Text := 'Verbunden mit: ' + Socket.RemoteHost +'  | Status: Server';

OnClientConnect:

Quelltext

1:	Statusbar2.Panels[0].Text := 'Verbunden mit: ' + Socket.RemoteHost +' \| Status: Client';

OnClientDisconnect:

Quelltext

1:
2:

 
Statusbar2.Panels[0].Text := 'Der client hat die Verbindung getrennt';

OnClientRead:

Quelltext

1:	Memo2.Lines.Add(Socket.ReceiveText);

Wo liegt der fehler...?
MFG
Scrat

Scrat - Do 05.06.03 16:39

Ich habe hier eine Seite gefunden:
http://www.bildung.hessen.de/abereich/inform/skii/material/delphi/interne3.htm

Ok ich habe keine 2 Versionen von meinem Chat-Programm (1x Server u. 1x Client)

Sodern nur 1 Chat-Programm.
Aber hier kann man auswählen ob man Client oder Server ist.

mhh..komisches Problem

Tweafis - Do 05.06.03 21:56

Schau dir mal die Demo von Delphi an :twisted:

Scrat - Fr 06.06.03 08:00

Dummerweise ist es genau diese Demoversion..welche ich weiterentwickelt habe....lol

Tweafis - Fr 06.06.03 09:17

Funktioniert die Demo bei dir? Wenn ja, dann schau mal an was du geändert hast und prüfe das auf richtigkeit.

(Ich weiß, dass das die Demo ist, deswegen mein smilie (:twisted:))

Scrat - Fr 06.06.03 10:01

HIHOO.....ich bins nochmal...

also so ganz genau weis ich nu nicht was du von wir willst :D

Also diese Demoversion vom Chatprogramm welche in Delphi von anfang an drinne ist....habe ich überschrieben..(weiterentwickelt).

Ích habe also nicht mehr den orginalen Quellcode von der ursprünglichen Demoversion..

Nu bin ich mal gespannt auf deine Antwort....wenn wir nicht gerade aneinandervorbei reden..lol :lol:
Scrat

Tweafis - Fr 06.06.03 10:51

Dein Programm ist ja soweit ich verstanden habe ähnlich wie das DemoTeil. Jetzt schau mal was bei dir nicht funzt, und wie das in der Demo gelöst ist. :?

Scrat - Fr 06.06.03 11:31

wo finde ich den den Quellcode?
Ich hab dn ja nicht mehr...