Wie erstelle ich eine einfache Client/Server Anwendung
<<<<<<Wie erstelle ich eine einfache Client/Server Anwendung>>>>>>
Also die Anwendung wird recht simpel, ich möchte euch nur ziegen wie
eine ganz einfache
Client/Server Anwendnug aufgebaut ist...
Nungut fangen wir mal mit dem Server an
Als erstes erstellen wir eine Form und ziehn die Komponente 'Tserversocket'
auf die Form
und noch einen Button und ein Editfeld. Jetzt makieren wir die 'Tserversocket'
Komponente
und gehn in den Objektinspektor in die Registerkarte 'Eigenschaften' wo wir
2500 als Port
festlegen, und jetzt in diie Registerkarte 'Ereignisse' und dann ein doppelklick
auf das
Eingabefeld von 'OnClientRead', das bringt uns in den Quellcode unsere Anwendung.
An der
Stelle wo wir jetzt gelandet sind schreiben wir folgendes:
edit1.text := socket.ReceiveText;
Damit wird festgelegt wo hin der Text vom Client ausgeben wird. Und jetzt
ein Doppelklick
auf den Button und dort geben wir folgendes ein:
serversocket1.Active := true;
Damit wird der Server aktiviert. So das wars auch schon, der Server ist fertig
war doch recht
einfach oder?! =)
Dann machen wir uns nun mal an den Client
Wir erstellen wieder eine Form und ziehn die Komponente 'TClientsocket' auf
die Form, 2 Buttons
und 2 Editfelder. Jetzt machen wir einen Doppelklick auf Button1 und geben
dort folgendes in
den Quellcode ein:
clientsocket1.Host := edit1.text;
clientsocket1.Port := strtoint (edit2.text);
clientsocket1.active := true;
Mit 'clientsocket1.Host := edit1.text;' wird die IP des Servers festgelegt,
mit 'clientsocket2.Port := strtiont (edit2.text);'
wird der Port des Servers festgelegt und mit 'clientsocket1.active := true;'
wird eine Ver
bindung erstellt. Jetzt machen wir einen Doppelklick auf Button2 und geben
dort folgendes ein:
clientsocket1.socket.sendtext ('Hallo Welt');
Wenn wir den Button2 drücken wird der Text 'Hallo Welt' an den Server
gesendet und erscheint
dort in dem Editfeld. So das war der Client ist auch fertig... auch easyoder?!
:)
Autor: ThaDeus
e-mail: ThaDeus99@gmx.de
homepage: www.project-matrix.com
Wenn ihr mir eine e-mail schickt und nix verändert könnt ihr dieses
Tut gerne auf eure Seite
stellen....