Pinting Table differs with Screen Resolution

jhonalone · Post by **jhonalone** » Tue Apr 05, 2011 9:07 am

I have created a 8 fil by 3 col thaat fill a Din A-4 paper on a PC at 800x600 resolution pixels. I've a image and text on each cell.

When I print table, it perfectly fills a Din A-4 page. All Right.

But when I try to print on another PC with 1280x800 there are two problems:

1.- Width is well, but Height is small.

2.- Images are too smallst.

Code: Select all

for r := 0 to table.Rows.Count-1 do
    for c := 0 to table.Rows[r].Count-1
    do begin
       table.Cells[r,c].BestWidth := AnchCols;
       table.Cells[r,c].BestHeight := AltFilas;
       table.SetCellVisibleBorders(False, False, False, False,r,c);
       table.SetCellVAlign(rvcMiddle,r,c); ///(rvcTop,  rvcMiddle, rvcBottom)
       end;

I'm using 1.9.48 version.

There is a Solution for this?
Many Thanks

Post by **Sergey Tkachenko** » Tue Apr 05, 2011 11:45 am

In TRichView versions prior to 13, sizes of objects like images are measured in "screen pixels". So, when printing, the size of images depends on the screen resolution, because it is calculated as
printing_width = original_width * printer_resolution / screen_resolution.
To make the results independent from the screen resolution, assign RichViewPixelsPerInch variable = 96.

PS: still, TRichViewEdit was not designed for WYSIWYG printing; it is implemented in ScaleRichView

jhonalone · Post by **jhonalone** » Tue Apr 05, 2011 12:33 pm

Sorry, I just posted a new post with more information.
But in the same PC, when change resolution, printing do not change.

jhonalone · Post by **jhonalone** » Tue Apr 05, 2011 1:02 pm

How can I change "RichViewPixelsPerInch variable = 96"? Please.

jhonalone · Post by **jhonalone** » Tue Apr 05, 2011 2:36 pm

Excuse me. I just found RichViewPixelsPerInch into Unit RVFuncs.
I'll try it now.
Best Regards Sergey, and thank you very much.

jhonalone · Post by **jhonalone** » Tue Apr 05, 2011 3:21 pm

Now all is OK.
Thanks.