It is currently Sat Dec 07, 2019 7:07 am

All times are UTC + 1 hour




Post new topic Reply to topic  [ 47 posts ]  Go to page Previous  1, 2, 3, 4  Next
Author Message
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Thu Jun 27, 2019 12:12 pm 
Offline
Addict
Addict
User avatar

Joined: Sat Apr 26, 2003 2:15 pm
Posts: 841
Location: Cuernavaca, Mexico
Thanks Thorsten,

I'm struggling to find out why "pbPDF-Watermark.pb" does NOT display the watermark, when I run the program.

Latest Win 10 Pro and PB 5.71 B2 (x86).

Tried 3 different PDF viewers, in case they might be the issue.

Perhaps you have an idea? :?:

_________________
- It was too lonely at the top.

Current Machine: Win 10 Pro 64-bit, Dual Xeon E5-2670, 64 gigs ram, Geforce GTX 1660 Ti w/6 gigs ram


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Thu Jun 27, 2019 12:52 pm 
Offline
Addict
Addict
User avatar

Joined: Wed Aug 24, 2005 4:02 pm
Posts: 1023
Location: Germany
BugFix: pbPDF-Watermark.pb

_________________
Sorry for my English. My language is German.
(Translated with http://www.DeepL.com/Translator)

Download of PureBasic - Modules

[Windows 10 x64] [PB V5.7x]


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Thu Jun 27, 2019 12:56 pm 
Offline
Addict
Addict
User avatar

Joined: Sat Apr 26, 2003 2:15 pm
Posts: 841
Location: Cuernavaca, Mexico
Thanks Thorsten, it's appreciated. 8)

_________________
- It was too lonely at the top.

Current Machine: Win 10 Pro 64-bit, Dual Xeon E5-2670, 64 gigs ram, Geforce GTX 1660 Ti w/6 gigs ram


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Fri Aug 09, 2019 4:05 pm 
Offline
PureBasic Expert
PureBasic Expert
User avatar

Joined: Fri Apr 25, 2003 4:34 pm
Posts: 918
Location: Canada
Very nice Module.

Would you be able to give a small example of how to properly use PDF::ImageMemory with PNG image that is included in a file?
My attempts just crash on line 2284 with "MemoryID is not valid"

_________________
Image Image


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Sun Aug 11, 2019 4:48 pm 
Offline
Addict
Addict
User avatar

Joined: Wed Aug 24, 2005 4:02 pm
Posts: 1023
Location: Germany
I tested that.
Apparently there is only the image content in the memory and not the header.
Unfortunately it is not possible to evaluate the header and insert the image into the PDF.

_________________
Sorry for my English. My language is German.
(Translated with http://www.DeepL.com/Translator)

Download of PureBasic - Modules

[Windows 10 x64] [PB V5.7x]


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Sun Aug 11, 2019 7:52 pm 
Offline
PureBasic Expert
PureBasic Expert
User avatar

Joined: Fri Apr 25, 2003 4:34 pm
Posts: 918
Location: Canada
Ok, so PDF::ImageMemory doesn't work :(

I then tried with PDF::Image and unfortunately that also causes problems.
If I have an image in a header and there is more that 1 page in the PDF, the PDF that is generated is corrupt.
(I can view the first page but if I scroll to the second page Adobe Reader gives error)

Try this code with an image of your choice...
Code:
#PDF=1
pdf$="test.pdf"
XIncludeFile "pbPDFModule.pbi"

Procedure Header()
  PDF::Image(#PDF, "logo.jpg",5,8,30,0)
  PDF::SetFont(#PDF, "Arial","B", 16)
  PDF::SetPosY(#PDF, 10)
  PDF::SetPosX(#PDF, 35)
  PDF::Cell(#PDF, "Test Page", 100, 16)     
  PDF::Ln(#PDF, 20)       
EndProcedure


If PDF::Create(#PDF,PDF::#Landscape,"mm",PDF::#Format_Letter)
  PDF::SetPageCompression(#PDF, #True)
  PDF::SetViewerPreferences(#PDF, PDF::#FitWindow)

  PDF::SetHeaderProcedure(#PDF,@Header())
  PDF::Enableheader(#PDF, #True) 
  PDF::AddPage(#PDF)
 
  For tmp=1 To 60
    PDF::Cell(#PDF, "This is a test"+Str(tmp), 100, 5, #False)
    PDF::Ln(#PDF)                               
  Next
       
  PDF::Close(#PDF, pdf$)   
  RunProgram(pdf$)
EndIf

_________________
Image Image


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Sat Aug 24, 2019 11:16 pm 
Offline
PureBasic Expert
PureBasic Expert
User avatar

Joined: Fri Apr 25, 2003 4:34 pm
Posts: 918
Location: Canada
Thorsten, would you be able to take a look at this?
This module would be very useful if you could get images in the header working properly.

_________________
Image Image


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Sat Aug 24, 2019 11:46 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Sat Jul 23, 2011 1:13 am
Posts: 221
Location: Germany
Wow.
This is going to be a bunch of work to learn all these new commands, but this is 100x better than trying to create a PDF from scratch.
Thanks a TON for this Module!!! :)


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Mon Aug 26, 2019 10:42 am 
Offline
Addict
Addict
User avatar

Joined: Wed Aug 24, 2005 4:02 pm
Posts: 1023
Location: Germany
Paul wrote:
I then tried with PDF::Image and unfortunately that also causes problems.
If I have an image in a header and there is more that 1 page in the PDF, the PDF that is generated is corrupt.
(I can view the first page but if I scroll to the second page Adobe Reader gives error)

It was a little complicated to find the bug, but here it is:

Code:
11 0 obj
<</Length 359>>
stream
2 J
0.57 w
BT /F2 12.00 Tf ET
q 85.04 0 0 NaN 14.17 NaN cm /I1 Do Q
BT /F1 16.00 Tf ET
BT 102.05 556.18 Td (Test Page) Tj ET
BT /F2 12.00 Tf ET
BT 31.18 516.27 Td (This is a test1) Tj ET
endstream
endobj


Bugfix: PDF::Image()

_________________
Sorry for my English. My language is German.
(Translated with http://www.DeepL.com/Translator)

Download of PureBasic - Modules

[Windows 10 x64] [PB V5.7x]


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Mon Dec 02, 2019 12:16 pm 
Offline
User
User

Joined: Fri Dec 06, 2013 11:57 am
Posts: 15
Thanks a lot for this module.

I found two small bugs in update from 11.11.2019:

[COMPILER] Zeile 572: Constant already declared with a different value: #Version.
->#Version is declared in line 190 and again in 572, PB doesn't like this

Line 393: #Format_SRA0 = "2551.18,3628.35)"
->There is a ) where I think it shouldn't be


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Tue Dec 03, 2019 2:27 pm 
Offline
Addict
Addict
User avatar

Joined: Wed Aug 24, 2005 4:02 pm
Posts: 1023
Location: Germany
Fixed

_________________
Sorry for my English. My language is German.
(Translated with http://www.DeepL.com/Translator)

Download of PureBasic - Modules

[Windows 10 x64] [PB V5.7x]


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Tue Dec 03, 2019 7:36 pm 
Offline
User
User

Joined: Thu Sep 30, 2010 6:40 am
Posts: 64
I found another bug: if you encypt the PDF, images do not appear in PDF
To reproduce, please use the modified sample code below:

TX, Oliver

Code:
XIncludeFile "..\pbPDFModule.pbi"

Define LinkID.i, File$ = "pbPDF-Images.pdf"

#PDF = 1

If PDF::Create(#PDF)
 
  PDF::AddPage(#PDF)
 
  LinkID = PDF::AddLinkURL(#PDF, "https://www.purebasic.com/")
 
  PDF::Image(#PDF, "PureBasic.png", 10,  10, 30, 0, LinkID)
  PDF::Image(#PDF, "PureBasic.jpg", 10, 110, 60, 0, LinkID)
  PDF::Image(#PDF, "PureBasic.jp2", 10, 210, 80, 0, LinkID)
  PDF::SetEncryption(#PDF,"test1","test",#False) ; if removed, images do appear
  PDF::Close(#PDF, File$)
EndIf

RunProgram(File$)


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Tue Dec 03, 2019 11:32 pm 
Offline
Enthusiast
Enthusiast

Joined: Fri Apr 20, 2012 8:09 pm
Posts: 288
@Thorsten1867, I wish you would share the secret in how you find time to work in all your great modules.

@Oliver13 [edit] Encryption might work,
I just figured it didn't since there was an error on a single line of text PDF which I encrypted,
but it turns out you get an error on non-encrypted PDFs: "invalid xref table"

The URL links for images cannot be reused so once you attach "LinkID" to the first image, the link is gone.
You can create the URL link and add it at the same time:
Code:
XIncludeFile "..\pbPDFModule.pbi"

Define LinkID.i, LinkURL.i, File$ = "pbPDF-Images.pdf"

#PDF = 1

If PDF::Create(#PDF)
 
  PDF::AddPage(#PDF)
 
  LinkURL =  "https://www.purebasic.com/"
  LinkID = PDF::AddLinkURL(#PDF, "https://www.purebasic.com/")
 
  PDF::Image(#PDF, "purebasic.png", 10,  10, 30, 0, LinkID)
  PDF::Image(#PDF, "PureBasic.jpg", 10, 110, 60, 0, PDF::AddLinkURL(#PDF, LinkURL))
  PDF::Image(#PDF, "PureBasic.jp2", 10, 210, 80, 0, PDF::AddLinkURL(#PDF, LinkURL))
  PDF::EmbedFont(#PDF, "l_10646.ttf", "LucidaSans", "", PDF::#Unicode)
  PDF::SetFont(#PDF, "LucidaSans", "", 14)
  PDF::PlaceText(#PDF, "This is an embedded Unicode-font (LucidaSans)", 20, 50)
;  PDF::SetEncryption(#PDF,"test1","test",#False) ; if removed, images do appear
  PDF::Close(#PDF, File$)
EndIf

RunProgram(File$)


Norm.

_________________
google Translate;Makes my jokes fall flat- Fait mes blagues tombent à plat- Machte meine Witze verpuffen- Eh cumpari ci vo sunari


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Wed Dec 04, 2019 7:38 am 
Offline
User
User

Joined: Thu Sep 30, 2010 6:40 am
Posts: 64
normeus wrote:
Encryption might work,
I just figured it didn't since there was an error on a single line of text PDF which I encrypted,
but it turns out you get an error on non-encrypted PDFs: "invalid xref table"

The URL links for images cannot be reused so once you attach "LinkID" to the first image, the link is gone.


Hi Norm., thank you, but regrettably this does not help either. Even if you remove all of the links, the images will not appear in the encrypted PDF.

Code:
XIncludeFile "..\pbPDFModule.pbi"

Define LinkID.i, File$ = "pbPDF-Images.pdf"

#PDF = 1

If PDF::Create(#PDF)
 
  PDF::AddPage(#PDF)
 
 ; LinkID = PDF::AddLinkURL(#PDF, "https://www.purebasic.com/")
 
  PDF::Image(#PDF, "PureBasic.png", 10,  10, 30, 0)
  PDF::Image(#PDF, "PureBasic.jpg", 10, 110, 60, 0)
  PDF::Image(#PDF, "PureBasic.jp2", 10, 210, 80, 0)
  PDF::SetEncryption(#PDF,"test","test",#False)
 
  PDF::Close(#PDF, File$)
EndIf

RunProgram(File$) ;- PDF is encrypted, but does not show images



Oliver


Top
 Profile  
Reply with quote  
 Post subject: Re: [Module] pbPDF-Module
PostPosted: Thu Dec 05, 2019 3:19 am 
Offline
Enthusiast
Enthusiast

Joined: Fri Apr 20, 2012 8:09 pm
Posts: 288
Oliver,
sorry my post was confusing, I just pointed out how "AddLinkURL" currently works.
nothing to do with the encryption problem.

for the encryption problem, it turns out that images are not being encrypted.
@Thorsten1867 probably just forgot to add a "#objMemory" test somewhere to encrypt images.
The PDF reader tries to change the Image which needs no changing and images don't display.



Norm.

_________________
google Translate;Makes my jokes fall flat- Fait mes blagues tombent à plat- Machte meine Witze verpuffen- Eh cumpari ci vo sunari


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 47 posts ]  Go to page Previous  1, 2, 3, 4  Next

All times are UTC + 1 hour


Who is online

Users browsing this forum: No registered users and 3 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  

 


Powered by phpBB © 2008 phpBB Group
subSilver+ theme by Canver Software, sponsor Sanal Modifiye