Alle Programme im Clientcomputer Schliessen oder öffnen

[khalilazzz]

hallo
ich habe eine kleine Server/Client Anwendung realisiert.ich möchte aus dem server so kommandieren dass alle laufende Programme im Client beendet wird oder einen bestimmte ausgewählte programm im Client auch gestartet werden kann.
ich benutze [Indy] TCPServer /TCPClient.

wie realiseirt man sowas?ich bin nicht sicher aber vielleicht mit einem command integer.
vielleicht wäre es mir hilfreich mit einem Quellcodeprogramm
im voraus vielen dank

[Zacherl]

Du musst halt einen Befehl an den Server senden. Diesen dann abfangen und darauf reagieren, indem du z.b. einen Process beendest.
Das geht übrigens mit TerminateProcess

Florian

[khalilazzz]

bei mir muss es nicht unbedingt das schliessen von programmen.
es kann irgendwelche Aktion,die im Client abgefangen bearbeitet und ausgeführt wird.
wie realisiert man den befehl austausch zwischen server und Client

[Zacherl]

Bei Server sollte man in etwa so Befehle broadcasten können: IdTCPServer1.Connection.Socket.SendText('Befehl');
Beim Client muss man z.B. mit einem Timer prüfen, ob IdTCPClient1.Socket.ReceiveText einen Befehl enthält.

Florian

[khalilazzz]

was wäre denn wenn der befehl namens(Beispiel: "Message"),in dem er eine gesendete Nachricht aus dem Server im Client anzeigt.diese gesendete nachricht enthält im ihrem Inhalt die name eines anderen Befehl.das kann zu missverstänisse führen und so fehlinterpretation bis zum auslösen einer Exception.

[Zacherl]

Die Befehle müssen halt eindeutig geparst werden. Ich regele das immer gerne indem ich z.B. beim Client eine StringList erzeuge, dann mit Add das Item[0], also den Befehl selbst hinzufüge. Alles was danach mit Add zur StringList hinzugefügt wird, können Parameter sein. Danach sende ich StringList.DelimitedText an den Client.

Beispiel einer Command-StringList:

Code:

ShowMessage
Hallo, dies ist ein Text

Der Client muss nun auch eine StringList erstellen und DelimitedText den Wert, den er vom Server erhalten hat zuweisen.
Dann kann geprüft werden, welcher Befehl angekommen ist:

Delphi-Quellcode:

if StringList[0] = 'ShowMessage' then
begin
  ShowMessage(StringList[1]);
end;

Florian