How to increase or decrease the size of a pdf file

Hi Alfs!

Yes... That's possible.
The easiest way is going through the pages rendering them
with different dpi-values to stream (pdf pages to image ) and
back (image to pdf pages) to new pdf-pages.

var Test_Stream : Tmemorystream;
    jpg         : TJPEGImage;
begin

// . . .

QP := TDebenuPDFLibrary0913.Create;
Try
// . . .
QP.LoadFromFile(Edit1.text, '');
// . . .
// here you can deal with the zoom-value to
// increase/decrease the image and later the
// new pdf-page(s)
QP.RenderPageToStream(zoom,1,1,test_stream);
// . . .
Finally
QP.Free;
End;

// . . .


// now use the AddImageFrom-functions ...
//  ... and draw the image into a new pdf.

// . . .

Cheers and welcome here,
Ingo

Hi!

Your first post and then immediately absolute heavy stuff ;-)
You have to extract all objects of the page (text, images, ...)
resize them all drawing them at last to a new page.
If i want it ... I wouldn't do it ... ;-)
My render-idea is to avoid all these problems and in the end
you have a new pdf... and that counts ;-)

Cheers, Ingo