idtcpclient如何将memo1中的文字发送出去？

Question

idtcpclient如何将memo1中的文字发送出去？

Answer 1

通用解决办法：流化你的文件（什么都可以，不一定是text)
var
  Stream: TStream;
begin
  Stream := TMemoryStream.Create;
  Memo.Lines.SaveToStream(Stream);
  Stream.Position := 0;
  IdTCPClient.WriteLn(IntToStr(Sizeof(Stream.Size))+#0);
  IdTCPClient.WriteStream(Stream);
  ......
end;

Answer 2

可不可以向流文件追加字符串？比如我想将流的最前面6个字节设置为命令区　如何向流追加这６个字节？
IdTCPClient.WriteStream(Stream)+'123456';？？ 是这样吗