ReadOnlyOnMerge

説明

フィールドに対して ReadOnly フラグの設定を変更します。ファイルの結合時に SetFormFieldData で明示的に設定されなかったフィールドを対象にします。

戻り値の型

Long

構文

object.ReadOnlyOnMerge = value

ReadOnlyOnMerge プロパティは次のパラメータから構成されています。

パラメータ

値の型

説明

Object

 

Toolkit オブジェクト

Value

Long

1 = デフォルトの ReadOnly の動作を保持

 

 

0 = デフォルトの ReadOnly の動作を無効

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

Set TK = CreateObject("APToolkit.Object")

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

'InputFile with FormFields

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

TK.ReadOnlyOnMerge = True

MsgBox "Fields will be read only"

If (TK.InputCanEdit) Then

TK.ReadOnlyOnMerge = False

MsgBox "Input can edit!Let's keep the fields"

editable ""

End If

r = TK.CopyForm(0, 0)

TK.CloseOutputFile

Set TK = Nothing