[[Gunman]]

te lo escribo bien:
Evento onreceive:

Código Delphi [-]
  var
    Received: String;
  begin
    Socket.SendText(Received);
    ListBox.Items.Text := ListBox.Items.Text+Received;
  end;