hi,
bei meiner Netzwerkanwendung mit
indy möchte ich gerne die Kommunikation wie folgt aufbauen.
Client möchte daten vom Server und schickt einen Befehl
Client.WriteLn('GET_KM');
Im Server Execute bekommt er den Befehl und schickt einen neuen Befehl das jetzt die Antwort kommt.
Delphi-Quellcode:
command := uppercase(AThread.Connection.ReadLn);
if command = 'GET_KM' then
begin
AThread.Connection.WriteLn('A:GET_KM'); //Die Antwort wird gesendet
AThread.Connection.WriteLn(fClientlist.Text);
end;
Im Client Execute bekommt er den Befehl.
Delphi-Quellcode:
command := uppercase(fClient.ReadLn);
if command = 'A:GET_KM' then
begin
s := fClient.ReadLn;
lbClients.Items.Text := s;
end;
Wo drauf ich hinaus möchte ist, kommt das auch immer beim Client so an?
Delphi-Quellcode:
AThread.Connection.WriteLn('A:GET_KM'); //Die Antwort wird gesendet
AThread.Connection.WriteLn(fClientlist.Text);