Client und Socket / Datenversand bzw. Empfangen

[pacman1986]

im onclick ereigniss von der checkbox einfach reinschreiben
If Checkbox1.checked then Clientsocket1.socket.sendtext('1t') else Clientsocket1.socket.sendtext('1f'); bzw
If Checkbox1.checked then Serversocket1.socket.sendtext('1t') else Serversocket1.socket.Connections[0].sendtext('1f'); bei interpreter im onread ereigniss wiederum

Delphi-Quellcode:

var text:String;
begin
  text := Socket.ReceiveText;
  if text[1] = '1' then 
       if text[2] = 't' then checkbox1.checked := true else checkbox1.checked := false;
end;

nicht getestet