Delphi Client und Socket / Datenversand bzw. Empfangen

Thema durchsuchen

Ansicht

Themen-Optionen

Client und Socket / Datenversand bzw. Empfangen

Ein Thema von Chippie82 · begonnen am 7. Apr 2006 · letzter Beitrag vom 9. Apr 2006

Antwort

pacman1986

Registriert seit: 11. Feb 2005
Ort: Kirchhain
498 Beiträge

Delphi 2005 Personal

Re: Client und Socket / Datenversand bzw. Empfangen

7. Apr 2006, 13:10

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

markieren

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;