Do you own a Debenu Quick PDF Library version 7, 8, 9, 10, 11, 12, 13 or iSEDQuickPDF license? Upgrade to Debenu Quick PDF Library 14 today!
NewOutline is error! |
Post Reply |
Author | |
mjohn
Beginner Joined: 28 Oct 11 Location: ?? Status: Offline Points: 16 |
Post Options
Thanks(0)
Posted: 28 Oct 11 at 6:53PM |
///////////////////////////////////////////////////////// With pdflibrary lngDoc = .NewDocument For i = 1 To 10 If i > 1 Then .NewPage .NewOutline 0, App.path & "\" & Format(i, "00000#") & ".tif", .SelectedPage - 1, 0 //error whether use .SelectedPage - 1 or use .SelectedPage .AddImageFromFile App.path & "\" & Format(i, "00000#") & ".tif", 0 .SetPageDimensions .ImageWidth, .ImageHeight .drawImage 0, .pageHeight, .ImageWidth, .ImageHeight Next .SaveToFile App.path & "\1.pdf " .RemoveDocument lngDoc End With ///////////////////////////////////////////////////////// Above code 1. if I use .SelectedPage, then the outline will link to the next page what i want, I want it link to the 1st page ,but it link to 2nd page. 2. if I use .SelectedPage-1, then the first outline will error, the other outline will be fine. So how can i add 10 images and create 10 outline to link to them? Thanks! |
|
mjohn
Beginner Joined: 28 Oct 11 Location: ?? Status: Offline Points: 16 |
Post Options
Thanks(0)
|
I can do it now.
This is my mistake Thanks!
|
|
Post Reply | |
Tweet
|
Forum Jump | Forum Permissions You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |
Copyright © 2017 Debenu. Debenu Quick PDF Library is a PDF SDK. All rights reserved. About — Contact — Blog — Support — Online Store