Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ServerSocket und ClientSocket (https://www.delphipraxis.net/118197-serversocket-und-clientsocket.html)

Counter909 2. Aug 2008 16:04


ServerSocket und ClientSocket
 
Hallo zusammen,


Ich hab noch eine Frage bezüglich der Sockets :-)

Also wenn zwei Pc's verbunden sind und miteinander kommunizieren (mit sendtext und receivetext wird jeweils ein String ausgetauscht), was auch problemlos klappt.

Und jetzt eine Frage zum Verständnis :-) :

Wenn der Client einen String "text" schickt, kann man beim Server ja ganz einfach die Frage stellen, wenn receivetext = "text" ist, dann z.B showmessage('Hallo Server');

aber geht es auch, wenn revievetext = "text" ist, dass er dann auch etwas bestimmtes über die GLEICHE VERBINDUNG einen String zurücksendet, sodass es beim Client sofort wiedergegeben wird ?

Client: socket.sendtext('text')

Server: if socket.recievetext = 'text' then socket.sendtext('Ergebnis'); /automatisch, ohne dass Server was gemacht hat

Client: memo1.add(''+socket.recievetext+'');

also das war jetzt nur ein Beispiel zum Verständnis ;-)


vielleicht kann mir ja einer helfen

besten dank

mr_emre_d 11. Aug 2008 14:53

Re: ServerSocket und ClientSocket
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

aber geht es auch, wenn revievetext = "text" ist, dass er dann auch etwas bestimmtes über die GLEICHE VERBINDUNG einen String zurücksendet, sodass es beim Client sofort wiedergegeben wird ?
jap... müsste gehen, aber nicht so wie du es gemacht hast ... glaube ich :)
Die Experten werden es schon wissen ;)

EDIT:
Ich hab mal ein Beispiel geuppt !

Viel spaße noch ;)

mr_emre_d 12. Aug 2008 23:07

Re: ServerSocket und ClientSocket
 
Naja es wurde noch nicht runtergeladen, aber
bei dieses Beispiel funktioniert 100% nur so nebenbei ;)

MfG


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:59 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz