idTelnet1.Write(Edit1.Text+#13#10);
procedure TForm1.idTelnet1DataAvailable(Sender: TIdTelnet; const Buffer: String); begin Memo1.Lines.Add(Buffer); end;