I need help - I can help - NewOutline is error!

Print Page | Close Window

NewOutline is error!

Printed From: Debenu Quick PDF Library - PDF SDK Community Forum
Category: For Users of the Library
Forum Name: I need help - I can help
Forum Description: Problems and solutions while programming with the Debenu Quick PDF Library and Debenu PDF Viewer SDK
URL: http://www.quickpdf.org/forum/forum_posts.asp?TID=2021
Printed Date: 28 Nov 24 at 7:26AM
Software Version: Web Wiz Forums 11.01 - http://www.webwizforums.com

Topic: NewOutline is error!

Posted By: mjohn
Subject: NewOutline is error!
Date 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

.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!

Replies:

Posted By: mjohn
Date Posted: 01 Nov 11 at 2:52PM

I can do it now.

This is my mistake

Thanks!