ResetFormFields

説明

すべてのフォーム フィールドをデフォルト値にリセットします。CopyForm メソッドの後に ResetFormFields を呼び出して、SetFormFieldData メソッドを使用したフォーム フィールドの追加入力に備えます。

戻り値の型

なし

構文

object.ResetFormFields

ResetFormFields メソッドは次のパラメータから構成されています。

例

strPath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".") & "\"

Set TK = CreateObject("APToolkit.Object")

r = TK.OpenOutputFile("Output.pdf")

r = TK.OpenInputFile("Input.pdf")

'sets the font to be used when

'SetFormFieldData flattens a field

TK.SetFlattenedFont "Helvetica", 15

'This Prevents overwriting of data by

'assigning unique form names

TK.FormNumbering = 1

For i = 1 To 10

'Generates 10 pages from the Template

'-998 flattens the fields

TK.SetFormFieldData "text", "activePDF", -998

TK.SetFormFieldData "image", "MyJPEG.jpg" & i, -995

TK.SetFormFieldData "picture", "MEMORY", -995

'Copies the input to output and implements changes

r = TK.CopyForm(0, 0)

'Resets the form fields to be

'written in again

TK.ResetFormFields

Next

TK.CloseOutputFile

Set TK = Nothing