説明
MergeFile および CopyForm に適用するすべてのページに出力する複数行のテキスト文字列を指定します。
戻り値の型
なし
構文
object.SetHeaderMultilineText FontName, FontSize, X, Y, Width, Height, Text, Alignment
SetHeaderMultilineText メソッドは次のパラメータから構成されています。
|
パラメータ |
値の型 |
説明 |
|
Object |
|
Toolkit オブジェクト |
|
FontName |
String |
使用するフォント |
|
FontSize |
Float |
フォントのサイズ 自動サイズのテキストを使用する場合、負の値を指定して最大フォント サイズを設定します。 |
|
X |
Float |
テキスト 1 行目の右下 X 座標。PDF 座標で指定します。 |
|
Y |
Float |
テキスト 1 行目の右下 Y 座標。PDF 座標で指定します。 |
|
Width |
Float |
テキストを出力するボックスの幅。PDF の表示単位で指定します。 |
|
Height |
Float |
テキストを出力するボックスの高さ。PDF の表示単位で指定します。 |
|
Text |
String |
出力するテキスト |
|
Alignment |
Short |
テキストの位置合わせ |
|
|
|
0 = 左揃え (デフォルト) |
|
|
|
1 = 中央揃え |
|
|
|
2 = 右揃え |
例
strPath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".") & "\"
Set TK = CreateObject("APToolkit.Object")
r = TK.OpenOutputFile("Output.pdf")
r = TK.OpenInputFile("Input.pdf")
strEx = "Leading the i-Paper revolution"
For i = 1 To 400
strEx = strEx & " toolkit "
Next
TK.SetHeaderMultilineText "Helvetica", 15, 0, 750, 612, 850, strEx, 3
r = TK.CopyForm(0, 0)
TK.CloseOutputFile
Set TK = Nothing