Hallo alle miteinander,
ich habe jetzt folgendes hinbekommen, der Server sendet die Daten ( 0 = aus , 1 =an ) an den Client.
Server :
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7:
| procedure TForm1.BtnaufgabeClick(Sender: TObject); begin if (ServerSocket1.Active) then Broadcast('Ausgeführung','1') else Log.Lines.Add('Fehler Server offline'); end; |
Der zeigt es momentan noch im memo Fenster an ( Wie kann man das ändern sodass es nicht "sichtbar" für den Benutzer angezeigt wird).
Nun soll der Client die 0 oder 1 auswerten können und ich denke mal via if variable dann einen Befehl ausüben.
Wie setzte ich das richtig um ?
Mir fehlt der Anhaltspunkt für das empfangen und umwandeln der 1 oder 0
Könnt Ihr mir da weiterhelfen ?
Nette Grüße