Re: How to combine multi RVF into one?

Return to index

Author

Message

Sergey Tkachenko

Posted: 08/27/2004 12:11:33

procedure AppendDoc(rv: TCustomRichView; const FileName: String);

var  Stream: TFileStream;

begin

  Stream := TFileStream.Create(FileName, fmOpenRead);

  rv.InsertRVFFromStream(Stream, ItemNo);

  Stream.Free;

end;

rv.Clear;

AppendDoc(rv, 'file1.rvf');

AppendDoc(rv, 'file2.rvf');

rv.Format;

> I want to combine multi RVF files into one RVF file.

> How can I get it?

>

> Thanks.

>

>