请教一下如何将richedit 的内容通过IdTCP传输在另一端的richedit 显示出来

请问一下怎么将richedit 的内容通过IdTCP传输在另一端的richedit 显示出来
请问一下怎么将richedit 的内容通过IdTCP传输
在另一端的richedit 显示出来呢
Form2.IdTCPClient2.Write(RichEdit2.Text);

text:=ASender.Thread.Connection.ReadLn;
 RichEdit1.Lines.Add(text);
怎么就显示一行。多行就不显示了？

[解决办法]
Form2.IdTCPClient2.Write(RichEdit2.Text);
改成
Form2.IdTCPClient2.WriteLn(RichEdit2.Text);
[解决办法]
建议使用流来实现，具体的方法/函数请参阅Indy的手册，以下是示例代码：

发送：

Delphi(Pascal) code

  var    aStream:TMemoryStream;begin  aStream:=TMemoryStream.Create;  RichEdit2.Lines.SaveToStream(aStream);  aStream.Position:=0;  IdTCPClient2.WriteStream(aStream);  aStream.Free;