説明
既存の PDF のページへリンクするしおりを追加します。
戻り値の型
なし
構文
object.AddInternalLinkBookmark BookmarkText, DestPage, X, Y
AddInternalLinkBookmark メソッドは次のパラメータから構成されています。
|
パラメータ |
値の型 |
説明 |
|
Object |
|
Toolkit オブジェクト |
|
BookmarkText |
String |
追加するしおりのテキスト |
|
DestPage |
Long |
リンク先のぺージ番号 |
|
x |
Short |
リンク先の X 座標。PDF 座標で指定します。 |
|
Y |
Short |
リンク先の Y 座標。PDF 座標で指定します。 |
例
strPath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".") & "\"
Set TK = CreateObject("APToolkit.Object")
r = TK.OpenOutputFile("Output.pdf")
TK.SetFont "Helvetica", 15
TK.PrintText 72, 72, "This will generate a page"
intPage = 2
TK.AddInternalLinkBookmark "Goto Page" & intPage, intPage, 0, 0
TK.NewPage
TK.SetFont "Helvetica", 15
TK.PrintText 72, 72, "Bookmark me!"
r = TK.CopyForm(0, 0)
TK.CloseOutputFile
Set TK = Nothing