请问一下怎么将richedit 的内容通过IdTCP传输
在另一端的richedit 显示出来呢
Form2.IdTCPClient2.Write(RichEdit2.Text);text:=ASender.Thread.Connection.ReadLn;
RichEdit1.Lines.Add(text);
怎么就显示一行。多行就不显示了?
在另一端的richedit 显示出来呢
Form2.IdTCPClient2.Write(RichEdit2.Text);text:=ASender.Thread.Connection.ReadLn;
RichEdit1.Lines.Add(text);
怎么就显示一行。多行就不显示了?
改成
Form2.IdTCPClient2.WriteLn(RichEdit2.Text);
包括回车换行,那我应该怎么发送,怎么读取来啊
aStream:TMemoryStream;
begin
aStream:=TMemoryStream.Create;
RichEdit2.Lines.SaveToStream(aStream);
aStream.Position:=0;
IdTCPClient2.WriteStream(aStream);
aStream.Free;
接收: var
aStream:TMemoryStream;
begin
aStream:=TMemoryStream.Create;
ASender.Thread.Connection.ReadStream(aStream);
aStream.Position:=0;
RichEdit1.Lines.LoadFromStream(aStream);
aStream.Free;