RBSupport,ReportBuilder, TppDBWPTRichText and Courier New 11

golemsoftware

In ReportBuilder the new TppDBWPTRichText component does'n't perfectly show the "courier new" font with 11px size.
Characters are superimposed.
Using courier new 10px size, text is shown good.

waiting for a solution.

support

Hi,

Windows usually uses a font with an approximated height. I assumje the ffect has to do with that. We cannot change the behavior.

Julian

golemsoftware

Why TppDBWPTRichText doesn't work while TppWPTRichText does?
I sent email with pictures.

golemsoftware

the problem does not occur with this change:

in unit ppWPTools.pas

in TppCustomWPTRichText.SetRichText(Value: string) method

I replaced

Code

FPaintEngine.Reformat;

with

Code

if FPaintEngine.RTFData <> nil then
  begin
    //FPaintEngine.Memo.DisplayedText := FPaintEngine.RTFData.Get(wpIsBody, wpraOnAllPages);
    FPaintEngine.Memo.ReformatAll(false);
    FPaintEngine.Memo.InitializePaintPages;
    FPaintEngine.Memo.PaintPageCount;
  end;

basically the Reformat implementation without this line
FPaintEngine.Memo.DisplayedText := FPaintEngine.RTFData.Get(wpIsBody, wpraOnAllPages);

please fix your source code

Best Regards
Matteo