Einzelnen Beitrag anzeigen

Zortiander

Registriert seit: 29. Jan 2004
13 Beiträge
 
#8

Re: Befehle an server senden...

  Alt 29. Jan 2004, 16:25
Probiere es mit Indy-Komponenten, habe es gerad heute hinbekommen. Da kannst Du dann mit WriteLn usw. das abfangen. Im Prinzip funktioniert das so:

Client Code
Delphi-Quellcode:
...
{Hier willst Du dem Server ne Nachricht senden, Dein Indy TCP Client hat als Name CLient}
Client.WriteLn('shutdown')
...
Server Code
Delphi-Quellcode:
{Das geht in die OnExecute Routine rein}
...
command:= AThread.Connection.ReadLn;
{AThread wird in der Prozedur gleich übergeben, mit Connection greifst Du auf die Verbindung zu}
If command = 'shutdownthen
Begin
  Athread.Connection.Disconnect; {Den Client abhängen}
  doshutdown;
End;
Sollte so ungefähr funktionieren.
  Mit Zitat antworten Zitat