怎样直接把memo类字段内容赋给Trichedit(副文本框)?

Question

:o)根据memo的lines一行行读出来，循环的写入副文本框
:o)将memo savetofile,然后 对于副文本框 loadfromfile

Answer 1

what's  副文本框?RichEdit1.Text := Memo1.Text;
不行吗？

Answer 2

我是这样想的。
for i:=0 to memo.lines.count-1
do 
  richedit.lines[i]:=memo.lines[i];
你试试吧。我想可以的。

Answer 3

最简单,速度最快的！
var
  s:TMemoryStream;
begin
  s:=TMemoryStream.Create;
  try
    memo1.Lines.SaveToStream(s);
    s.Position:=0;
    richedit1.Lines.LoadFromStream(s);
  finally
    s.Free;
  end;
end;

Answer 4

？？？？？？？？？？？？？？？？？？？？？？
laza(麻风瘦)　的方法不对吗？不行吗？多简单
干嘛这么麻烦？

Answer 5

我是说从数据库的memo字段复制到richedit1

Answer 6

如果是那样,li_zhifu()的方法是正确的,而且很简单

Answer 7

laza(麻风瘦)　的方法也很好,不过我的数据是在是在数据库里

Answer 8

Memo1.Lines:=RichEdit1.lines;
都是TSTRING，可以相互赋值。

Answer 9

数据库的memo字段内容直接赋给--->richedit1
帮帮忙!

Answer 10

  在Delphi的Data Controls页中有一个TDBMemo主件，用来和一个TTabel合用就可以了。
然后再
  RichEdit1.txt:=DbMemo1.txt就可以了

Answer 11

to Manwill(风玉树):我目前是这样做的,但是如果dbmemo1的宽度<richedit1时
richedit1的右过就会出现空白,
数据库的memo字段内容直接赋给--->richedit1 可以吗?

Answer 12

//简单易用
richedit1.Text:=fieldbyname('memo').AsString;

Answer 13

to lwm8246(lwm8246)　: 谢谢