|
|
 |
ditte$2007039 ditte
04/18/2007 :: 14:50
Registered
| | Hi,
I like to print a pdf document in original size.
It isn´t a problem. I use the procedure you can see.
But if I change the PdfDirRendering at runtime and like to print, the result is a big picture. So I thought to set it back to
PdfDirRendering 100 (it works I can see it in the debugger).
But The result is big picture?
Where is my mistake?
Regards Dittmar
Procedure gdprint string printername
Boolean Lb_ok
Integer li_frame
Integer li_is
Integer li_page
Integer li_dpi
get ComPdfDpiRendering to li_dpi //current dpi
Get ComPrintSetActivePrinter printername to lb_ok
Get ComGetTotalFrame to li_frame //how many frames
If (li_frame gt 1) Begin
Get ComDisplayFirstFrame to li_is
Move 1 to li_page
While (li_page le li_frame)
set ComPdfDpiRendering to 100
Send ComPrintImage
get ComDisplayNextFrame to li_is
Move (li_page+1) to li_page
Loop
End
else begin
set ComPdfDpiRendering to 100
Send ComPrintImage
end
set ComPdfDpiRendering to li_dpi //set back old dpi
end_procedure
| |
|
Loïc$2006306 Loïc
04/19/2007 :: 12:14
Registered
| | Hi Dittmar.
I've solved your problem.
You can download the last beta release here: http://www.gdpicture.com/ressources/betas/
Best regards,
Loïc | |
|
Ditte$2007039 Ditte
04/19/2007 :: 17:36
Registered
| | Hi Loïc,
with tho code above I get 3 pages from (realy 2).
The first one is also big the next one is ok.
I´ve changed the code and set the
> set ComPdfDpiRendering to 100
> Get ComGetTotalFrame to li_frame //how many frames
So get I the right number of pages, but the first side is to big.
I see only a little corner on the page.
Regards Dittmar | |
|
Loïc$2006306 Loïc
04/19/2007 :: 18:03
Registered
| | Dittmar, your procedure is invalid.
Use this one:
Procedure gdprint string printername
Boolean Lb_ok
Integer li_frame
Integer li_is
Integer li_page
Integer li_dpi
get ComPdfDpiRendering to li_dpi //current dpi
Get ComPrintSetActivePrinter printername to lb_ok
Get ComGetTotalFrame to li_frame //how many frames
set ComPdfDpiRendering to 100
Send PrintSetFromToPage 1, li_frame
Send ComPrintImage
set ComPdfDpiRendering to li_dpi //set back old dpi
end_procedure
Regards,
Loïc | |
|
Loïc$2006306 Loïc
04/19/2007 :: 18:28
Registered
| | Dittmar, there was an error into the last beta too.
Please update another time here:
http://www.gdpicture.com/ressources/betas/
It will works now 
Best regards,
Loïc Carrère | |
|
Ditte$2007039 Ditte
04/19/2007 :: 18:50
Registered
| | Hi Loïc,
perfect.
Regards Dittmar
| |