export tprintpreview to pdf

matijsmoest · Member Joined: 18 Feb 2004 Posts: 4

I want to export de printpreview to a pdf-file.
I have an lib to write on the canvas of a pdf-file.

But the resolution of the printpreview is a lot bigger as a pdf file.

Is there some way to scale the canvas or first export is to an image.....

Johnny_Bit · Moderator Joined: 15 Jun 2003 Posts: 122

heh.. i usually use wn2pdf ghostprinter, but if you have lib, then maybe it's some way restricted to low resolution? (i can print on it with really high resolution)

matijsmoest · Member Joined: 18 Feb 2004 Posts: 4

this is solution!

but I want to have everything in my own application.
now I have a resolution of 21000*29700 with tprintpreview.

when i write the canvas of tprintpreview on a canvas of a pdf-file I see nothing. If I'm lucky the topleft of the border.

does anybody have experience with this problem?

Johnny_Bit · Moderator Joined: 15 Jun 2003 Posts: 122

try to lower units (ex. from HiMetric to LoMetric).

Kambiz · Administrator Joined: 07 Mar 2003 Posts: 314

How do you print the preview as PDF, using metafiles or direct print?

matijsmoest · Member Joined: 18 Feb 2004 Posts: 4

Via Metafiles..

Kambiz · Administrator Joined: 07 Mar 2003 Posts: 314

PrintPreview's metafiles are in screen resolution, however if you stretch them on the target area, there should not be any problem.

matijsmoest · Member Joined: 18 Feb 2004 Posts: 4

expbmp := TBitMap.Create;
expbmp.Width:=2100;
expbmp.Height:=2970;

Windows.PlayEnhMetaFile( expbmp.Canvas.Handle,
PrintPreview1.Pages[ 1 ].Handle,
Rect( 100, 100, 2100, 2970 ) );

This works