Vale, he intentado algo rarísimo... Pero creo que me alejo de como se usa.
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
begin
IDUDPClient1.Send(edit2.Text);
end;
procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
begin
Showmessage('probando')
end;
No ocurre nada. El host lo tengo puesto en 127.0.0.1 y los puertos todos en 2040.