Re: How to combine multi RVF into one?

Return to index

Author

Message

Shen

Posted: 08/28/2004 10:36:45

Thank you!

But what is the ItemNo parameter should be?

    rv.InsertRVFFromStream(Stream, ItemNo);

"Sergey Tkachenko" <[email protected]> :[email protected]...

> 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.

> >

> >

>

>