Empfangen
ListenSocket.Proto := 'udp';
ListenSocket.Addr := '0.0.0.0'; // oder meine
IP '192.168.1.64'
ListenSocket.ReuseAddr :=true;
ListenSocket.Listen;
procedure TMainForm.ListenSocketDataAvailable(Sender: TObject; Error: Word);
var
s: string;
begin
s:=ListenSocket.ReceiveStr;
ListenMemo.Lines.Add('Empfangen: Port (' + ListenSocket.port + ') : ' + s);
End;
Wofür ist ListenSocket.SocksPort ?
Senden
SendSocket.Proto := 'udp';
SendSocket.Addr := '255.255.255.255' // That's a broadcast ! oder 192.168.0.111
SendSocket.Port := '21105';
SendSocket.LocalPort := '0';
SendSocket.Connect;
SendSocket.SendStr(mySendingString);