Re: Even....

Author

Message

Slavi Marinov

Posted: 11/08/2002 17:39:37

Well, it works if I use RVE.SaveRVF, and RVE.LoadRVF. But I save the RVF in

the following way( I use savetostream and loadfromstream) :

MS:=nil;

try

MS:=TMemoryStream.Create;

RVE.SaveRVFToStream(MS,false);

MS.Position:=0;

SetLength(FRVF,MS.Size);

MS.ReadBuffer(Pointer(FRVF)^, MS.Size);

finally

MS.Free;

end;

and then

S:=RVForm.FRVF;

{Save string to file}

FStream := TFileStream.Create('c:\project\t.rvf', fmCreate);

FStream.WriteBuffer(Pointer(S)^, Length(S));

FStream.Free;

and for loading, I use :

MS :=nil;

try

MS := TMemoryStream.Create;

MS.Position:=0;

MS.WriteBuffer(Pointer(FRVF)^,Length(FRVF));

MS.Position:=0;

RVE.LoadRVFFromStream(MS);

RVE.Format;

finally

MS.Free;

end;

Is there something incorrect with these?

--Slavi

"Sergey Tkachenko" <[email protected]> wrote in message

news:[email protected]...

> It saves only margins of RichView, not of RVPrint.

> Margins and background colors can be saved, you can see it in the

ActionTest

> demo (change margins and background color in Format | Background menu).

> But - they are loaded only by LoadRVF/LoadRVFFromStream methods. They do

not

> loaded by InsertRVF*** methods.

> If you still have problems, please send me a source code of project

> reproducing them.

> > Even the left margin is not saved... none of the margins is saved, even

> > though I have set "Save Margins" in right click -> Settings.... And also

> the

> > BGColor is not saved...