TRichView.com

ok, in fact BestWidth is set to 1, and the text paragraph has the option rvpaoNoWrap
what confuse me, is that TRichViewEdit split the line anyway...so I expected to have the same effect when printing.

Hello,

on a RichView, the customer create a document with a specif tag. This tag is replaced by a Table width some information (the 3rd column on the pictture)

in the RichvView editor everything seems ok with "GUILLAUME" on a second line so the table do not overflow the document width, but in ...

hum...I've removed part of my patch and it works better

with just

hum...it seems that LinearToRichView is the source of the pb

my patch was to avoid a second call when the last computed value is known but it doesn't work anymore

[DRAGON] WM_GETTEXTLENGTH 0, 0 : 570
[DRAGON] WM_GETTEXT 571, 1697724 : 570
[DRAGON] WM_GETTEXT 1082, 1697724 : 570
[DRAGON] WM_PAINT ...

damned ! the flickering is back :/ since I've updated to last version of RV (from an old version)

I have to dig into the methods...

when Dragon Medical One is active I have this messages permanently

procedure TRichViewEdit.WndProc(var Msg: TMessage);
begin
{
[DRAGON] EM_POSFROMCHAR 463, 0 ...

I don"t use backgrounds...is that correct to add a "FParaStyle := nil" after "FDrawITem := nil" at the end of DrawPage ? because it fix the problem.

No :)

I have the same bug when saving to a PDF with this code
procedure TRVPrint.SaveAsPDF(const AFileName: string);
begin
var Doc := LLPDFDocument.TPDFDocument.Create(nil);
Doc.PDFACompatible := True;
Doc.FileName := UniqueFileName(AFileName);
Doc.BeginDoc;

VirtualPrinter.Active := True ...

yep I have probably missed something in my patch (taken from an old RV version), when I use the VirtualPrinter everything is right.

Thanks

ok

pi is FParaStyle and pi.ClassName returns TIBCParam !!!

is see that FParaStyle is "valid only in DrawPage"...but it point to something completly out of scope (IBDAC SQL Parameter)

maybe it's one of my patches that does this...but I do not change anything in the para styles

I'll revert my ...

Hello,

I have a strange bug on some PC in a unknown but reproductible situation in TRVHeaderFooterRVData.DrawBackToBitmap

when I print a document, "pi.Background" is null,

you test for instance "(pi <> nil) and (pi.Background.Color..", I have to add "(pi <> nil) and (pi.Background <> nil) and ...

OK, you're right, I don't have those problems with llPDFDocument

OK, it way easier with VirtualPrinter ^^

but I can show some problems PDF.zip

by default, the footer display "Page 1 /1" with a space before the "/", and if you set PageNoFromNumber to 100 the text override the /

if you change one of the checkbox the page numbers are scaled to fit the orginal ...

ok , in this case I use 4 TRichView, 1 RVStyle and a RVPrint


// Dispatch
RVStyle.TextEngine := rvteWindows;
RVPrint.TitlePage := True;
RVPrint.SetHeader(RVHeader.RVData, TRVHFType.rvhftFirstPage);
RVPrint.SetFooter(RVFooter.RVData, TRVHFType.rvhftFirstPage);
RVPrint.SetHeader(RVHeader2 ...

ok , in this case I use 4 TRichView, 1 RVStyle and a RVPrint


// Dispatch
RVStyle.TextEngine := rvteWindows;
RVPrint.TitlePage := True;
RVPrint.SetHeader(RVHeader.RVData, TRVHFType.rvhftFirstPage);
RVPrint.SetFooter(RVFooter.RVData, TRVHFType.rvhftFirstPage);
RVPrint.SetHeader(RVHeader2 ...

Arial, has you can see in the code.

but I think it is related also to MetafileCompatibility

I have another pb when this option is not set, if I put underlined text and normal text on the same line, the space between the two items is not visible

AddNL('some text', NormalText, ParaNo)
AddNL ...