I am having a problem when I load a document in the header of the first page of a TSRichViewEdit.
The content is not visible at first. You can only see after double clicking on it.
My application is to managing documents and is a bit complex, or difficult to explain, but I'll try to simplify the explanation and maybe you can give me some clue to identify what it is I'm doing wrong.
I have a TSRichViewEdit within a TFrame, its properties are:
Code: Select all
Self.Editor.SRichViewEdit1.RVHeader.ReadOnly: = True; // "Editor" is a TFrame
Self.Editor.SRichViewEdit1.RVFooter.ReadOnly: = True;
Self.Editor.SRichViewEdit1.PageProperty.HeaderVisible: = True;
Self.Editor.SRichViewEdit1.PageProperty.FooterVisible: = True;
Self.Editor.SRichViewEdit1.BackgroundProperty.Visible: = True;
Self.Editor.SRichViewEdit1.PageProperty.FacingPages: = False;
Self.Editor.SRichViewEdit1.PageProperty.TitlePage: = True;
Self.Editor.SRichViewEdit1.RVFOptions: = [
rvfoSaveBinary,
rvfoSaveTextStyles,
rvfoSaveParaStyles,
rvfoSaveDocProperties,
rvfoLoadDocProperties
];
Code: Select all
Self.Editor.SRichViewEdit1.OnRVFPictureNeeded: = RV_UtilLT.DummySRV.LTPictureNeeded;
Code: Select all
rv.Clear;
TempStream: = TClientBlobStream.Create (Fld, bmRead);
try
Result: = rv.LoadRVFFromStream (TempStream);
Finally
TempStream.Free;
End;
Code: Select all
Self.SRichViewEdit1.SubDocuments [srvhftFirstPageHeader] .Clear;
LoadRVE_FromFieldCDS (
Self.SRichViewEdit1.SubDocuments [srvhftFirstPageHeader],
Self.DM_Esc.hfpTextCart
); // HfpTextCart is a TBlobField
srvhftFirstPageFooter
srvhftNormalFooter
srvhftNormalHeader
The LoadRVE_FromFieldCDS Function is
Code: Select all
Function LoadRVE_FromFieldCDS (rv: TCustomRVData;
Fld: TBlobField): Boolean;
var
TempStream: TClientBlobStream;
Color: Tcolor;
begin
TempStream: = TClientBlobStream.Create (Fld, bmRead);
try
Result: = rv.LoadRVFFromStream (TempStream, Color, nil, nil, nil, nil);
Finally
TempStream.Free;
End;
end;
Subdocuments of the first page are not seen, nor their text and your pictures
Subdocuments of the following pages (srvhftNormalFooter and srvhftNormalHeader) can be partially seen: its height is not correct until double-click.
Subdocuments of the first page appear only when I double-click the header or footer of the first page.
Another very similiar use Form behaves correctly (subdocuments shows correctly in the first page), the same TFrame. But I cannot to realize what is the difference, what I do wrong. My project (my application) is large and complex and it is very difficult to isolate the conditions to reproduce the problem in another project. Maybe you can give me some idea. If you need me to give them more information about my problem I will
I appreciate any clue that they can give.
Thanks for readme