怎样将Form1中RichEdit1的内容打印出来。
我在frxReport中也对应放置了一个Rich1。
1、怎样将RichEdit1的内容传给Rich1。2、如果RichEdit1中有格式呢?即:第一个字5号,第二个字5号……(字号大小由用户自己设置),
   怎样让Rich1也打印出相应的格式呢?

解决方案 »

  1.   

    第一个问题 
    var
      Stream : TMemoryStream;
    begin    Stream := TMemoryStream.Create;
        richedit1.Lines.SaveToStream(Stream);
        Stream.Position := 0;
        TfrRichView(frReport1.FindObject('rich1')).RichEdit.Lines.Clear;
        TfrRichView(frReport1.FindObject('rich1')).RichEdit.Lines.LoadFromStream(Stream);
    end;第二个问题
    按照上一种方法,在fastreport中rich1显示的字体就是richedit1中设置好的
      

  2.   

    谢谢。
    我还想请教一下,为什么我用rich显示数据预览有问题。
    rich的内容诸如:姓名:[frxDBDataSet1."姓名"]
    年龄:[frxDBDataSet1."年龄"]
    家庭住址:frxDBDataSet1."家庭住址"]。在打印预览时,只有第一个表达式 [frxDBDataSet1."姓名"],被替换成功,后面的要么年龄前多了frxDB,或者就没有替换成数据。