Unit PDFlibActiveX;

{$I ..\Lib\PDFlibDefines.inc}

Interface

Uses
{$IFNDEF XE2+}
  Windows,
  ComObj,
  StdVcl,
  ActiveX,
  AxCtrls,
{$ELSE}
  Winapi.Windows,
  System.Win.ComObj,
  System.Win.StdVcl,
  Winapi.ActiveX,
  Vcl.AxCtrls,
{$ENDIF}
  PDFlibrary,
  PDFlibAX_TLB;

Type
  TPDFlibrary = Class(TAutoObject, IPDFlibrary)
  Private
    PDFlib: TPDFlib;
  Protected
    Function AddArcToPath(CenterX, CenterY, TotalAngle: Double): Integer; Safecall;
    Function AddBoxToPath(Left, Top, Width, Height: Double): Integer; Safecall;
    Function AddCJKFont(CJKFontID: Integer): Integer; Safecall;
    Function AddCurveToPath(CtAX, CtAY, CtBX, CtBY, EndX, EndY: Double): Integer; Safecall;
    Function AddEmbeddedFile(Const FileName, MIMEType: WideString): Integer; Safecall;
    Function AddFileAttachment(Const Title: WideString; EmbeddedFileID: Integer): Integer; Safecall;
    Function AddFormFieldChoiceSub(Index: Integer; Const SubName, DisplayName: WideString): Integer; Safecall;
    Function AddFormFieldSub(Index: Integer; Const SubName: WideString): Integer; Safecall;
    Function AddFormFont(FontID: Integer): Integer; Safecall;
    Function AddFreeTextAnnotation(Left, Top, Width, Height: Double; Const Text: WideString; Angle, Options: Integer): Integer; Safecall;
    Function AddFreeTextAnnotationEx(Left, Top, Width, Height: Double; Const Text: WideString; Angle, Options, Transparency: Integer): Integer; Safecall;
    Function AddGlobalJavaScript(Const PackageName, JavaScript: WideString): Integer; Safecall;
    Function AddImageFromFile(Const FileName: WideString; Options: Integer): Integer; Safecall;
    Function AddImageFromFileOffset(Const FileName: WideString; Offset, DataLength, Options: Integer): Integer; Safecall;
    Function AddImageFromVariant(SourceData: Olevariant; Options: Integer): Integer; Safecall;
    Function AddLGIDictToPage(Const DictContent: WideString): Integer; Safecall;
    Function AddLineToPath(EndX, EndY: Double): Integer; Safecall;
    Function AddLinkToDestination(Left, Top, Width, Height: Double; DestID, Options: Integer): Integer; Safecall;
    Function AddLinkToEmbeddedFile(Left, Top, Width, Height: Double; EmbeddedFileID: Integer; Const Title, Contents: WideString; IconType, Transpareny: Integer)
      : Integer; Safecall;
    Function AddLinkToFile(Left, Top, Width, Height: Double; Const FileName: WideString; Page: Integer; Position: Double; NewWindow, Options: Integer)
      : Integer; Safecall;
    Function AddLinkToFileDest(Left, Top, Width, Height: Double; Const FileName, NamedDest: WideString; Position: Double; NewWindow, Options: Integer)
      : Integer; Safecall;
    Function AddLinkToFileEx(Left, Top, Width, Height: Double; Const FileName: WideString; DestPage, NewWindow, Options, Zoom, DestType: Integer;
      DestLeft, DestTop, DestRight, DestBottom: Double): Integer; Safecall;
    Function AddLinkToJavaScript(Left, Top, Width, Height: Double; Const JavaScript: WideString; Options: Integer): Integer; Safecall;
    Function AddLinkToLocalFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer; Safecall;
    Function AddLinkToPage(Left, Top, Width, Height: Double; Page: Integer; Position: Double; Options: Integer): Integer; Safecall;
    Function AddLinkToWeb(Left, Top, Width, Height: Double; Const Link: WideString; Options: Integer): Integer; Safecall;
    Function AddNoteAnnotation(Left, Top: Double; AnnotType: Integer; PopupLeft, PopupTop, PopupWidth, PopupHeight: Double; Const Title, Contents: WideString;
      Red, Green, Blue: Double; Open: Integer): Integer; Safecall;
    Function AddOpenTypeFontFromFile(Const FileName: WideString; Options: Integer): Integer; Safecall;
    Function AddPageLabels(Start, Style, Offset: Integer; Const Prefix: WideString): Integer; Safecall;
    Function AddPageMatrix(xscale, yscale, xoffset, yoffset: Double): Integer; Safecall;
    Function AddRelativeLinkToFile(Left, Top, Width, Height: Double; Const FileName: WideString; Page: Integer; Position: Double; NewWindow, Options: Integer)
      : Integer; Safecall;
    Function AddRelativeLinkToFileDest(Left, Top, Width, Height: Double; Const FileName, NamedDest: WideString; Position: Double; NewWindow, Options: Integer)
      : Integer; Safecall;
    Function AddRelativeLinkToFileEx(Left, Top, Width, Height: Double; Const FileName: WideString; DestPage, NewWindow, Options, Zoom, DestType: Integer;
      DestLeft, DestTop, DestRight, DestBottom: Double): Integer; Safecall;
    Function AddRelativeLinkToLocalFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer; Safecall;
    Function AddSVGAnnotationFromFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer; Safecall;
    Function AddSWFAnnotationFromFile(Left, Top, Width, Height: Double; Const FileName, Title: WideString; Options: Integer): Integer; Safecall;
    Function AddSeparationColor(Const ColorName: WideString; C, M, Y, K: Double; Options: Integer): Integer; Safecall;
    Function AddStampAnnotation(Left, Top, Width, Height: Double; StampType: Integer; Const Title, Contents: WideString; Red, Green, Blue: Double;
      Options: Integer): Integer; Safecall;
    Function AddStampAnnotationFromImage(Left, Top, Width, Height: Double; Const FileName, Title, Contents: WideString; Red, Green, Blue: Double;
      Options: Integer): Integer; Safecall;
    Function AddStampAnnotationFromImageID(Left, Top, Width, Height: Double; ImageID: Integer; Const Title, Contents: WideString; Red, Green, Blue: Double;
      Options: Integer): Integer; Safecall;
    Function AddStandardFont(StandardFontID: Integer): Integer; Safecall;
    Function AddSubsettedFont(Const FontName: WideString; CharsetIndex: Integer; Const SubsetChars: WideString): Integer; Safecall;
    Function AddTextMarkupAnnotation(MarkupType: Integer; Left, Top, Width, Height: Double): Integer; Safecall;
    Function AddToFileList(Const ListName, FileName: WideString): Integer; Safecall;
    Function AddTrueTypeFont(Const FontName: WideString; Embed: Integer): Integer; Safecall;
    Function AddTrueTypeFontFromFile(Const FileName: WideString): Integer; Safecall;
    Function AddTrueTypeSubsettedFont(Const FontName, SubsetChars: WideString; Options: Integer): Integer; Safecall;
    Function AddType1Font(Const FileName: WideString): Integer; Safecall;
    Function AddU3DAnnotationFromFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer; Safecall;
    Function AnalyseFile(Const InputFileName, Password: WideString): Integer; Safecall;
    Function AnnotationCount: Integer; Safecall;
    Function AppendSpace(RelativeSpace: Double): Integer; Safecall;
    Function AppendTableColumns(TableID, NewColumnCount: Integer): Integer; Safecall;
    Function AppendTableRows(TableID, NewRowCount: Integer): Integer; Safecall;
    Function AppendText(Const Text: WideString): Integer; Safecall;
    Function AppendToFile(Const FileName: WideString): Integer; Safecall;
    Function AppendToVariant(AppendMode: Integer): Olevariant; Safecall;
    Function ApplyStyle(Const StyleName: WideString): Integer; Safecall;
    Function AttachAnnotToForm(Index: Integer): Integer; Safecall;
    Function BalanceContentStream: Integer; Safecall;
    Function BalancePageTree(Options: Integer): Integer; Safecall;
    Function BeginPageUpdate: Integer; Safecall;
    Function CapturePage(Page: Integer): Integer; Safecall;
    Function CapturePageEx(Page, Options: Integer): Integer; Safecall;
    Function CharWidth(CharCode: Integer): Integer; Safecall;
    Function CheckFileCompliance(Const InputFileName, Password: WideString; ComplianceTest, Options: Integer): Integer; Safecall;
    Function CheckObjects: Integer; Safecall;
    Function CheckPageAnnots: Integer; Safecall;
    Function CheckPassword(Const Password: WideString): Integer; Safecall;
    Function ClearFileList(Const ListName: WideString): Integer; Safecall;
    Function ClearImage(ImageID: Integer): Integer; Safecall;
    Function ClearPageLabels: Integer; Safecall;
    Function ClearTextFormatting: Integer; Safecall;
    Function CloneOutlineAction(OutlineID: Integer): Integer; Safecall;
    Function ClonePages(StartPage, EndPage, RepeatCount: Integer): Integer; Safecall;
    Function CloseOutline(OutlineID: Integer): Integer; Safecall;
    Function ClosePath: Integer; Safecall;
    Function CombineContentStreams: Integer; Safecall;
    Function CompareOutlines(FirstOutlineID, SecondOutlineID: Integer): Integer; Safecall;
    Function CompressContent: Integer; Safecall;
    Function CompressFonts(Compress: Integer): Integer; Safecall;
    Function CompressImages(Compress: Integer): Integer; Safecall;
    Function CompressPage: Integer; Safecall;
    Function ContentStreamCount: Integer; Safecall;
    Function ContentStreamSafe: Integer; Safecall;
    Function CopyPageRanges(DocumentID: Integer; Const RangeList: WideString): Integer; Safecall;
    Function CopyPageRangesEx(DocumentID: Integer; Const RangeList: WideString; Options: Integer): Integer; Safecall;
    Function CreateNewObject: Integer; Safecall;
    Function CreateTable(RowCount, ColumnCount: Integer): Integer; Safecall;
    Function DAAppendFile(FileHandle: Integer): Integer; Safecall;
    Function DACapturePage(FileHandle, PageRef: Integer): Integer; Safecall;
    Function DACapturePageEx(FileHandle, PageRef, Options: Integer): Integer; Safecall;
    Function DACloseFile(FileHandle: Integer): Integer; Safecall;
    Function DADrawCapturedPage(FileHandle, DACaptureID, DestPageRef: Integer; PntLeft, PntBottom, PntWidth, PntHeight: Double): Integer; Safecall;
    Function DADrawRotatedCapturedPage(FileHandle, DACaptureID, DestPageRef: Integer; PntLeft, PntBottom, PntWidth, PntHeight, Angle: Double): Integer;
      Safecall;
    Function DAEmbedFileStreams(FileHandle: Integer; Const RootPath: WideString): Integer; Safecall;
    Function DAExtractPageText(FileHandle, PageRef, Options: Integer): WideString; Safecall;
    Function DAExtractPageTextBlocks(FileHandle, PageRef, ExtractOptions: Integer): Integer; Safecall;
    Function DAFindPage(FileHandle, Page: Integer): Integer; Safecall;
    Function DAGetAnnotationCount(FileHandle, PageRef: Integer): Integer; Safecall;
    Function DAGetFormFieldCount(FileHandle: Integer): Integer; Safecall;
    Function DAGetFormFieldTitle(FileHandle, FieldIndex: Integer): WideString; Safecall;
    Function DAGetFormFieldValue(FileHandle, FieldIndex: Integer): WideString; Safecall;
    Function DAGetImageDataToVariant(FileHandle, ImageListID, ImageIndex: Integer): Olevariant; Safecall;
    Function DAGetImageDblProperty(FileHandle, ImageListID, ImageIndex, PropertyID: Integer): Double; Safecall;
    Function DAGetImageIntProperty(FileHandle, ImageListID, ImageIndex, PropertyID: Integer): Integer; Safecall;
    Function DAGetImageListCount(FileHandle, ImageListID: Integer): Integer; Safecall;
    Function DAGetInformation(FileHandle: Integer; Const Key: WideString): WideString; Safecall;
    Function DAGetObjectCount(FileHandle: Integer): Integer; Safecall;
    Function DAGetObjectToVariant(FileHandle, ObjectNumber: Integer): Olevariant; Safecall;
    Function DAGetPageBox(FileHandle, PageRef, BoxIndex, Dimension: Integer): Double; Safecall;
    Function DAGetPageContentToVariant(FileHandle, PageRef: Integer): Olevariant; Safecall;
    Function DAGetPageCount(FileHandle: Integer): Integer; Safecall;
    Function DAGetPageHeight(FileHandle, PageRef: Integer): Double; Safecall;
    Function DAGetPageImageList(FileHandle, PageRef: Integer): Integer; Safecall;
    Function DAGetPageWidth(FileHandle, PageRef: Integer): Double; Safecall;
    Function DAGetTextBlockAsString(TextBlockListID, Index: Integer): WideString; Safecall;
    Function DAGetTextBlockBound(TextBlockListID, Index, BoundIndex: Integer): Double; Safecall;
    Function DAGetTextBlockCharWidth(TextBlockListID, Index, CharIndex: Integer): Double; Safecall;
    Function DAGetTextBlockColor(TextBlockListID, Index, ColorComponent: Integer): Double; Safecall;
    Function DAGetTextBlockColorType(TextBlockListID, Index: Integer): Integer; Safecall;
    Function DAGetTextBlockCount(TextBlockListID: Integer): Integer; Safecall;
    Function DAGetTextBlockFontName(TextBlockListID, Index: Integer): WideString; Safecall;
    Function DAGetTextBlockFontSize(TextBlockListID, Index: Integer): Double; Safecall;
    Function DAGetTextBlockText(TextBlockListID, Index: Integer): WideString; Safecall;
    Function DAHasPageBox(FileHandle, PageRef, BoxIndex: Integer): Integer; Safecall;
    Function DAHidePage(FileHandle, PageRef: Integer): Integer; Safecall;
    Function DAMovePage(FileHandle, PageRef, TargetPageRef, Options: Integer): Integer; Safecall;
    Function DANewPage(FileHandle: Integer): Integer; Safecall;
    Function DANewPages(FileHandle, PageCount: Integer): Integer; Safecall;
    Function DANormalizePage(FileHandle, PageRef, NormalizeOptions: Integer): Integer; Safecall;
    Function DAOpenFile(Const InputFileName, Password: WideString): Integer; Safecall;
    Function DAOpenFileReadOnly(Const InputFileName, Password: WideString): Integer; Safecall;
    Function DAPageRotation(FileHandle, PageRef: Integer): Integer; Safecall;
    Function DAReleaseImageList(FileHandle, ImageListID: Integer): Integer; Safecall;
    Function DAReleaseTextBlocks(TextBlockListID: Integer): Integer; Safecall;
    Function DARemoveUsageRights(FileHandle: Integer): Integer; Safecall;
    Function DARenderPageToDC(FileHandle, PageRef: Integer; DPI: Double; DC: Integer): Integer; Safecall;
    Function DARenderPageToFile(FileHandle, PageRef, Options: Integer; DPI: Double; Const FileName: WideString): Integer; Safecall;
    Function DARenderPageToVariant(FileHandle, PageRef, Options: Integer; DPI: Double): Olevariant; Safecall;
    Function DARotatePage(FileHandle, PageRef, Angle, Options: Integer): Integer; Safecall;
    Function DASaveAsFile(FileHandle: Integer; Const OutputFileName: WideString): Integer; Safecall;
    Function DASaveImageDataToFile(FileHandle, ImageListID, ImageIndex: Integer; Const ImageFileName: WideString): Integer; Safecall;
    Function DASetInformation(FileHandle: Integer; Const Key, NewValue: WideString): Integer; Safecall;
    Function DASetPageBox(FileHandle, PageRef, BoxIndex: Integer; X1, Y1, X2, Y2: Double): Integer; Safecall;
    Function DASetPageLayout(FileHandle, NewPageLayout: Integer): Integer; Safecall;
    Function DASetPageMode(FileHandle, NewPageMode: Integer): Integer; Safecall;
    Function DASetPageSize(FileHandle, PageRef: Integer; PntWidth, PntHeight: Double): Integer; Safecall;
    Function DASetTextExtractionArea(Left, Top, Width, Height: Double): Integer; Safecall;
    Function DASetTextExtractionOptions(OptionID, NewValue: Integer): Integer; Safecall;
    Function DASetTextExtractionScaling(Options: Integer; Horizontal, Vertical: Double): Integer; Safecall;
    Function DASetTextExtractionWordGap(NewWordGap: Double): Integer; Safecall;
    Function DAShiftedHeader(FileHandle: Integer): Integer; Safecall;
    Function Decrypt: Integer; Safecall;
    Function DecryptFile(Const InputFileName, OutputFileName, Password: WideString): Integer; Safecall;
    Function DeleteAnalysis(AnalysisID: Integer): Integer; Safecall;
    Function DeleteAnnotation(Index: Integer): Integer; Safecall;
    Function DeleteContentStream: Integer; Safecall;
    Function DeleteFormField(Index: Integer): Integer; Safecall;
    Function DeleteOptionalContentGroup(OptionalContentGroupID: Integer): Integer; Safecall;
    Function DeletePageLGIDict(DictIndex: Integer): Integer; Safecall;
    Function DeletePages(StartPage, PageCount: Integer): Integer; Safecall;
    Function DocJavaScriptAction(Const ActionType, JavaScript: WideString): Integer; Safecall;
    Function DocumentCount: Integer; Safecall;
    Function DrawArc(XPos, YPos, Radius, StartAngle, EndAngle: Double; Pie, DrawOptions: Integer): Integer; Safecall;
    Function DrawBarcode(Left, Top, Width, Height: Double; Const Text: WideString; Barcode, Options: Integer): Integer; Safecall;
    Function DrawBox(Left, Top, Width, Height: Double; DrawOptions: Integer): Integer; Safecall;
    Function DrawCapturedPage(CaptureID: Integer; Left, Top, Width, Height: Double): Integer; Safecall;
    Function DrawCapturedPageMatrix(CaptureID: Integer; M11, M12, M21, M22, MDX, MDY: Double): Integer; Safecall;
    Function DrawCircle(XPos, YPos, Radius: Double; DrawOptions: Integer): Integer; Safecall;
    Function DrawDataMatrixSymbol(Left, Top, ModuleSize: Double; Const Text: WideString; Encoding, SymbolSize, Options: Integer): Integer; Safecall;
    Function DrawEllipse(XPos, YPos, Width, Height: Double; DrawOptions: Integer): Integer; Safecall;
    Function DrawEllipticArc(XPos, YPos, Width, Height, StartAngle, EndAngle: Double; Pie, DrawOptions: Integer): Integer; Safecall;
    Function DrawHTMLText(Left, Top, Width: Double; Const HTMLText: WideString): Integer; Safecall;
    Function DrawHTMLTextBox(Left, Top, Width, Height: Double; Const HTMLText: WideString): WideString; Safecall;
    Function DrawHTMLTextBoxMatrix(Width, Height: Double; Const HTMLText: WideString; M11, M12, M21, M22, MDX, MDY: Double): WideString; Safecall;
    Function DrawHTMLTextMatrix(Width: Double; Const HTMLText: WideString; M11, M12, M21, M22, MDX, MDY: Double): Integer; Safecall;
    Function DrawImage(Left, Top, Width, Height: Double): Integer; Safecall;
    Function DrawImageMatrix(M11, M12, M21, M22, MDX, MDY: Double): Integer; Safecall;
    Function DrawIntelligentMailBarcode(Left, Top, BarWidth, FullBarHeight, TrackerHeight, SpaceWidth: Double; Const BarcodeData: WideString; Options: Integer)
      : Integer; Safecall;
    Function DrawLine(StartX, StartY, EndX, EndY: Double): Integer; Safecall;
    Function DrawMultiLineText(XPos, YPos: Double; Const Delimiter, Text: WideString): Integer; Safecall;
    Function DrawPDF417Symbol(Left, Top: Double; Const Text: WideString; Options: Integer): Integer; Safecall;
    Function DrawPDF417SymbolEx(Left, Top: Double; Const Text: WideString; Options, FixedColumns, FixedRows, ErrorLevel: Integer;
      ModuleSize, HeightWidthRatio: Double): Integer; Safecall;
    Function DrawPath(PathOptions: Integer): Integer; Safecall;
    Function DrawPathEvenOdd(PathOptions: Integer): Integer; Safecall;
    Function DrawPostScriptXObject(PSRef: Integer): Integer; Safecall;
    Function DrawQRCode(Left, Top, SymbolSize: Double; Const Text: WideString; EncodeOptions, DrawOptions: Integer): Integer; Safecall;
    Function DrawRotatedBox(Left, Bottom, Width, Height, Angle: Double; DrawOptions: Integer): Integer; Safecall;
    Function DrawRotatedCapturedPage(CaptureID: Integer; Left, Bottom, Width, Height, Angle: Double): Integer; Safecall;
    Function DrawRotatedImage(Left, Bottom, Width, Height, Angle: Double): Integer; Safecall;
    Function DrawRotatedMultiLineText(XPos, YPos, Angle: Double; Const Delimiter, Text: WideString): Integer; Safecall;
    Function DrawRotatedText(XPos, YPos, Angle: Double; Const Text: WideString): Integer; Safecall;
    Function DrawRotatedTextBox(Left, Top, Width, Height, Angle: Double; Const Text: WideString; Options: Integer): Integer; Safecall;
    Function DrawRotatedTextBoxEx(Left, Top, Width, Height, Angle: Double; Const Text: WideString; Options, Border, Radius, DrawOptions: Integer)
      : Integer; Safecall;
    Function DrawRoundedBox(Left, Top, Width, Height, Radius: Double; DrawOptions: Integer): Integer; Safecall;
    Function DrawRoundedRotatedBox(Left, Bottom, Width, Height, Radius, Angle: Double; DrawOptions: Integer): Integer; Safecall;
    Function DrawScaledImage(Left, Top, Scale: Double): Integer; Safecall;
    Function DrawSpacedText(XPos, YPos, Spacing: Double; Const Text: WideString): Integer; Safecall;
    Function DrawTableRows(TableID: Integer; Left, Top, Height: Double; FirstRow, LastRow: Integer): Double; Safecall;
    Function DrawText(XPos, YPos: Double; Const Text: WideString): Integer; Safecall;
    Function DrawTextArc(XPos, YPos, Radius, Angle: Double; Const Text: WideString; DrawOptions: Integer): Integer; Safecall;
    Function DrawTextBox(Left, Top, Width, Height: Double; Const Text: WideString; Options: Integer): Integer; Safecall;
    Function DrawTextBoxMatrix(Width, Height: Double; Const Text: WideString; Options: Integer; M11, M12, M21, M22, MDX, MDY: Double): Integer; Safecall;
    Function DrawWrappedText(XPos, YPos, Width: Double; Const Text: WideString): Integer; Safecall;
    Function EditableContentStream: Integer; Safecall;
    Function EmbedFile(Const Title, FileName, MIMEType: WideString): Integer; Safecall;
    Function EmbeddedFileCount: Integer; Safecall;
    Function EncapsulateContentStream: Integer; Safecall;
    Function EncodePermissions(CanPrint, CanCopy, CanChange, CanAddNotes, CanFillFields, CanCopyAccess, CanAssemble, CanPrintFull: Integer): Integer; Safecall;
    Function EncodeStringFromVariant(NumberList: Olevariant; Const Encoding: WideString; UnmatchedAction: Integer): WideString; Safecall;
    Function Encrypt(Const Owner, User: WideString; Strength, Permissions: Integer): Integer; Safecall;
    Function EncryptFile(Const InputFileName, OutputFileName, Owner, User: WideString; Strength, Permissions: Integer): Integer; Safecall;
    Function EncryptWithFingerprint(Const Fingerprint: WideString): Integer; Safecall;
    Function EncryptionAlgorithm: Integer; Safecall;
    Function EncryptionStatus: Integer; Safecall;
    Function EncryptionStrength: Integer; Safecall;
    Function EndPageUpdate: Integer; Safecall;
    Function EndSignProcessToFile(SignProcessID: Integer; Const OutputFile: WideString): Integer; Safecall;
    Function ExtractFilePageContentToVariant(Const InputFileName, Password: WideString; Page: Integer): Olevariant; Safecall;
    Function ExtractFilePageText(Const InputFileName, Password: WideString; Page, Options: Integer): WideString; Safecall;
    Function ExtractFilePageTextBlocks(Const InputFileName, Password: WideString; Page, Options: Integer): Integer; Safecall;
    Function ExtractFilePages(Const InputFileName, Password, OutputFileName, RangeList: WideString): Integer; Safecall;
    Function ExtractFilePagesEx(Const InputFileName, Password, OutputFileName, RangeList: WideString; Options: Integer): Integer; Safecall;
    Function ExtractPageRanges(Const RangeList: WideString): Integer; Safecall;
    Function ExtractPageTextBlocks(ExtractOptions: Integer): Integer; Safecall;
    Function ExtractPages(StartPage, PageCount: Integer): Integer; Safecall;
    Function FileListCount(Const ListName: WideString): Integer; Safecall;
    Function FileListItem(Const ListName: WideString; Index: Integer): WideString; Safecall;
    Function FindFonts: Integer; Safecall;
    Function FindFormFieldByTitle(Const Title: WideString): Integer; Safecall;
    Function FindImages: Integer; Safecall;
    Function FitImage(Left, Top, Width, Height: Double; HAlign, VAlign, Rotate: Integer): Integer; Safecall;
    Function FitRotatedTextBox(Left, Top, Width, Height, Angle: Double; Const Text: WideString; Options: Integer): Integer; Safecall;
    Function FitTextBox(Left, Top, Width, Height: Double; Const Text: WideString; Options: Integer): Integer; Safecall;
    Function FlattenAnnot(Index, Options: Integer): Integer; Safecall;
    Function FlattenFormField(Index: Integer): Integer; Safecall;
    Function FontCount: Integer; Safecall;
    Function FontFamily: WideString; Safecall;
    Function FontHasKerning: Integer; Safecall;
    Function FontName: WideString; Safecall;
    Function FontReference: WideString; Safecall;
    Function FontSize: Integer; Safecall;
    Function FontType: Integer; Safecall;
    Function FormFieldCount: Integer; Safecall;
    Function FormFieldHasParent(Index: Integer): Integer; Safecall;
    Function FormFieldJavaScriptAction(Index: Integer; Const ActionType, JavaScript: WideString): Integer; Safecall;
    Function FormFieldWebLinkAction(Index: Integer; Const ActionType, Link: WideString): Integer; Safecall;
    Function GetActionDest(ActionID: Integer): Integer; Safecall;
    Function GetActionType(ActionID: Integer): WideString; Safecall;
    Function GetActionURL(ActionID: Integer): WideString; Safecall;
    Function GetAnalysisInfo(AnalysisID, AnalysisItem: Integer): WideString; Safecall;
    Function GetAnnotActionID(Index: Integer): Integer; Safecall;
    Function GetAnnotDblProperty(Index, Tag: Integer): Double; Safecall;
    Function GetAnnotDest(Index: Integer): Integer; Safecall;
    Function GetAnnotEmbeddedFileName(Index, Options: Integer): WideString; Safecall;
    Function GetAnnotEmbeddedFileToFile(Index, Options: Integer; Const FileName: WideString): Integer; Safecall;
    Function GetAnnotIntProperty(Index, Tag: Integer): Integer; Safecall;
    Function GetAnnotQuadCount(Index: Integer): Integer; Safecall;
    Function GetAnnotQuadPoints(Index, QuadNumber, PointNumber: Integer): Double; Safecall;
    Function GetAnnotSoundToFile(Index, Options: Integer; Const SoundFileName: WideString): Integer; Safecall;
    Function GetAnnotStrProperty(Index, Tag: Integer): WideString; Safecall;
    Function GetBarcodeWidth(NominalWidth: Double; Const Text: WideString; Barcode: Integer): Double; Safecall;
    Function GetBaseURL: WideString; Safecall;
    Function GetCSDictEPSG(CSDictID: Integer): Integer; Safecall;
    Function GetCSDictType(CSDictID: Integer): Integer; Safecall;
    Function GetCSDictWKT(CSDictID: Integer): WideString; Safecall;
    Function GetCanvasDC(CanvasWidth, CanvasHeight: Integer): Integer; Safecall;
    Function GetCanvasDCEx(CanvasWidth, CanvasHeight, ReferenceDC: Integer): Integer; Safecall;
    Function GetCatalogInformation(Const Key: WideString): WideString; Safecall;
    Function GetContentStreamToVariant: Olevariant; Safecall;
    Function GetCustomInformation(Const Key: WideString): WideString; Safecall;
    Function GetCustomKeys(Location: Integer): WideString; Safecall;
    Function GetDefaultPrinterName: WideString; Safecall;
    Function GetDestName(DestID: Integer): WideString; Safecall;
    Function GetDestPage(DestID: Integer): Integer; Safecall;
    Function GetDestType(DestID: Integer): Integer; Safecall;
    Function GetDestValue(DestID, ValueKey: Integer): Double; Safecall;
    Function GetDocJavaScript(Const ActionType: WideString): WideString; Safecall;
    Function GetDocumentFileName: WideString; Safecall;
    Function GetDocumentFileSize: Integer; Safecall;
    Function GetDocumentID(Index: Integer): Integer; Safecall;
    Function GetDocumentIdentifier(Part, Options: Integer): WideString; Safecall;
    Function GetDocumentMetadata: WideString; Safecall;
    Function GetDocumentRepaired: Integer; Safecall;
    Function GetDocumentResourceList: WideString; Safecall;
    Function GetEmbeddedFileContentToFile(Index: Integer; Const FileName: WideString): Integer; Safecall;
    Function GetEmbeddedFileContentToVariant(Index: Integer): Olevariant; Safecall;
    Function GetEmbeddedFileID(Index: Integer): Integer; Safecall;
    Function GetEmbeddedFileIntProperty(Index, Tag: Integer): Integer; Safecall;
    Function GetEmbeddedFileStrProperty(Index, Tag: Integer): WideString; Safecall;
    Function GetEncryptionFingerprint: WideString; Safecall;
    Function GetFileMetadata(Const InputFileName, Password: WideString): WideString; Safecall;
    Function GetFirstChildOutline(OutlineID: Integer): Integer; Safecall;
    Function GetFirstOutline: Integer; Safecall;
    Function GetFontEncoding: Integer; Safecall;
    Function GetFontFlags(FontFlagItemID: Integer): Integer; Safecall;
    Function GetFontID(Index: Integer): Integer; Safecall;
    Function GetFontIsEmbedded: Integer; Safecall;
    Function GetFontIsSubsetted: Integer; Safecall;
    Function GetFontMetrics(MetricType: Integer): Integer; Safecall;
    Function GetFontObjectNumber: Integer; Safecall;
    Function GetFormFieldActionID(Index: Integer; Const TriggerEvent: WideString): Integer; Safecall;
    Function GetFormFieldAlignment(Index: Integer): Integer; Safecall;
    Function GetFormFieldAnnotFlags(Index: Integer): Integer; Safecall;
    Function GetFormFieldBackgroundColor(Index, ColorComponent: Integer): Double; Safecall;
    Function GetFormFieldBackgroundColorType(Index: Integer): Integer; Safecall;
    Function GetFormFieldBorderColor(Index, ColorComponent: Integer): Double; Safecall;
    Function GetFormFieldBorderColorType(Index: Integer): Integer; Safecall;
    Function GetFormFieldBorderProperty(Index, PropKey: Integer): Double; Safecall;
    Function GetFormFieldBorderStyle(Index: Integer): Integer; Safecall;
    Function GetFormFieldBound(Index, Edge: Integer): Double; Safecall;
    Function GetFormFieldCaption(Index: Integer): WideString; Safecall;
    Function GetFormFieldCaptionEx(Index, StringType: Integer): WideString; Safecall;
    Function GetFormFieldCheckStyle(Index: Integer): Integer; Safecall;
    Function GetFormFieldChildTitle(Index: Integer): WideString; Safecall;
    Function GetFormFieldChoiceType(Index: Integer): Integer; Safecall;
    Function GetFormFieldColor(Index, ColorComponent: Integer): Double; Safecall;
    Function GetFormFieldComb(Index: Integer): Integer; Safecall;
    Function GetFormFieldDefaultValue(Index: Integer): WideString; Safecall;
    Function GetFormFieldDescription(Index: Integer): WideString; Safecall;
    Function GetFormFieldFlags(Index: Integer): Integer; Safecall;
    Function GetFormFieldFontName(Index: Integer): WideString; Safecall;
    Function GetFormFieldJavaScript(Index: Integer; Const ActionType: WideString): WideString; Safecall;
    Function GetFormFieldKidCount(Index: Integer): Integer; Safecall;
    Function GetFormFieldKidTempIndex(Index, SubIndex: Integer): Integer; Safecall;
    Function GetFormFieldMaxLen(Index: Integer): Integer; Safecall;
    Function GetFormFieldNoExport(Index: Integer): Integer; Safecall;
    Function GetFormFieldPage(Index: Integer): Integer; Safecall;
    Function GetFormFieldPrintable(Index: Integer): Integer; Safecall;
    Function GetFormFieldReadOnly(Index: Integer): Integer; Safecall;
    Function GetFormFieldRequired(Index: Integer): Integer; Safecall;
    Function GetFormFieldRichTextString(Index: Integer; Const Key: WideString): WideString; Safecall;
    Function GetFormFieldRotation(Index: Integer): Integer; Safecall;
    Function GetFormFieldSubCount(Index: Integer): Integer; Safecall;
    Function GetFormFieldSubDisplayName(Index, SubIndex: Integer): WideString; Safecall;
    Function GetFormFieldSubName(Index, SubIndex: Integer): WideString; Safecall;
    Function GetFormFieldSubmitActionString(Index: Integer; Const ActionType: WideString): WideString; Safecall;
    Function GetFormFieldTabOrder(Index: Integer): Integer; Safecall;
    Function GetFormFieldTabOrderEx(Index, Options: Integer): Integer; Safecall;
    Function GetFormFieldTextFlags(Index, ValueKey: Integer): Integer; Safecall;
    Function GetFormFieldTextSize(Index: Integer): Double; Safecall;
    Function GetFormFieldTitle(Index: Integer): WideString; Safecall;
    Function GetFormFieldType(Index: Integer): Integer; Safecall;
    Function GetFormFieldValue(Index: Integer): WideString; Safecall;
    Function GetFormFieldValueByTitle(Const Title: WideString): WideString; Safecall;
    Function GetFormFieldVisible(Index: Integer): Integer; Safecall;
    Function GetFormFieldWebLink(Index: Integer; Const ActionType: WideString): WideString; Safecall;
    Function GetFormFontCount: Integer; Safecall;
    Function GetFormFontName(FontIndex: Integer): WideString; Safecall;
    Function GetGlobalJavaScript(Const PackageName: WideString): WideString; Safecall;
    Function GetHTMLTextHeight(Width: Double; Const HTMLText: WideString): Double; Safecall;
    Function GetHTMLTextLineCount(Width: Double; Const HTMLText: WideString): Integer; Safecall;
    Function GetHTMLTextWidth(MaxWidth: Double; Const HTMLText: WideString): Double; Safecall;
    Function GetImageID(Index: Integer): Integer; Safecall;
    Function GetImageListCount(ImageListID: Integer): Integer; Safecall;
    Function GetImageListItemDataToVariant(ImageListID, ImageIndex, Options: Integer): Olevariant; Safecall;
    Function GetImageListItemDblProperty(ImageListID, ImageIndex, PropertyID: Integer): Double; Safecall;
    Function GetImageListItemFormatDesc(ImageListID, ImageIndex, Options: Integer): WideString; Safecall;
    Function GetImageListItemIntProperty(ImageListID, ImageIndex, PropertyID: Integer): Integer; Safecall;
    Function GetImageMeasureDict: Integer; Safecall;
    Function GetImagePageCount(Const FileName: WideString): Integer; Safecall;
    Function GetImagePtDataDict: Integer; Safecall;
    Function GetInformation(Key: Integer): WideString; Safecall;
    Function GetInstalledFontsByCharset(CharsetIndex, Options: Integer): WideString; Safecall;
    Function GetInstalledFontsByCodePage(CodePage, Options: Integer): WideString; Safecall;
    Function GetKerning(Const CharPair: WideString): Integer; Safecall;
    Function GetLatestPrinterNames: WideString; Safecall;
    Function GetMaxObjectNumber: Integer; Safecall;
    Function GetMeasureDictBoundsCount(MeasureDictID: Integer): Integer; Safecall;
    Function GetMeasureDictBoundsItem(MeasureDictID, ItemIndex: Integer): Double; Safecall;
    Function GetMeasureDictCoordinateSystem(MeasureDictID: Integer): Integer; Safecall;
    Function GetMeasureDictDCSDict(MeasureDictID: Integer): Integer; Safecall;
    Function GetMeasureDictGCSDict(MeasureDictID: Integer): Integer; Safecall;
    Function GetMeasureDictGPTSCount(MeasureDictID: Integer): Integer; Safecall;
    Function GetMeasureDictGPTSItem(MeasureDictID, ItemIndex: Integer): Double; Safecall;
    Function GetMeasureDictLPTSCount(MeasureDictID: Integer): Integer; Safecall;
    Function GetMeasureDictLPTSItem(MeasureDictID, ItemIndex: Integer): Double; Safecall;
    Function GetMeasureDictPDU(MeasureDictID, UnitIndex: Integer): Integer; Safecall;
    Function GetNamedDestination(Const DestName: WideString): Integer; Safecall;
    Function GetNextOutline(OutlineID: Integer): Integer; Safecall;
    Function GetObjectCount: Integer; Safecall;
    Function GetObjectDecodeError(ObjectNumber: Integer): Integer; Safecall;
    Function GetObjectToVariant(ObjectNumber: Integer): Olevariant; Safecall;
    Function GetOpenActionDestination: Integer; Safecall;
    Function GetOpenActionJavaScript: WideString; Safecall;
    Function GetOptionalContentConfigCount: Integer; Safecall;
    Function GetOptionalContentConfigLocked(OptionalContentConfigID, OptionalContentGroupID: Integer): Integer; Safecall;
    Function GetOptionalContentConfigOrderCount(OptionalContentConfigID: Integer): Integer; Safecall;
    Function GetOptionalContentConfigOrderItemID(OptionalContentConfigID, ItemIndex: Integer): Integer; Safecall;
    Function GetOptionalContentConfigOrderItemLabel(OptionalContentConfigID, ItemIndex: Integer): WideString; Safecall;
    Function GetOptionalContentConfigOrderItemLevel(OptionalContentConfigID, ItemIndex: Integer): Integer; Safecall;
    Function GetOptionalContentConfigOrderItemType(OptionalContentConfigID, ItemIndex: Integer): Integer; Safecall;
    Function GetOptionalContentConfigState(OptionalContentConfigID, OptionalContentGroupID: Integer): Integer; Safecall;
    Function GetOptionalContentGroupID(Index: Integer): Integer; Safecall;
    Function GetOptionalContentGroupName(OptionalContentGroupID: Integer): WideString; Safecall;
    Function GetOptionalContentGroupPrintable(OptionalContentGroupID: Integer): Integer; Safecall;
    Function GetOptionalContentGroupVisible(OptionalContentGroupID: Integer): Integer; Safecall;
    Function GetOrigin: Integer; Safecall;
    Function GetOutlineActionID(OutlineID: Integer): Integer; Safecall;
    Function GetOutlineColor(OutlineID, ColorComponent: Integer): Double; Safecall;
    Function GetOutlineDest(OutlineID: Integer): Integer; Safecall;
    Function GetOutlineID(Index: Integer): Integer; Safecall;
    Function GetOutlineJavaScript(OutlineID: Integer): WideString; Safecall;
    Function GetOutlineObjectNumber(OutlineID: Integer): Integer; Safecall;
    Function GetOutlineOpenFile(OutlineID: Integer): WideString; Safecall;
    Function GetOutlinePage(OutlineID: Integer): Integer; Safecall;
    Function GetOutlineStyle(OutlineID: Integer): Integer; Safecall;
    Function GetOutlineWebLink(OutlineID: Integer): WideString; Safecall;
    Function GetPageBox(BoxType, Dimension: Integer): Double; Safecall;
    Function GetPageColorSpaces(Options: Integer): WideString; Safecall;
    Function GetPageContentToVariant: Olevariant; Safecall;
    Function GetPageImageList(Options: Integer): Integer; Safecall;
    Function GetPageJavaScript(Const ActionType: WideString): WideString; Safecall;
    Function GetPageLGIDictContent(DictIndex: Integer): WideString; Safecall;
    Function GetPageLGIDictCount: Integer; Safecall;
    Function GetPageLabel(Page: Integer): WideString; Safecall;
    Function GetPageLayout: Integer; Safecall;
    Function GetPageMode: Integer; Safecall;
    Function GetPageText(ExtractOptions: Integer): WideString; Safecall;
    Function GetPageUserUnit: Double; Safecall;
    Function GetPageViewPortCount: Integer; Safecall;
    Function GetPageViewPortID(Index: Integer): Integer; Safecall;
    Function GetParentOutline(OutlineID: Integer): Integer; Safecall;
    Function GetPrevOutline(OutlineID: Integer): Integer; Safecall;
    Function GetPrintPreviewBitmapToVariant(Const PrinterName: WideString; PreviewPage, PrintOptions, MaxDimension, PreviewOptions: Integer)
      : Olevariant; Safecall;
    Function GetPrinterBins(Const PrinterName: WideString): WideString; Safecall;
    Function GetPrinterDevModeToVariant(Const PrinterName: WideString): Olevariant; Safecall;
    Function GetPrinterMediaTypes(Const PrinterName: WideString): WideString; Safecall;
    Function GetPrinterNames: WideString; Safecall;
    Function GetRenderScale: Double; Safecall;
    Function GetSignProcessByteRange(SignProcessID, ArrayPosition: Integer): Integer; Safecall;
    Function GetSignProcessResult(SignProcessID: Integer): Integer; Safecall;
    Function GetStringListCount(StringListID: Integer): Integer; Safecall;
    Function GetStringListItem(StringListID, ItemIndex: Integer): WideString; Safecall;
    Function GetTabOrderMode: WideString; Safecall;
    Function GetTableCellDblProperty(TableID, RowNumber, ColumnNumber, Tag: Integer): Double; Safecall;
    Function GetTableCellIntProperty(TableID, RowNumber, ColumnNumber, Tag: Integer): Integer; Safecall;
    Function GetTableCellStrProperty(TableID, RowNumber, ColumnNumber, Tag: Integer): WideString; Safecall;
    Function GetTableColumnCount(TableID: Integer): Integer; Safecall;
    Function GetTableLastDrawnRow(TableID: Integer): Integer; Safecall;
    Function GetTableRowCount(TableID: Integer): Integer; Safecall;
    Function GetTempPath: WideString; Safecall;
    Function GetTextAscent: Double; Safecall;
    Function GetTextBlockAsString(TextBlockListID, Index: Integer): WideString; Safecall;
    Function GetTextBlockBound(TextBlockListID, Index, BoundIndex: Integer): Double; Safecall;
    Function GetTextBlockCharWidth(TextBlockListID, Index, CharIndex: Integer): Double; Safecall;
    Function GetTextBlockColor(TextBlockListID, Index, ColorComponent: Integer): Double; Safecall;
    Function GetTextBlockColorType(TextBlockListID, Index: Integer): Integer; Safecall;
    Function GetTextBlockCount(TextBlockListID: Integer): Integer; Safecall;
    Function GetTextBlockFontName(TextBlockListID, Index: Integer): WideString; Safecall;
    Function GetTextBlockFontSize(TextBlockListID, Index: Integer): Double; Safecall;
    Function GetTextBlockText(TextBlockListID, Index: Integer): WideString; Safecall;
    Function GetTextBound(Edge: Integer): Double; Safecall;
    Function GetTextDescent: Double; Safecall;
    Function GetTextHeight: Double; Safecall;
    Function GetTextSize: Double; Safecall;
    Function GetTextWidth(Const Text: WideString): Double; Safecall;
    Function GetUnicodeCharactersFromEncoding(Encoding: Integer): WideString; Safecall;
    Function GetViewPortBBox(ViewPortID, Dimension: Integer): Double; Safecall;
    Function GetViewPortMeasureDict(ViewPortID: Integer): Integer; Safecall;
    Function GetViewPortName(ViewPortID: Integer): WideString; Safecall;
    Function GetViewPortPtDataDict(ViewPortID: Integer): Integer; Safecall;
    Function GetViewerPreferences(Option: Integer): Integer; Safecall;
    Function GetWrappedText(Width: Double; Const Delimiter, Text: WideString): WideString; Safecall;
    Function GetWrappedTextBreakString(Width: Double; Const Delimiter, Text: WideString): WideString; Safecall;
    Function GetWrappedTextHeight(Width: Double; Const Text: WideString): Double; Safecall;
    Function GetWrappedTextLineCount(Width: Double; Const Text: WideString): Integer; Safecall;
    Function GetXFAFormFieldCount: Integer; Safecall;
    Function GetXFAFormFieldName(Index: Integer): WideString; Safecall;
    Function GetXFAFormFieldNames(Const Delimiter: WideString): WideString; Safecall;
    Function GetXFAFormFieldValue(Const XFAFieldName: WideString): WideString; Safecall;
    Function GlobalJavaScriptCount: Integer; Safecall;
    Function GlobalJavaScriptPackageName(Index: Integer): WideString; Safecall;
    Function HasFontResources: Integer; Safecall;
    Function HasPageBox(BoxType: Integer): Integer; Safecall;
    Function HidePage: Integer; Safecall;
    Function ImageCount: Integer; Safecall;
    Function ImageFillColor: Integer; Safecall;
    Function ImageHeight: Integer; Safecall;
    Function ImageHorizontalResolution: Integer; Safecall;
    Function ImageResolutionUnits: Integer; Safecall;
    Function ImageType: Integer; Safecall;
    Function ImageVerticalResolution: Integer; Safecall;
    Function ImageWidth: Integer; Safecall;
    Function ImportEMFFromFile(Const FileName: WideString; FontOptions, GeneralOptions: Integer): Integer; Safecall;
    Function InsertPages(StartPage, PageCount: Integer): Integer; Safecall;
    Function InsertTableColumns(TableID, Position, NewColumnCount: Integer): Integer; Safecall;
    Function InsertTableRows(TableID, Position, NewRowCount: Integer): Integer; Safecall;
    Function IsAnnotFormField(Index: Integer): Integer; Safecall;
    Function IsLinearized: Integer; Safecall;
    Function IsTaggedPDF: Integer; Safecall;
    Function LastErrorCode: Integer; Safecall;
    Function LastRenderError: WideString; Safecall;
    Function LibraryVersion: WideString; Safecall;
    Function LibraryVersionEx: WideString; Safecall;
    Function LinearizeFile(Const InputFileName, Password, OutputFileName: WideString; Options: Integer): Integer; Safecall;
    Function LoadFromCanvasDC(DPI: Double; Options: Integer): Integer; Safecall;
    Function LoadFromFile(Const FileName, Password: WideString): Integer; Safecall;
    Function LoadFromVariant(Source: Olevariant; Const Password: WideString): Integer; Safecall;
    Function LoadState: Integer; Safecall;
    Function MergeDocument(DocumentID: Integer): Integer; Safecall;
    Function MergeFileList(Const ListName, OutputFileName: WideString): Integer; Safecall;
    Function MergeFileListFast(Const ListName, OutputFileName: WideString): Integer; Safecall;
    Function MergeFiles(Const FirstFileName, SecondFileName, OutputFileName: WideString): Integer; Safecall;
    Function MergeTableCells(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer): Integer; Safecall;
    Function MoveContentStream(FromPosition, ToPosition: Integer): Integer; Safecall;
    Function MoveOutlineAfter(OutlineID, SiblingID: Integer): Integer; Safecall;
    Function MoveOutlineBefore(OutlineID, SiblingID: Integer): Integer; Safecall;
    Function MovePage(NewPosition: Integer): Integer; Safecall;
    Function MovePath(NewX, NewY: Double): Integer; Safecall;
    Function MultiplyScale(MultScaleBy: Double): Integer; Safecall;
    Function NewChildFormField(Index: Integer; Const Title: WideString; FieldType: Integer): Integer; Safecall;
    Function NewContentStream: Integer; Safecall;
    Function NewCustomPrinter(Const OriginalPrinterName: WideString): WideString; Safecall;
    Function NewDestination(DestPage, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer; Safecall;
    Function NewDocument: Integer; Safecall;
    Function NewFormField(Const Title: WideString; FieldType: Integer): Integer; Safecall;
    Function NewInternalPrinterObject(Options: Integer): Integer; Safecall;
    Function NewNamedDestination(Const DestName: WideString; DestID: Integer): Integer; Safecall;
    Function NewOptionalContentGroup(Const GroupName: WideString): Integer; Safecall;
    Function NewOutline(Parent: Integer; Const Title: WideString; DestPage: Integer; DestPosition: Double): Integer; Safecall;
    Function NewPage: Integer; Safecall;
    Function NewPageFromCanvasDC(DPI: Double; Options: Integer): Integer; Safecall;
    Function NewPages(PageCount: Integer): Integer; Safecall;
    Function NewPostScriptXObject(Const PS: WideString): Integer; Safecall;
    Function NewRGBAxialShader(Const ShaderName: WideString; StartX, StartY, StartRed, StartGreen, StartBlue, EndX, EndY, EndRed, EndGreen, EndBlue: Double;
      Extend: Integer): Integer; Safecall;
    Function NewSignProcessFromFile(Const InputFile, Password: WideString): Integer; Safecall;
    Function NewStaticOutline(Parent: Integer; Const Title: WideString): Integer; Safecall;
    Function NewTilingPatternFromCapturedPage(Const PatternName: WideString; CaptureID: Integer): Integer; Safecall;
    Function NoEmbedFontListAdd(Const FontName: WideString): Integer; Safecall;
    Function NoEmbedFontListCount: Integer; Safecall;
    Function NoEmbedFontListGet(Index: Integer): WideString; Safecall;
    Function NoEmbedFontListRemoveAll: Integer; Safecall;
    Function NoEmbedFontListRemoveIndex(Index: Integer): Integer; Safecall;
    Function NoEmbedFontListRemoveName(Const FontName: WideString): Integer; Safecall;
    Function NormalizePage(NormalizeOptions: Integer): Integer; Safecall;
    Function OpenOutline(OutlineID: Integer): Integer; Safecall;
    Function OptionalContentGroupCount: Integer; Safecall;
    Function OutlineCount: Integer; Safecall;
    Function OutlineTitle(OutlineID: Integer): WideString; Safecall;
    Function PageCount: Integer; Safecall;
    Function PageHasFontResources(PageNumber: Integer): Integer; Safecall;
    Function PageHeight: Double; Safecall;
    Function PageJavaScriptAction(Const ActionType, JavaScript: WideString): Integer; Safecall;
    Function PageRotation: Integer; Safecall;
    Function PageWidth: Double; Safecall;
    Function PrintDocument(Const PrinterName: WideString; StartPage, EndPage, Options: Integer): Integer; Safecall;
    Function PrintDocumentToFile(Const PrinterName: WideString; StartPage, EndPage, Options: Integer; Const FileName: WideString): Integer; Safecall;
    Function PrintMode(Mode: Integer): Integer; Safecall;
    Function PrintOptions(PageScaling, AutoRotateCenter: Integer; Const Title: WideString): Integer; Safecall;
    Function PrintPages(Const PrinterName, PageRanges: WideString; Options: Integer): Integer; Safecall;
    Function PrintPagesToFile(Const PrinterName, PageRanges: WideString; Options: Integer; Const FileName: WideString): Integer; Safecall;
    Function ReleaseImage(ImageID: Integer): Integer; Safecall;
    Function ReleaseImageList(ImageListID: Integer): Integer; Safecall;
    Function ReleaseSignProcess(SignProcessID: Integer): Integer; Safecall;
    Function ReleaseStringList(StringListID: Integer): Integer; Safecall;
    Function ReleaseTextBlocks(TextBlockListID: Integer): Integer; Safecall;
    Function RemoveAppearanceStream(Index: Integer): Integer; Safecall;
    Function RemoveCustomInformation(Const Key: WideString): Integer; Safecall;
    Function RemoveDocument(DocumentID: Integer): Integer; Safecall;
    Function RemoveEmbeddedFile(Index: Integer): Integer; Safecall;
    Function RemoveFormFieldBackgroundColor(Index: Integer): Integer; Safecall;
    Function RemoveFormFieldBorderColor(Index: Integer): Integer; Safecall;
    Function RemoveFormFieldChoiceSub(Index: Integer; Const SubName: WideString): Integer; Safecall;
    Function RemoveGlobalJavaScript(Const PackageName: WideString): Integer; Safecall;
    Function RemoveOpenAction: Integer; Safecall;
    Function RemoveOutline(OutlineID: Integer): Integer; Safecall;
    Function RemovePageBox(BoxType: Integer): Integer; Safecall;
    Function RemoveSharedContentStreams: Integer; Safecall;
    Function RemoveStyle(Const StyleName: WideString): Integer; Safecall;
    Function RemoveUsageRights: Integer; Safecall;
    Function RemoveXFAEntries(Options: Integer): Integer; Safecall;
    Function RenderAsMultipageTIFFToFile(DPI: Double; Const PageRanges: WideString; ImageOptions, OutputOptions: Integer; Const FileName: WideString)
      : Integer; Safecall;
    Function RenderDocumentToFile(DPI: Double; StartPage, EndPage, Options: Integer; Const FileName: WideString): Integer; Safecall;
    Function RenderPageToDC(DPI: Double; Page: Integer; DC: Integer): Integer; Safecall;
    Function RenderPageToDCClip(DPI: Double; Page, DC: Integer; Const Clip: WideString): Integer; Safecall;
    Function RenderPageToFile(DPI: Double; Page, Options: Integer; Const FileName: WideString): Integer; Safecall;
    Function RenderPageToVariant(DPI: Double; Page, Options: Integer): Olevariant; Safecall;
    Function ReplaceFonts(Options: Integer): Integer; Safecall;
    Function ReplaceImage(OriginalImageID, NewImageID: Integer): Integer; Safecall;
    Function ReplaceTag(Const Tag, NewValue: WideString): Integer; Safecall;
    Function RequestPrinterStatus(StatusCommand: Integer): Integer; Safecall;
    Function RetrieveCustomDataToFile(Const Key, FileName: WideString; Location: Integer): Integer; Safecall;
    Function RetrieveCustomDataToVariant(Const Key: WideString; Location: Integer): Olevariant; Safecall;
    Function ReverseImage(Reset: Integer): Integer; Safecall;
    Function RotatePage(PageRotation: Integer): Integer; Safecall;
    Function SaveFontToFile(Const FileName: WideString): Integer; Safecall;
    Function SaveImageListItemDataToFile(ImageListID, ImageIndex, Options: Integer; Const ImageFileName: WideString): Integer; Safecall;
    Function SaveImageToFile(Const FileName: WideString): Integer; Safecall;
    Function SaveImageToVariant: Olevariant; Safecall;
    Function SaveState: Integer; Safecall;
    Function SaveStyle(Const StyleName: WideString): Integer; Safecall;
    Function SaveToFile(Const FileName: WideString): Integer; Safecall;
    Function SaveToVariant: Olevariant; Safecall;
    Function SecurityInfo(SecurityItem: Integer): Integer; Safecall;
    Function SelectContentStream(NewIndex: Integer): Integer; Safecall;
    Function SelectDocument(DocumentID: Integer): Integer; Safecall;
    Function SelectFont(FontID: Integer): Integer; Safecall;
    Function SelectImage(ImageID: Integer): Integer; Safecall;
    Function SelectPage(PageNumber: Integer): Integer; Safecall;
    Function SelectRenderer(RendererID: Integer): Integer; Safecall;
    Function SelectedDocument: Integer; Safecall;
    Function SelectedFont: Integer; Safecall;
    Function SelectedImage: Integer; Safecall;
    Function SelectedPage: Integer; Safecall;
    Function SetActionURL(ActionID: Integer; Const NewURL: WideString): Integer; Safecall;
    Function SetAnnotBorderColor(Index: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetAnnotBorderStyle(Index: Integer; Width: Double; Style: Integer; DashOn, DashOff: Double): Integer; Safecall;
    Function SetAnnotContents(Index: Integer; Const NewContents: WideString): Integer; Safecall;
    Function SetAnnotDblProperty(Index, Tag: Integer; NewValue: Double): Integer; Safecall;
    Function SetAnnotIntProperty(Index, Tag, NewValue: Integer): Integer; Safecall;
    Function SetAnnotOptional(Index, OptionalContentGroupID: Integer): Integer; Safecall;
    Function SetAnnotQuadPoints(Index, QuadNumber: Integer; X1, Y1, X2, Y2, X3, Y3, X4, Y4: Double): Integer; Safecall;
    Function SetAnnotRect(Index: Integer; Left, Top, Width, Height: Double): Integer; Safecall;
    Function SetAnnotStrProperty(Index, Tag: Integer; Const NewValue: WideString): Integer; Safecall;
    Function SetAppendInputFromVariant(Source: Olevariant): Integer; Safecall;
    Function SetBaseURL(Const NewBaseURL: WideString): Integer; Safecall;
    Function SetBlendMode(BlendMode: Integer): Integer; Safecall;
    Function SetBreakString(Const NewBreakString: WideString): Integer; Safecall;
    Function SetCSDictEPSG(CSDictID, NewEPSG: Integer): Integer; Safecall;
    Function SetCSDictType(CSDictID, NewDictType: Integer): Integer; Safecall;
    Function SetCSDictWKT(CSDictID: Integer; Const NewWKT: WideString): Integer; Safecall;
    Function SetCapturedPageOptional(CaptureID, OptionalContentGroupID: Integer): Integer; Safecall;
    Function SetCapturedPageTransparencyGroup(CaptureID, CS, Isolate, Knockout: Integer): Integer; Safecall;
    Function SetCatalogInformation(Const Key, NewValue: WideString): Integer; Safecall;
    Function SetCharWidth(CharCode, NewWidth: Integer): Integer; Safecall;
    Function SetClippingPath: Integer; Safecall;
    Function SetClippingPathEvenOdd: Integer; Safecall;
    Function SetCompatibility(CompatibilityItem, CompatibilityMode: Integer): Integer; Safecall;
    Function SetContentStreamFromVariant(NewValue: Olevariant): Integer; Safecall;
    Function SetContentStreamOptional(OptionalContentGroupID: Integer): Integer; Safecall;
    Function SetCropBox(Left, Top, Width, Height: Double): Integer; Safecall;
    Function SetCustomInformation(Const Key, NewValue: WideString): Integer; Safecall;
    Function SetCustomLineDash(Const DashPattern: WideString; DashPhase: Double): Integer; Safecall;
    Function SetPDFiumFileName(Const FileName: WideString): Integer; Safecall;
    Function SetDecodeMode(NewDecodeMode: Integer): Integer; Safecall;
    Function SetDestProperties(DestID, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer; Safecall;
    Function SetDestValue(DestID, ValueKey: Integer; NewValue: Double): Integer; Safecall;
    Function SetDocumentMetadata(Const XMP: WideString): Integer; Safecall;
    Function SetEmbeddedFileStrProperty(Index, Tag: Integer; Const NewValue: WideString): Integer; Safecall;
    Function SetFillColor(Red, Green, Blue: Double): Integer; Safecall;
    Function SetFillColorCMYK(C, M, Y, K: Double): Integer; Safecall;
    Function SetFillColorSep(Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetFillShader(Const ShaderName: WideString): Integer; Safecall;
    Function SetFillTilingPattern(Const PatternName: WideString): Integer; Safecall;
    Function SetFindImagesMode(NewFindImagesMode: Integer): Integer; Safecall;
    Function SetFontEncoding(Encoding: Integer): Integer; Safecall;
    Function SetFontFlags(Fixed, Serif, Symbolic, Script, Italic, AllCap, SmallCap, ForceBold: Integer): Integer; Safecall;
    Function SetFormFieldAlignment(Index, Alignment: Integer): Integer; Safecall;
    Function SetFormFieldAnnotFlags(Index, NewFlags: Integer): Integer; Safecall;
    Function SetFormFieldBackgroundColor(Index: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetFormFieldBackgroundColorCMYK(Index: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetFormFieldBackgroundColorGray(Index: Integer; Gray: Double): Integer; Safecall;
    Function SetFormFieldBackgroundColorSep(Index: Integer; Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetFormFieldBorderColor(Index: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetFormFieldBorderColorCMYK(Index: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetFormFieldBorderColorGray(Index: Integer; Gray: Double): Integer; Safecall;
    Function SetFormFieldBorderColorSep(Index: Integer; Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetFormFieldBorderStyle(Index: Integer; Width: Double; Style: Integer; DashOn, DashOff: Double): Integer; Safecall;
    Function SetFormFieldBounds(Index: Integer; Left, Top, Width, Height: Double): Integer; Safecall;
    Function SetFormFieldCalcOrder(Index, Order: Integer): Integer; Safecall;
    Function SetFormFieldCaption(Index: Integer; Const NewCaption: WideString): Integer; Safecall;
    Function SetFormFieldCheckStyle(Index, CheckStyle, Position: Integer): Integer; Safecall;
    Function SetFormFieldChildTitle(Index: Integer; Const NewTitle: WideString): Integer; Safecall;
    Function SetFormFieldChoiceSub(Index, SubIndex: Integer; Const SubName, DisplayName: WideString): Integer; Safecall;
    Function SetFormFieldChoiceType(Index, ChoiceType: Integer): Integer; Safecall;
    Function SetFormFieldColor(Index: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetFormFieldColorCMYK(Index: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetFormFieldColorSep(Index: Integer; Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetFormFieldComb(Index, Comb: Integer): Integer; Safecall;
    Function SetFormFieldDefaultValue(Index: Integer; Const NewDefaultValue: WideString): Integer; Safecall;
    Function SetFormFieldDescription(Index: Integer; Const NewDescription: WideString): Integer; Safecall;
    Function SetFormFieldFlags(Index, NewFlags: Integer): Integer; Safecall;
    Function SetFormFieldFont(Index, FontIndex: Integer): Integer; Safecall;
    Function SetFormFieldHighlightMode(Index, NewMode: Integer): Integer; Safecall;
    Function SetFormFieldIcon(Index, IconType, CaptureID: Integer): Integer; Safecall;
    Function SetFormFieldIconStyle(Index, Placement, Scale, ScaleType, HorizontalShift, VerticalShift: Integer): Integer; Safecall;
    Function SetFormFieldMaxLen(Index, NewMaxLen: Integer): Integer; Safecall;
    Function SetFormFieldNoExport(Index, NoExport: Integer): Integer; Safecall;
    Function SetFormFieldOptional(Index, OptionalContentGroupID: Integer): Integer; Safecall;
    Function SetFormFieldPage(Index, NewPage: Integer): Integer; Safecall;
    Function SetFormFieldPrintable(Index, Printable: Integer): Integer; Safecall;
    Function SetFormFieldReadOnly(Index, ReadOnly: Integer): Integer; Safecall;
    Function SetFormFieldRequired(Index, Required: Integer): Integer; Safecall;
    Function SetFormFieldResetAction(Index: Integer; Const ActionType: WideString): Integer; Safecall;
    Function SetFormFieldRichTextString(Index: Integer; Const Key, NewValue: WideString): Integer; Safecall;
    Function SetFormFieldRotation(Index, Angle: Integer): Integer; Safecall;
    Function SetFormFieldSignatureImage(Index, ImageID, Options: Integer): Integer; Safecall;
    Function SetFormFieldStandardFont(Index, StandardFontID: Integer): Integer; Safecall;
    Function SetFormFieldSubmitAction(Index: Integer; Const ActionType, Link: WideString): Integer; Safecall;
    Function SetFormFieldSubmitActionEx(Index: Integer; Const ActionType, Link: WideString; Flags: Integer): Integer; Safecall;
    Function SetFormFieldTabOrder(Index, Order: Integer): Integer; Safecall;
    Function SetFormFieldTextFlags(Index, Multiline, Password, FileSelect, DoNotSpellCheck, DoNotScroll: Integer): Integer; Safecall;
    Function SetFormFieldTextSize(Index: Integer; NewTextSize: Double): Integer; Safecall;
    Function SetFormFieldTitle(Index: Integer; Const NewTitle: WideString): Integer; Safecall;
    Function SetFormFieldValue(Index: Integer; Const NewValue: WideString): Integer; Safecall;
    Function SetFormFieldValueByTitle(Const Title, NewValue: WideString): Integer; Safecall;
    Function SetFormFieldVisible(Index, Visible: Integer): Integer; Safecall;
    Function SetGDIPlusFileName(Const DLLFileName: WideString): Integer; Safecall;
    Function SetGDIPlusOptions(OptionID, NewValue: Integer): Integer; Safecall;
    Function SetHTMLBoldFont(Const FontSet: WideString; FontID: Integer): Integer; Safecall;
    Function SetHTMLBoldItalicFont(Const FontSet: WideString; FontID: Integer): Integer; Safecall;
    Function SetHTMLItalicFont(Const FontSet: WideString; FontID: Integer): Integer; Safecall;
    Function SetHTMLNormalFont(Const FontSet: WideString; FontID: Integer): Integer; Safecall;
    Function SetHeaderCommentsFromVariant(Source: Olevariant): Integer; Safecall;
    Function SetImageAsMask(MaskType: Integer): Integer; Safecall;
    Function SetImageMask(FromRed, FromGreen, FromBlue, ToRed, ToGreen, ToBlue: Double): Integer; Safecall;
    Function SetImageMaskCMYK(FromC, FromM, FromY, FromK, ToC, ToM, ToY, ToK: Double): Integer; Safecall;
    Function SetImageMaskFromImage(ImageID: Integer): Integer; Safecall;
    Function SetImageOptional(OptionalContentGroupID: Integer): Integer; Safecall;
    Function SetImageResolution(Horizontal, Vertical, Units: Integer): Integer; Safecall;
    Function SetInformation(Key: Integer; Const NewValue: WideString): Integer; Safecall;
    Function SetJPEGQuality(Quality: Integer): Integer; Safecall;
    Function SetJavaScriptMode(JSMode: Integer): Integer; Safecall;
    Function SetKerning(Const CharPair: WideString; Adjustment: Integer): Integer; Safecall;
    Function SetLineCap(LineCap: Integer): Integer; Safecall;
    Function SetLineColor(Red, Green, Blue: Double): Integer; Safecall;
    Function SetLineColorCMYK(C, M, Y, K: Double): Integer; Safecall;
    Function SetLineColorSep(Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetLineDash(DashOn, DashOff: Double): Integer; Safecall;
    Function SetLineDashEx(Const DashValues: WideString): Integer; Safecall;
    Function SetLineJoin(LineJoin: Integer): Integer; Safecall;
    Function SetLineShader(Const ShaderName: WideString): Integer; Safecall;
    Function SetLineWidth(LineWidth: Double): Integer; Safecall;
    Function SetMarkupAnnotStyle(Index: Integer; Red, Green, Blue, Transparency: Double): Integer; Safecall;
    Function SetMeasureDictBoundsCount(MeasureDictID, NewCount: Integer): Integer; Safecall;
    Function SetMeasureDictBoundsItem(MeasureDictID, ItemIndex: Integer; NewValue: Double): Integer; Safecall;
    Function SetMeasureDictCoordinateSystem(MeasureDictID, CoordinateSystemID: Integer): Integer; Safecall;
    Function SetMeasureDictGPTSCount(MeasureDictID, NewCount: Integer): Integer; Safecall;
    Function SetMeasureDictGPTSItem(MeasureDictID, ItemIndex: Integer; NewValue: Double): Integer; Safecall;
    Function SetMeasureDictLPTSCount(MeasureDictID, NewCount: Integer): Integer; Safecall;
    Function SetMeasureDictLPTSItem(MeasureDictID, ItemIndex: Integer; NewValue: Double): Integer; Safecall;
    Function SetMeasureDictPDU(MeasureDictID, LinearUnit, AreaUnit, AngularUnit: Integer): Integer; Safecall;
    Function SetMeasurementUnits(MeasurementUnits: Integer): Integer; Safecall;
    Function SetNeedAppearances(NewValue: Integer): Integer; Safecall;
    Function SetObjectFromVariant(ObjectNumber: Integer; NewValue: Olevariant): Integer; Safecall;
    Function SetOpenActionDestination(OpenPage, Zoom: Integer): Integer; Safecall;
    Function SetOpenActionDestinationFull(OpenPage, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer; Safecall;
    Function SetOpenActionJavaScript(Const JavaScript: WideString): Integer; Safecall;
    Function SetOpenActionMenu(Const MenuItem: WideString): Integer; Safecall;
    Function SetOptionalContentConfigLocked(OptionalContentConfigID, OptionalContentGroupID, NewLocked: Integer): Integer; Safecall;
    Function SetOptionalContentConfigState(OptionalContentConfigID, OptionalContentGroupID, NewState: Integer): Integer; Safecall;
    Function SetOptionalContentGroupName(OptionalContentGroupID: Integer; Const NewGroupName: WideString): Integer; Safecall;
    Function SetOptionalContentGroupPrintable(OptionalContentGroupID, Printable: Integer): Integer; Safecall;
    Function SetOptionalContentGroupVisible(OptionalContentGroupID, Visible: Integer): Integer; Safecall;
    Function SetOrigin(Origin: Integer): Integer; Safecall;
    Function SetOutlineColor(OutlineID: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetOutlineDestination(OutlineID, DestPage: Integer; DestPosition: Double): Integer; Safecall;
    Function SetOutlineDestinationFull(OutlineID, DestPage, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer; Safecall;
    Function SetOutlineDestinationZoom(OutlineID, DestPage: Integer; DestPosition: Double; Zoom: Integer): Integer; Safecall;
    Function SetOutlineJavaScript(OutlineID: Integer; Const JavaScript: WideString): Integer; Safecall;
    Function SetOutlineNamedDestination(OutlineID: Integer; Const DestName: WideString): Integer; Safecall;
    Function SetOutlineOpenFile(OutlineID: Integer; Const FileName: WideString): Integer; Safecall;
    Function SetOutlineRemoteDestination(OutlineID: Integer; Const FileName: WideString; OpenPage, Zoom, DestType: Integer;
      PntLeft, PntTop, PntRight, PntBottom: Double; NewWindow: Integer): Integer; Safecall;
    Function SetOutlineStyle(OutlineID, SetItalic, SetBold: Integer): Integer; Safecall;
    Function SetOutlineTitle(OutlineID: Integer; Const NewTitle: WideString): Integer; Safecall;
    Function SetOutlineWebLink(OutlineID: Integer; Const Link: WideString): Integer; Safecall;
    Function SetOverprint(StrokingOverprint, OtherOverprint, OverprintMode: Integer): Integer; Safecall;
    Function SetPDFAMode(NewMode: Integer): Integer; Safecall;
    Function SetPNGTransparencyColor(RedByte, GreenByte, BlueByte: Integer): Integer; Safecall;
    Function SetPageActionMenu(Const MenuItem: WideString): Integer; Safecall;
    Function SetPageBox(BoxType: Integer; Left, Top, Width, Height: Double): Integer; Safecall;
    Function SetPageContentFromVariant(NewValue: Olevariant): Integer; Safecall;
    Function SetPageDimensions(NewPageWidth, NewPageHeight: Double): Integer; Safecall;
    Function SetPageLayout(NewPageLayout: Integer): Integer; Safecall;
    Function SetPageMode(NewPageMode: Integer): Integer; Safecall;
    Function SetPageSize(Const PaperName: WideString): Integer; Safecall;
    Function SetPageThumbnail: Integer; Safecall;
    Function SetPageTransparencyGroup(CS, Isolate, Knockout: Integer): Integer; Safecall;
    Function SetPageUserUnit(UserUnit: Double): Integer; Safecall;
    Function SetPrecision(NewPrecision: Integer): Integer; Safecall;
    Function SetPrinterDevModeFromVariant(Source: Olevariant): Integer; Safecall;
    Function SetRenderCropType(NewCropType: Integer): Integer; Safecall;
    Function SetRenderDCErasePage(NewErasePage: Integer): Integer; Safecall;
    Function SetRenderDCOffset(NewOffsetX, NewOffsetY: Integer): Integer; Safecall;
    Function SetRenderOptions(OptionID, NewValue: Integer): Integer; Safecall;
    Function SetRenderScale(NewScale: Double): Integer; Safecall;
    Function SetScale(NewScale: Double): Integer; Safecall;
    Function SetSignProcessCustomSubFilter(SignProcessID: Integer; Const SubFilterStr: WideString): Integer; Safecall;
    Function SetSignProcessField(SignProcessID: Integer; Const SignatureFieldName: WideString): Integer; Safecall;
    Function SetSignProcessFieldBounds(SignProcessID: Integer; Left, Top, Width, Height: Double): Integer; Safecall;
    Function SetSignProcessFieldImageFromFile(SignProcessID: Integer; Const ImageFileName: WideString; Options: Integer): Integer; Safecall;
    Function SetSignProcessFieldPage(SignProcessID, SignaturePage: Integer): Integer; Safecall;
    Function SetSignProcessInfo(SignProcessID: Integer; Const Reason, Location, ContactInfo: WideString): Integer; Safecall;
    Function SetSignProcessKeyset(SignProcessID, KeysetID: Integer): Integer; Safecall;
    Function SetSignProcessPFXFromFile(SignProcessID: Integer; Const PFXFileName, PFXPassword: WideString): Integer; Safecall;
    Function SetSignProcessPassthrough(SignProcessID, SignatureLength: Integer): Integer; Safecall;
    Function SetSignProcessSubFilter(SignProcessID, SubFilter: Integer): Integer; Safecall;
    Function SetTabOrderMode(Const Mode: WideString): Integer; Safecall;
    Function SetTableBorderColor(TableID, BorderIndex: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetTableBorderColorCMYK(TableID, BorderIndex: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetTableBorderWidth(TableID, BorderIndex: Integer; NewWidth: Double): Integer; Safecall;
    Function SetTableCellAlignment(TableID, FirstRow, FirstColumn, LastRow, LastColumn, NewCellAlignment: Integer): Integer; Safecall;
    Function SetTableCellBackgroundColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetTableCellBackgroundColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetTableCellBorderColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetTableCellBorderColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetTableCellBorderWidth(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; NewWidth: Double): Integer; Safecall;
    Function SetTableCellContent(TableID, RowNumber, ColumnNumber: Integer; Const HTMLText: WideString): Integer; Safecall;
    Function SetTableCellPadding(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; NewPadding: Double): Integer; Safecall;
    Function SetTableCellTextColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetTableCellTextColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetTableCellTextSize(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; NewTextSize: Double): Integer; Safecall;
    Function SetTableColumnWidth(TableID, FirstColumn, LastColumn: Integer; NewWidth: Double): Integer; Safecall;
    Function SetTableRowHeight(TableID, FirstRow, LastRow: Integer; NewHeight: Double): Integer; Safecall;
    Function SetTableThinBorders(TableID, ThinBorders: Integer; Red, Green, Blue: Double): Integer; Safecall;
    Function SetTableThinBordersCMYK(TableID, ThinBorders: Integer; C, M, Y, K: Double): Integer; Safecall;
    Function SetTempFile(Const FileName: WideString): Integer; Safecall;
    Function SetTempPath(Const NewPath: WideString): Integer; Safecall;
    Function SetTextAlign(TextAlign: Integer): Integer; Safecall;
    Function SetTextCharSpacing(CharSpacing: Double): Integer; Safecall;
    Function SetTextColor(Red, Green, Blue: Double): Integer; Safecall;
    Function SetTextColorCMYK(C, M, Y, K: Double): Integer; Safecall;
    Function SetTextColorSep(Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetTextExtractionArea(Left, Top, Width, Height: Double): Integer; Safecall;
    Function SetTextExtractionOptions(OptionID, NewValue: Integer): Integer; Safecall;
    Function SetTextExtractionScaling(Options: Integer; Horizontal, Vertical: Double): Integer; Safecall;
    Function SetTextExtractionWordGap(NewWordGap: Double): Integer; Safecall;
    Function SetTextHighlight(Highlight: Integer): Integer; Safecall;
    Function SetTextHighlightColor(Red, Green, Blue: Double): Integer; Safecall;
    Function SetTextHighlightColorCMYK(C, M, Y, K: Double): Integer; Safecall;
    Function SetTextHighlightColorSep(Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetTextMode(TextMode: Integer): Integer; Safecall;
    Function SetTextRise(Rise: Double): Integer; Safecall;
    Function SetTextScaling(ScalePercentage: Double): Integer; Safecall;
    Function SetTextShader(Const ShaderName: WideString): Integer; Safecall;
    Function SetTextSize(TextSize: Double): Integer; Safecall;
    Function SetTextSpacing(Spacing: Double): Integer; Safecall;
    Function SetTextUnderline(Underline: Integer): Integer; Safecall;
    Function SetTextUnderlineColor(Red, Green, Blue: Double): Integer; Safecall;
    Function SetTextUnderlineColorCMYK(C, M, Y, K: Double): Integer; Safecall;
    Function SetTextUnderlineColorSep(Const ColorName: WideString; Tint: Double): Integer; Safecall;
    Function SetTextUnderlineCustomDash(Const DashPattern: WideString; DashPhase: Double): Integer; Safecall;
    Function SetTextUnderlineDash(DashOn, DashOff: Double): Integer; Safecall;
    Function SetTextUnderlineDistance(UnderlineDistance: Double): Integer; Safecall;
    Function SetTextUnderlineWidth(UnderlineWidth: Double): Integer; Safecall;
    Function SetTextWordSpacing(WordSpacing: Double): Integer; Safecall;
    Function SetTransparency(Transparency: Integer): Integer; Safecall;
    Function SetViewerPreferences(Option, NewValue: Integer): Integer; Safecall;
    Function SetXFAFormFieldAccess(Const XFAFieldName: WideString; NewAccess: Integer): Integer; Safecall;
    Function SetXFAFormFieldBorderColor(Const XFAFieldName: WideString; Red, Green, Blue: Double): Integer; Safecall;
    Function SetXFAFormFieldBorderPresence(Const XFAFieldName: WideString; NewPresence: Integer): Integer; Safecall;
    Function SetXFAFormFieldBorderWidth(Const XFAFieldName: WideString; BorderWidth: Double): Integer; Safecall;
    Function SetXFAFormFieldValue(Const XFAFieldName, NewValue: WideString): Integer; Safecall;
    Function SetupPrinter(Const CustomPrinterName: WideString; Setting, NewValue: Integer): Integer; Safecall;
    Function SignFile(Const InputFileName, OpenPassword, SignatureFieldName, OutputFileName, PFXFileName, PFXPassword, Reason, Location,
      ContactInfo: WideString): Integer; Safecall;
    Function SplitPageText(Options: Integer): Integer; Safecall;
    Function StartPath(StartX, StartY: Double): Integer; Safecall;
    Function StoreCustomDataFromFile(Const Key, FileName: WideString; Location, Options: Integer): Integer; Safecall;
    Function StoreCustomDataFromVariant(Const Key: WideString; NewValue: Olevariant; Location, Options: Integer): Integer; Safecall;
    Function TestTempPath: Integer; Safecall;
    Function TransformFile(Const InputFileName, Password, OutputFileName: WideString; TransformType, Options: Integer): Integer; Safecall;
    Function UpdateAndFlattenFormField(Index: Integer): Integer; Safecall;
    Function UpdateAppearanceStream(Index: Integer): Integer; Safecall;
    Function UpdateTrueTypeSubsettedFont(Const SubsetChars: WideString): Integer; Safecall;
    Function UseKerning(Kern: Integer): Integer; Safecall;
    Function UseUnsafeContentStreams(SafetyLevel: Integer): Integer; Safecall;
    Function IPDFlibrary_ExtractFilePageContentToString(Const InputFileName, Password: WideString; Page: Integer): WideString; Safecall;
  Public
    Procedure Initialize; Override;
    Destructor Destroy; Override;
  End;

Implementation

Uses
{$IFNDEF XE2+}
{$IFNDEF D5}
  Variants,
{$ELSE} SysVariant, {$ENDIF}
  ComServ,
  Classes,
{$ELSE}
  System.Win.ComServ,
  System.Variants,
  System.Classes,
{$ENDIF}
  PDFlibExtra,
  PDFlibEncoding;

Function TPDFlibrary.AddArcToPath(CenterX, CenterY, TotalAngle: Double): Integer;
Begin
  Result := PDFlib.AddArcToPath(CenterX, CenterY, TotalAngle);
End;

Function TPDFlibrary.AddBoxToPath(Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.AddBoxToPath(Left, Top, Width, Height);
End;

Function TPDFlibrary.AddCJKFont(CJKFontID: Integer): Integer;
Begin
  Result := PDFlib.AddCJKFont(CJKFontID);
End;

Function TPDFlibrary.AddCurveToPath(CtAX, CtAY, CtBX, CtBY, EndX, EndY: Double): Integer;
Begin
  Result := PDFlib.AddCurveToPath(CtAX, CtAY, CtBX, CtBY, EndX, EndY);
End;

Function TPDFlibrary.AddEmbeddedFile(Const FileName, MIMEType: WideString): Integer;
Begin
  Result := PDFlib.AddEmbeddedFile(FileName, MIMEType);
End;

Function TPDFlibrary.AddFileAttachment(Const Title: WideString; EmbeddedFileID: Integer): Integer;
Begin
  Result := PDFlib.AddFileAttachment(Title, EmbeddedFileID);
End;

Function TPDFlibrary.AddFormFieldChoiceSub(Index: Integer; Const SubName, DisplayName: WideString): Integer;
Begin
  Result := PDFlib.AddFormFieldChoiceSub(Index, SubName, DisplayName);
End;

Function TPDFlibrary.AddFormFieldSub(Index: Integer; Const SubName: WideString): Integer;
Begin
  Result := PDFlib.AddFormFieldSub(Index, SubName);
End;

Function TPDFlibrary.AddFormFont(FontID: Integer): Integer;
Begin
  Result := PDFlib.AddFormFont(FontID);
End;

Function TPDFlibrary.AddFreeTextAnnotation(Left, Top, Width, Height: Double; Const Text: WideString; Angle, Options: Integer): Integer;
Begin
  Result := PDFlib.AddFreeTextAnnotation(Left, Top, Width, Height, Text, Angle, Options);
End;

Function TPDFlibrary.AddFreeTextAnnotationEx(Left, Top, Width, Height: Double; Const Text: WideString; Angle, Options, Transparency: Integer): Integer;
Begin
  Result := PDFlib.AddFreeTextAnnotationEx(Left, Top, Width, Height, Text, Angle, Options, Transparency);
End;

Function TPDFlibrary.AddGlobalJavaScript(Const PackageName, JavaScript: WideString): Integer;
Begin
  Result := PDFlib.AddGlobalJavaScript(PackageName, JavaScript);
End;

Function TPDFlibrary.AddImageFromFile(Const FileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddImageFromFile(FileName, Options);
End;

Function TPDFlibrary.AddImageFromFileOffset(Const FileName: WideString; Offset, DataLength, Options: Integer): Integer;
Begin
  Result := PDFlib.AddImageFromFileOffset(FileName, Offset, DataLength, Options);
End;

Function TPDFlibrary.AddImageFromVariant(SourceData: Olevariant; Options: Integer): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(SourceData) = (varByte or varArray or varByRef)) or (VarType(SourceData) = (varByte or varArray)) or
    (VarType(SourceData) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(SourceData, 1);
      Min := VarArrayLowBound(SourceData, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(SourceData[X]));
      Result := PDFlib.AddImageFromString(S, Options);
    Except
    End;
End;

Function TPDFlibrary.AddLGIDictToPage(Const DictContent: WideString): Integer;
Begin
  Result := PDFlib.AddLGIDictToPage(DictContent);
End;

Function TPDFlibrary.AddLineToPath(EndX, EndY: Double): Integer;
Begin
  Result := PDFlib.AddLineToPath(EndX, EndY);
End;

Function TPDFlibrary.AddLinkToDestination(Left, Top, Width, Height: Double; DestID, Options: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToDestination(Left, Top, Width, Height, DestID, Options);
End;

Function TPDFlibrary.AddLinkToEmbeddedFile(Left, Top, Width, Height: Double; EmbeddedFileID: Integer; Const Title, Contents: WideString;
  IconType, Transpareny: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToEmbeddedFile(Left, Top, Width, Height, EmbeddedFileID, Title, Contents, IconType, Transpareny);
End;

Function TPDFlibrary.AddLinkToFile(Left, Top, Width, Height: Double; Const FileName: WideString; Page: Integer; Position: Double;
  NewWindow, Options: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToFile(Left, Top, Width, Height, FileName, Page, Position, NewWindow, Options);
End;

Function TPDFlibrary.AddLinkToFileDest(Left, Top, Width, Height: Double; Const FileName, NamedDest: WideString; Position: Double;
  NewWindow, Options: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToFileDest(Left, Top, Width, Height, FileName, NamedDest, Position, NewWindow, Options);
End;

Function TPDFlibrary.AddLinkToFileEx(Left, Top, Width, Height: Double; Const FileName: WideString; DestPage, NewWindow, Options, Zoom, DestType: Integer;
  DestLeft, DestTop, DestRight, DestBottom: Double): Integer;
Begin
  Result := PDFlib.AddLinkToFileEx(Left, Top, Width, Height, FileName, DestPage, NewWindow, Options, Zoom, DestType, DestLeft, DestTop, DestRight, DestBottom);
End;

Function TPDFlibrary.AddLinkToJavaScript(Left, Top, Width, Height: Double; Const JavaScript: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToJavaScript(Left, Top, Width, Height, JavaScript, Options);
End;

Function TPDFlibrary.AddLinkToLocalFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToLocalFile(Left, Top, Width, Height, FileName, Options);
End;

Function TPDFlibrary.AddLinkToPage(Left, Top, Width, Height: Double; Page: Integer; Position: Double; Options: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToPage(Left, Top, Width, Height, Page, Position, Options);
End;

Function TPDFlibrary.AddLinkToWeb(Left, Top, Width, Height: Double; Const Link: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddLinkToWeb(Left, Top, Width, Height, Link, Options);
End;

Function TPDFlibrary.AddNoteAnnotation(Left, Top: Double; AnnotType: Integer; PopupLeft, PopupTop, PopupWidth, PopupHeight: Double;
  Const Title, Contents: WideString; Red, Green, Blue: Double; Open: Integer): Integer;
Begin
  Result := PDFlib.AddNoteAnnotation(Left, Top, AnnotType, PopupLeft, PopupTop, PopupWidth, PopupHeight, Title, Contents, Red, Green, Blue, Open);
End;

Function TPDFlibrary.AddOpenTypeFontFromFile(Const FileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddOpenTypeFontFromFile(FileName, Options);
End;

Function TPDFlibrary.AddPageLabels(Start, Style, Offset: Integer; Const Prefix: WideString): Integer;
Begin
  Result := PDFlib.AddPageLabels(Start, Style, Offset, Prefix);
End;

Function TPDFlibrary.AddPageMatrix(xscale, yscale, xoffset, yoffset: Double): Integer;
Begin
  Result := PDFlib.AddPageMatrix(xscale, yscale, xoffset, yoffset);
End;

Function TPDFlibrary.AddRelativeLinkToFile(Left, Top, Width, Height: Double; Const FileName: WideString; Page: Integer; Position: Double;
  NewWindow, Options: Integer): Integer;
Begin
  Result := PDFlib.AddRelativeLinkToFile(Left, Top, Width, Height, FileName, Page, Position, NewWindow, Options);
End;

Function TPDFlibrary.AddRelativeLinkToFileDest(Left, Top, Width, Height: Double; Const FileName, NamedDest: WideString; Position: Double;
  NewWindow, Options: Integer): Integer;
Begin
  Result := PDFlib.AddRelativeLinkToFileDest(Left, Top, Width, Height, FileName, NamedDest, Position, NewWindow, Options);
End;

Function TPDFlibrary.AddRelativeLinkToFileEx(Left, Top, Width, Height: Double; Const FileName: WideString;
  DestPage, NewWindow, Options, Zoom, DestType: Integer; DestLeft, DestTop, DestRight, DestBottom: Double): Integer;
Begin
  Result := PDFlib.AddRelativeLinkToFileEx(Left, Top, Width, Height, FileName, DestPage, NewWindow, Options, Zoom, DestType, DestLeft, DestTop, DestRight,
    DestBottom);
End;

Function TPDFlibrary.AddRelativeLinkToLocalFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddRelativeLinkToLocalFile(Left, Top, Width, Height, FileName, Options);
End;

Function TPDFlibrary.AddSVGAnnotationFromFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddSVGAnnotationFromFile(Left, Top, Width, Height, FileName, Options);
End;

Function TPDFlibrary.AddSWFAnnotationFromFile(Left, Top, Width, Height: Double; Const FileName, Title: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddSWFAnnotationFromFile(Left, Top, Width, Height, FileName, Title, Options);
End;

Function TPDFlibrary.AddSeparationColor(Const ColorName: WideString; C, M, Y, K: Double; Options: Integer): Integer;
Begin
  Result := PDFlib.AddSeparationColor(ColorName, C, M, Y, K, Options);
End;

Function TPDFlibrary.AddStampAnnotation(Left, Top, Width, Height: Double; StampType: Integer; Const Title, Contents: WideString; Red, Green, Blue: Double;
  Options: Integer): Integer;
Begin
  Result := PDFlib.AddStampAnnotation(Left, Top, Width, Height, StampType, Title, Contents, Red, Green, Blue, Options);
End;

Function TPDFlibrary.AddStampAnnotationFromImage(Left, Top, Width, Height: Double; Const FileName, Title, Contents: WideString; Red, Green, Blue: Double;
  Options: Integer): Integer;
Begin
  Result := PDFlib.AddStampAnnotationFromImage(Left, Top, Width, Height, FileName, Title, Contents, Red, Green, Blue, Options);
End;

Function TPDFlibrary.AddStampAnnotationFromImageID(Left, Top, Width, Height: Double; ImageID: Integer; Const Title, Contents: WideString;
  Red, Green, Blue: Double; Options: Integer): Integer;
Begin
  Result := PDFlib.AddStampAnnotationFromImageID(Left, Top, Width, Height, ImageID, Title, Contents, Red, Green, Blue, Options);
End;

Function TPDFlibrary.AddStandardFont(StandardFontID: Integer): Integer;
Begin
  Result := PDFlib.AddStandardFont(StandardFontID);
End;

Function TPDFlibrary.AddSubsettedFont(Const FontName: WideString; CharsetIndex: Integer; Const SubsetChars: WideString): Integer;
Begin
  Result := PDFlib.AddSubsettedFont(FontName, CharsetIndex, SubsetChars);
End;

Function TPDFlibrary.AddTextMarkupAnnotation(MarkupType: Integer; Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.AddTextMarkupAnnotation(MarkupType, Left, Top, Width, Height);
End;

Function TPDFlibrary.AddToFileList(Const ListName, FileName: WideString): Integer;
Begin
  Result := PDFlib.AddToFileList(ListName, FileName);
End;

Function TPDFlibrary.AddTrueTypeFont(Const FontName: WideString; Embed: Integer): Integer;
Begin
  Result := PDFlib.AddTrueTypeFont(FontName, Embed);
End;

Function TPDFlibrary.AddTrueTypeFontFromFile(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.AddTrueTypeFontFromFile(FileName);
End;

Function TPDFlibrary.AddTrueTypeSubsettedFont(Const FontName, SubsetChars: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddTrueTypeSubsettedFont(FontName, SubsetChars, Options);
End;

Function TPDFlibrary.AddType1Font(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.AddType1Font(FileName);
End;

Function TPDFlibrary.AddU3DAnnotationFromFile(Left, Top, Width, Height: Double; Const FileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.AddU3DAnnotationFromFile(Left, Top, Width, Height, FileName, Options);
End;

Function TPDFlibrary.AnalyseFile(Const InputFileName, Password: WideString): Integer;
Begin
  Result := PDFlib.AnalyseFile(InputFileName, Password);
End;

Function TPDFlibrary.AnnotationCount: Integer;
Begin
  Result := PDFlib.AnnotationCount;
End;

Function TPDFlibrary.AppendSpace(RelativeSpace: Double): Integer;
Begin
  Result := PDFlib.AppendSpace(RelativeSpace);
End;

Function TPDFlibrary.AppendTableColumns(TableID, NewColumnCount: Integer): Integer;
Begin
  Result := PDFlib.AppendTableColumns(TableID, NewColumnCount);
End;

Function TPDFlibrary.AppendTableRows(TableID, NewRowCount: Integer): Integer;
Begin
  Result := PDFlib.AppendTableRows(TableID, NewRowCount);
End;

Function TPDFlibrary.AppendText(Const Text: WideString): Integer;
Begin
  Result := PDFlib.AppendText(Text);
End;

Function TPDFlibrary.AppendToFile(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.AppendToFile(FileName);
End;

Function TPDFlibrary.AppendToVariant(AppendMode: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.AppendToString(AppendMode);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.ApplyStyle(Const StyleName: WideString): Integer;
Begin
  Result := PDFlib.ApplyStyle(StyleName);
End;

Function TPDFlibrary.AttachAnnotToForm(Index: Integer): Integer;
Begin
  Result := PDFlib.AttachAnnotToForm(Index);
End;

Function TPDFlibrary.BalanceContentStream: Integer;
Begin
  Result := PDFlib.BalanceContentStream;
End;

Function TPDFlibrary.BalancePageTree(Options: Integer): Integer;
Begin
  Result := PDFlib.BalancePageTree(Options);
End;

Function TPDFlibrary.BeginPageUpdate: Integer;
Begin
  Result := PDFlib.BeginPageUpdate;
End;

Function TPDFlibrary.CapturePage(Page: Integer): Integer;
Begin
  Result := PDFlib.CapturePage(Page);
End;

Function TPDFlibrary.CapturePageEx(Page, Options: Integer): Integer;
Begin
  Result := PDFlib.CapturePageEx(Page, Options);
End;

Function TPDFlibrary.CharWidth(CharCode: Integer): Integer;
Begin
  Result := PDFlib.CharWidth(CharCode);
End;

Function TPDFlibrary.CheckFileCompliance(Const InputFileName, Password: WideString; ComplianceTest, Options: Integer): Integer;
Begin
  Result := PDFlib.CheckFileCompliance(InputFileName, Password, ComplianceTest, Options);
End;

Function TPDFlibrary.CheckObjects: Integer;
Begin
  Result := PDFlib.CheckObjects;
End;

Function TPDFlibrary.CheckPageAnnots: Integer;
Begin
  Result := PDFlib.CheckPageAnnots;
End;

Function TPDFlibrary.CheckPassword(Const Password: WideString): Integer;
Begin
  Result := PDFlib.CheckPassword(Password);
End;

Function TPDFlibrary.ClearFileList(Const ListName: WideString): Integer;
Begin
  Result := PDFlib.ClearFileList(ListName);
End;

Function TPDFlibrary.ClearImage(ImageID: Integer): Integer;
Begin
  Result := PDFlib.ClearImage(ImageID);
End;

Function TPDFlibrary.ClearPageLabels: Integer;
Begin
  Result := PDFlib.ClearPageLabels;
End;

Function TPDFlibrary.ClearTextFormatting: Integer;
Begin
  Result := PDFlib.ClearTextFormatting;
End;

Function TPDFlibrary.CloneOutlineAction(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.CloneOutlineAction(OutlineID);
End;

Function TPDFlibrary.ClonePages(StartPage, EndPage, RepeatCount: Integer): Integer;
Begin
  Result := PDFlib.ClonePages(StartPage, EndPage, RepeatCount);
End;

Function TPDFlibrary.CloseOutline(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.CloseOutline(OutlineID);
End;

Function TPDFlibrary.ClosePath: Integer;
Begin
  Result := PDFlib.ClosePath;
End;

Function TPDFlibrary.CombineContentStreams: Integer;
Begin
  Result := PDFlib.CombineContentStreams;
End;

Function TPDFlibrary.CompareOutlines(FirstOutlineID, SecondOutlineID: Integer): Integer;
Begin
  Result := PDFlib.CompareOutlines(FirstOutlineID, SecondOutlineID);
End;

Function TPDFlibrary.CompressContent: Integer;
Begin
  Result := PDFlib.CompressContent;
End;

Function TPDFlibrary.CompressFonts(Compress: Integer): Integer;
Begin
  Result := PDFlib.CompressFonts(Compress);
End;

Function TPDFlibrary.CompressImages(Compress: Integer): Integer;
Begin
  Result := PDFlib.CompressImages(Compress);
End;

Function TPDFlibrary.CompressPage: Integer;
Begin
  Result := PDFlib.CompressPage;
End;

Function TPDFlibrary.ContentStreamCount: Integer;
Begin
  Result := PDFlib.ContentStreamCount;
End;

Function TPDFlibrary.ContentStreamSafe: Integer;
Begin
  Result := PDFlib.ContentStreamSafe;
End;

Function TPDFlibrary.CopyPageRanges(DocumentID: Integer; Const RangeList: WideString): Integer;
Begin
  Result := PDFlib.CopyPageRanges(DocumentID, RangeList);
End;

Function TPDFlibrary.CopyPageRangesEx(DocumentID: Integer; Const RangeList: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.CopyPageRangesEx(DocumentID, RangeList, Options);
End;

Function TPDFlibrary.CreateNewObject: Integer;
Begin
  Result := PDFlib.CreateNewObject;
End;

Function TPDFlibrary.CreateTable(RowCount, ColumnCount: Integer): Integer;
Begin
  Result := PDFlib.CreateTable(RowCount, ColumnCount);
End;

Function TPDFlibrary.DAAppendFile(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DAAppendFile(FileHandle);
End;

Function TPDFlibrary.DACapturePage(FileHandle, PageRef: Integer): Integer;
Begin
  Result := PDFlib.DACapturePage(FileHandle, PageRef);
End;

Function TPDFlibrary.DACapturePageEx(FileHandle, PageRef, Options: Integer): Integer;
Begin
  Result := PDFlib.DACapturePageEx(FileHandle, PageRef, Options);
End;

Function TPDFlibrary.DACloseFile(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DACloseFile(FileHandle);
End;

Function TPDFlibrary.DADrawCapturedPage(FileHandle, DACaptureID, DestPageRef: Integer; PntLeft, PntBottom, PntWidth, PntHeight: Double): Integer;
Begin
  Result := PDFlib.DADrawCapturedPage(FileHandle, DACaptureID, DestPageRef, PntLeft, PntBottom, PntWidth, PntHeight);
End;

Function TPDFlibrary.DADrawRotatedCapturedPage(FileHandle, DACaptureID, DestPageRef: Integer; PntLeft, PntBottom, PntWidth, PntHeight, Angle: Double): Integer;
Begin
  Result := PDFlib.DADrawRotatedCapturedPage(FileHandle, DACaptureID, DestPageRef, PntLeft, PntBottom, PntWidth, PntHeight, Angle);
End;

Function TPDFlibrary.DAEmbedFileStreams(FileHandle: Integer; Const RootPath: WideString): Integer;
Begin
  Result := PDFlib.DAEmbedFileStreams(FileHandle, RootPath);
End;

Function TPDFlibrary.DAExtractPageText(FileHandle, PageRef, Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.DAExtractPageText(FileHandle, PageRef, Options));
End;

Function TPDFlibrary.DAExtractPageTextBlocks(FileHandle, PageRef, ExtractOptions: Integer): Integer;
Begin
  Result := PDFlib.DAExtractPageTextBlocks(FileHandle, PageRef, ExtractOptions);
End;

Function TPDFlibrary.DAFindPage(FileHandle, Page: Integer): Integer;
Begin
  Result := PDFlib.DAFindPage(FileHandle, Page);
End;

Function TPDFlibrary.DAGetAnnotationCount(FileHandle, PageRef: Integer): Integer;
Begin
  Result := PDFlib.DAGetAnnotationCount(FileHandle, PageRef);
End;

Function TPDFlibrary.DAGetFormFieldCount(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DAGetFormFieldCount(FileHandle);
End;

Function TPDFlibrary.DAGetFormFieldTitle(FileHandle, FieldIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.DAGetFormFieldTitle(FileHandle, FieldIndex));
End;

Function TPDFlibrary.DAGetFormFieldValue(FileHandle, FieldIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.DAGetFormFieldValue(FileHandle, FieldIndex));
End;

Function TPDFlibrary.DAGetImageDataToVariant(FileHandle, ImageListID, ImageIndex: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.DAGetImageDataToString(FileHandle, ImageListID, ImageIndex);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.DAGetImageDblProperty(FileHandle, ImageListID, ImageIndex, PropertyID: Integer): Double;
Begin
  Result := PDFlib.DAGetImageDblProperty(FileHandle, ImageListID, ImageIndex, PropertyID);
End;

Function TPDFlibrary.DAGetImageIntProperty(FileHandle, ImageListID, ImageIndex, PropertyID: Integer): Integer;
Begin
  Result := PDFlib.DAGetImageIntProperty(FileHandle, ImageListID, ImageIndex, PropertyID);
End;

Function TPDFlibrary.DAGetImageListCount(FileHandle, ImageListID: Integer): Integer;
Begin
  Result := PDFlib.DAGetImageListCount(FileHandle, ImageListID);
End;

Function TPDFlibrary.DAGetInformation(FileHandle: Integer; Const Key: WideString): WideString;
Begin
  Result := WideString(PDFlib.DAGetInformation(FileHandle, Key));
End;

Function TPDFlibrary.DAGetObjectCount(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DAGetObjectCount(FileHandle);
End;

Function TPDFlibrary.DAGetObjectToVariant(FileHandle, ObjectNumber: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.DAGetObjectToString(FileHandle, ObjectNumber);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.DAGetPageBox(FileHandle, PageRef, BoxIndex, Dimension: Integer): Double;
Begin
  Result := PDFlib.DAGetPageBox(FileHandle, PageRef, BoxIndex, Dimension);
End;

Function TPDFlibrary.DAGetPageContentToVariant(FileHandle, PageRef: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.DAGetPageContentToString(FileHandle, PageRef);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.DAGetPageCount(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DAGetPageCount(FileHandle);
End;

Function TPDFlibrary.DAGetPageHeight(FileHandle, PageRef: Integer): Double;
Begin
  Result := PDFlib.DAGetPageHeight(FileHandle, PageRef);
End;

Function TPDFlibrary.DAGetPageImageList(FileHandle, PageRef: Integer): Integer;
Begin
  Result := PDFlib.DAGetPageImageList(FileHandle, PageRef);
End;

Function TPDFlibrary.DAGetPageWidth(FileHandle, PageRef: Integer): Double;
Begin
  Result := PDFlib.DAGetPageWidth(FileHandle, PageRef);
End;

Function TPDFlibrary.DAGetTextBlockAsString(TextBlockListID, Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.DAGetTextBlockAsString(TextBlockListID, Index));
End;

Function TPDFlibrary.DAGetTextBlockBound(TextBlockListID, Index, BoundIndex: Integer): Double;
Begin
  Result := PDFlib.DAGetTextBlockBound(TextBlockListID, Index, BoundIndex);
End;

Function TPDFlibrary.DAGetTextBlockCharWidth(TextBlockListID, Index, CharIndex: Integer): Double;
Begin
  Result := PDFlib.DAGetTextBlockCharWidth(TextBlockListID, Index, CharIndex);
End;

Function TPDFlibrary.DAGetTextBlockColor(TextBlockListID, Index, ColorComponent: Integer): Double;
Begin
  Result := PDFlib.DAGetTextBlockColor(TextBlockListID, Index, ColorComponent);
End;

Function TPDFlibrary.DAGetTextBlockColorType(TextBlockListID, Index: Integer): Integer;
Begin
  Result := PDFlib.DAGetTextBlockColorType(TextBlockListID, Index);
End;

Function TPDFlibrary.DAGetTextBlockCount(TextBlockListID: Integer): Integer;
Begin
  Result := PDFlib.DAGetTextBlockCount(TextBlockListID);
End;

Function TPDFlibrary.DAGetTextBlockFontName(TextBlockListID, Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.DAGetTextBlockFontName(TextBlockListID, Index));
End;

Function TPDFlibrary.DAGetTextBlockFontSize(TextBlockListID, Index: Integer): Double;
Begin
  Result := PDFlib.DAGetTextBlockFontSize(TextBlockListID, Index);
End;

Function TPDFlibrary.DAGetTextBlockText(TextBlockListID, Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.DAGetTextBlockText(TextBlockListID, Index));
End;

Function TPDFlibrary.DAHasPageBox(FileHandle, PageRef, BoxIndex: Integer): Integer;
Begin
  Result := PDFlib.DAHasPageBox(FileHandle, PageRef, BoxIndex);
End;

Function TPDFlibrary.DAHidePage(FileHandle, PageRef: Integer): Integer;
Begin
  Result := PDFlib.DAHidePage(FileHandle, PageRef);
End;

Function TPDFlibrary.DAMovePage(FileHandle, PageRef, TargetPageRef, Options: Integer): Integer;
Begin
  Result := PDFlib.DAMovePage(FileHandle, PageRef, TargetPageRef, Options);
End;

Function TPDFlibrary.DANewPage(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DANewPage(FileHandle);
End;

Function TPDFlibrary.DANewPages(FileHandle, PageCount: Integer): Integer;
Begin
  Result := PDFlib.DANewPages(FileHandle, PageCount);
End;

Function TPDFlibrary.DANormalizePage(FileHandle, PageRef, NormalizeOptions: Integer): Integer;
Begin
  Result := PDFlib.DANormalizePage(FileHandle, PageRef, NormalizeOptions);
End;

Function TPDFlibrary.DAOpenFile(Const InputFileName, Password: WideString): Integer;
Begin
  Result := PDFlib.DAOpenFile(InputFileName, Password);
End;

Function TPDFlibrary.DAOpenFileReadOnly(Const InputFileName, Password: WideString): Integer;
Begin
  Result := PDFlib.DAOpenFileReadOnly(InputFileName, Password);
End;

Function TPDFlibrary.DAPageRotation(FileHandle, PageRef: Integer): Integer;
Begin
  Result := PDFlib.DAPageRotation(FileHandle, PageRef);
End;

Function TPDFlibrary.DAReleaseImageList(FileHandle, ImageListID: Integer): Integer;
Begin
  Result := PDFlib.DAReleaseImageList(FileHandle, ImageListID);
End;

Function TPDFlibrary.DAReleaseTextBlocks(TextBlockListID: Integer): Integer;
Begin
  Result := PDFlib.DAReleaseTextBlocks(TextBlockListID);
End;

Function TPDFlibrary.DARemoveUsageRights(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DARemoveUsageRights(FileHandle);
End;

Function TPDFlibrary.DARenderPageToDC(FileHandle, PageRef: Integer; DPI: Double; DC: Integer): Integer;
Begin
  Result := PDFlib.DARenderPageToDC(FileHandle, PageRef, DPI, HDC(DC));
End;

Function TPDFlibrary.DARenderPageToFile(FileHandle, PageRef, Options: Integer; DPI: Double; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.DARenderPageToFile(FileHandle, PageRef, Options, DPI, FileName);
End;

Function TPDFlibrary.DARenderPageToVariant(FileHandle, PageRef, Options: Integer; DPI: Double): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.DARenderPageToString(FileHandle, PageRef, Options, DPI);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.DARotatePage(FileHandle, PageRef, Angle, Options: Integer): Integer;
Begin
  Result := PDFlib.DARotatePage(FileHandle, PageRef, Angle, Options);
End;

Function TPDFlibrary.DASaveAsFile(FileHandle: Integer; Const OutputFileName: WideString): Integer;
Begin
  Result := PDFlib.DASaveAsFile(FileHandle, OutputFileName);
End;

Function TPDFlibrary.DASaveImageDataToFile(FileHandle, ImageListID, ImageIndex: Integer; Const ImageFileName: WideString): Integer;
Begin
  Result := PDFlib.DASaveImageDataToFile(FileHandle, ImageListID, ImageIndex, ImageFileName);
End;

Function TPDFlibrary.DASetInformation(FileHandle: Integer; Const Key, NewValue: WideString): Integer;
Begin
  Result := PDFlib.DASetInformation(FileHandle, Key, NewValue);
End;

Function TPDFlibrary.DASetPageBox(FileHandle, PageRef, BoxIndex: Integer; X1, Y1, X2, Y2: Double): Integer;
Begin
  Result := PDFlib.DASetPageBox(FileHandle, PageRef, BoxIndex, X1, Y1, X2, Y2);
End;

Function TPDFlibrary.DASetPageLayout(FileHandle, NewPageLayout: Integer): Integer;
Begin
  Result := PDFlib.DASetPageLayout(FileHandle, NewPageLayout);
End;

Function TPDFlibrary.DASetPageMode(FileHandle, NewPageMode: Integer): Integer;
Begin
  Result := PDFlib.DASetPageMode(FileHandle, NewPageMode);
End;

Function TPDFlibrary.DASetPageSize(FileHandle, PageRef: Integer; PntWidth, PntHeight: Double): Integer;
Begin
  Result := PDFlib.DASetPageSize(FileHandle, PageRef, PntWidth, PntHeight);
End;

Function TPDFlibrary.DASetTextExtractionArea(Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.DASetTextExtractionArea(Left, Top, Width, Height);
End;

Function TPDFlibrary.DASetTextExtractionOptions(OptionID, NewValue: Integer): Integer;
Begin
  Result := PDFlib.DASetTextExtractionOptions(OptionID, NewValue);
End;

Function TPDFlibrary.DASetTextExtractionScaling(Options: Integer; Horizontal, Vertical: Double): Integer;
Begin
  Result := PDFlib.DASetTextExtractionScaling(Options, Horizontal, Vertical);
End;

Function TPDFlibrary.DASetTextExtractionWordGap(NewWordGap: Double): Integer;
Begin
  Result := PDFlib.DASetTextExtractionWordGap(NewWordGap);
End;

Function TPDFlibrary.DAShiftedHeader(FileHandle: Integer): Integer;
Begin
  Result := PDFlib.DAShiftedHeader(FileHandle);
End;

Function TPDFlibrary.Decrypt: Integer;
Begin
  Result := PDFlib.Decrypt;
End;

Function TPDFlibrary.DecryptFile(Const InputFileName, OutputFileName, Password: WideString): Integer;
Begin
  Result := PDFlib.DecryptFile(InputFileName, OutputFileName, Password);
End;

Function TPDFlibrary.DeleteAnalysis(AnalysisID: Integer): Integer;
Begin
  Result := PDFlib.DeleteAnalysis(AnalysisID);
End;

Function TPDFlibrary.DeleteAnnotation(Index: Integer): Integer;
Begin
  Result := PDFlib.DeleteAnnotation(Index);
End;

Function TPDFlibrary.DeleteContentStream: Integer;
Begin
  Result := PDFlib.DeleteContentStream;
End;

Function TPDFlibrary.DeleteFormField(Index: Integer): Integer;
Begin
  Result := PDFlib.DeleteFormField(Index);
End;

Function TPDFlibrary.DeleteOptionalContentGroup(OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.DeleteOptionalContentGroup(OptionalContentGroupID);
End;

Function TPDFlibrary.DeletePageLGIDict(DictIndex: Integer): Integer;
Begin
  Result := PDFlib.DeletePageLGIDict(DictIndex);
End;

Function TPDFlibrary.DeletePages(StartPage, PageCount: Integer): Integer;
Begin
  Result := PDFlib.DeletePages(StartPage, PageCount);
End;

Function TPDFlibrary.DocJavaScriptAction(Const ActionType, JavaScript: WideString): Integer;
Begin
  Result := PDFlib.DocJavaScriptAction(ActionType, JavaScript);
End;

Function TPDFlibrary.DocumentCount: Integer;
Begin
  Result := PDFlib.DocumentCount;
End;

Function TPDFlibrary.DrawArc(XPos, YPos, Radius, StartAngle, EndAngle: Double; Pie, DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawArc(XPos, YPos, Radius, StartAngle, EndAngle, Pie, DrawOptions);
End;

Function TPDFlibrary.DrawBarcode(Left, Top, Width, Height: Double; Const Text: WideString; Barcode, Options: Integer): Integer;
Begin
  Result := PDFlib.DrawBarcode(Left, Top, Width, Height, Text, Barcode, Options);
End;

Function TPDFlibrary.DrawBox(Left, Top, Width, Height: Double; DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawBox(Left, Top, Width, Height, DrawOptions);
End;

Function TPDFlibrary.DrawCapturedPage(CaptureID: Integer; Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.DrawCapturedPage(CaptureID, Left, Top, Width, Height);
End;

Function TPDFlibrary.DrawCapturedPageMatrix(CaptureID: Integer; M11, M12, M21, M22, MDX, MDY: Double): Integer;
Begin
  Result := PDFlib.DrawCapturedPageMatrix(CaptureID, M11, M12, M21, M22, MDX, MDY);
End;

Function TPDFlibrary.DrawCircle(XPos, YPos, Radius: Double; DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawCircle(XPos, YPos, Radius, DrawOptions);
End;

Function TPDFlibrary.DrawDataMatrixSymbol(Left, Top, ModuleSize: Double; Const Text: WideString; Encoding, SymbolSize, Options: Integer): Integer;
Begin
  Result := PDFlib.DrawDataMatrixSymbol(Left, Top, ModuleSize, Text, Encoding, SymbolSize, Options);
End;

Function TPDFlibrary.DrawEllipse(XPos, YPos, Width, Height: Double; DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawEllipse(XPos, YPos, Width, Height, DrawOptions);
End;

Function TPDFlibrary.DrawEllipticArc(XPos, YPos, Width, Height, StartAngle, EndAngle: Double; Pie, DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawEllipticArc(XPos, YPos, Width, Height, StartAngle, EndAngle, Pie, DrawOptions);
End;

Function TPDFlibrary.DrawHTMLText(Left, Top, Width: Double; Const HTMLText: WideString): Integer;
Begin
  Result := PDFlib.DrawHTMLText(Left, Top, Width, HTMLText);
End;

Function TPDFlibrary.DrawHTMLTextBox(Left, Top, Width, Height: Double; Const HTMLText: WideString): WideString;
Begin
  Result := WideString(PDFlib.DrawHTMLTextBox(Left, Top, Width, Height, HTMLText));
End;

Function TPDFlibrary.DrawHTMLTextBoxMatrix(Width, Height: Double; Const HTMLText: WideString; M11, M12, M21, M22, MDX, MDY: Double): WideString;
Begin
  Result := WideString(PDFlib.DrawHTMLTextBoxMatrix(Width, Height, HTMLText, M11, M12, M21, M22, MDX, MDY));
End;

Function TPDFlibrary.DrawHTMLTextMatrix(Width: Double; Const HTMLText: WideString; M11, M12, M21, M22, MDX, MDY: Double): Integer;
Begin
  Result := PDFlib.DrawHTMLTextMatrix(Width, HTMLText, M11, M12, M21, M22, MDX, MDY);
End;

Function TPDFlibrary.DrawImage(Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.DrawImage(Left, Top, Width, Height);
End;

Function TPDFlibrary.DrawImageMatrix(M11, M12, M21, M22, MDX, MDY: Double): Integer;
Begin
  Result := PDFlib.DrawImageMatrix(M11, M12, M21, M22, MDX, MDY);
End;

Function TPDFlibrary.DrawIntelligentMailBarcode(Left, Top, BarWidth, FullBarHeight, TrackerHeight, SpaceWidth: Double; Const BarcodeData: WideString;
  Options: Integer): Integer;
Begin
  Result := PDFlib.DrawIntelligentMailBarcode(Left, Top, BarWidth, FullBarHeight, TrackerHeight, SpaceWidth, BarcodeData, Options);
End;

Function TPDFlibrary.DrawLine(StartX, StartY, EndX, EndY: Double): Integer;
Begin
  Result := PDFlib.DrawLine(StartX, StartY, EndX, EndY);
End;

Function TPDFlibrary.DrawMultiLineText(XPos, YPos: Double; Const Delimiter, Text: WideString): Integer;
Begin
  Result := PDFlib.DrawMultiLineText(XPos, YPos, Delimiter, Text);
End;

Function TPDFlibrary.DrawPDF417Symbol(Left, Top: Double; Const Text: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.DrawPDF417Symbol(Left, Top, Text, Options);
End;

Function TPDFlibrary.DrawPDF417SymbolEx(Left, Top: Double; Const Text: WideString; Options, FixedColumns, FixedRows, ErrorLevel: Integer;
  ModuleSize, HeightWidthRatio: Double): Integer;
Begin
  Result := PDFlib.DrawPDF417SymbolEx(Left, Top, Text, Options, FixedColumns, FixedRows, ErrorLevel, ModuleSize, HeightWidthRatio);
End;

Function TPDFlibrary.DrawPath(PathOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawPath(PathOptions);
End;

Function TPDFlibrary.DrawPathEvenOdd(PathOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawPathEvenOdd(PathOptions);
End;

Function TPDFlibrary.DrawPostScriptXObject(PSRef: Integer): Integer;
Begin
  Result := PDFlib.DrawPostScriptXObject(PSRef);
End;

Function TPDFlibrary.DrawQRCode(Left, Top, SymbolSize: Double; Const Text: WideString; EncodeOptions, DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawQRCode(Left, Top, SymbolSize, Text, EncodeOptions, DrawOptions);
End;

Function TPDFlibrary.DrawRotatedBox(Left, Bottom, Width, Height, Angle: Double; DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawRotatedBox(Left, Bottom, Width, Height, Angle, DrawOptions);
End;

Function TPDFlibrary.DrawRotatedCapturedPage(CaptureID: Integer; Left, Bottom, Width, Height, Angle: Double): Integer;
Begin
  Result := PDFlib.DrawRotatedCapturedPage(CaptureID, Left, Bottom, Width, Height, Angle);
End;

Function TPDFlibrary.DrawRotatedImage(Left, Bottom, Width, Height, Angle: Double): Integer;
Begin
  Result := PDFlib.DrawRotatedImage(Left, Bottom, Width, Height, Angle);
End;

Function TPDFlibrary.DrawRotatedMultiLineText(XPos, YPos, Angle: Double; Const Delimiter, Text: WideString): Integer;
Begin
  Result := PDFlib.DrawRotatedMultiLineText(XPos, YPos, Angle, Delimiter, Text);
End;

Function TPDFlibrary.DrawRotatedText(XPos, YPos, Angle: Double; Const Text: WideString): Integer;
Begin
  Result := PDFlib.DrawRotatedText(XPos, YPos, Angle, Text);
End;

Function TPDFlibrary.DrawRotatedTextBox(Left, Top, Width, Height, Angle: Double; Const Text: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.DrawRotatedTextBox(Left, Top, Width, Height, Angle, Text, Options);
End;

Function TPDFlibrary.DrawRotatedTextBoxEx(Left, Top, Width, Height, Angle: Double; Const Text: WideString;
  Options, Border, Radius, DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawRotatedTextBoxEx(Left, Top, Width, Height, Angle, Text, Options, Border, Radius, DrawOptions);
End;

Function TPDFlibrary.DrawRoundedBox(Left, Top, Width, Height, Radius: Double; DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawRoundedBox(Left, Top, Width, Height, Radius, DrawOptions);
End;

Function TPDFlibrary.DrawRoundedRotatedBox(Left, Bottom, Width, Height, Radius, Angle: Double; DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawRoundedRotatedBox(Left, Bottom, Width, Height, Radius, Angle, DrawOptions);
End;

Function TPDFlibrary.DrawScaledImage(Left, Top, Scale: Double): Integer;
Begin
  Result := PDFlib.DrawScaledImage(Left, Top, Scale);
End;

Function TPDFlibrary.DrawSpacedText(XPos, YPos, Spacing: Double; Const Text: WideString): Integer;
Begin
  Result := PDFlib.DrawSpacedText(XPos, YPos, Spacing, Text);
End;

Function TPDFlibrary.DrawTableRows(TableID: Integer; Left, Top, Height: Double; FirstRow, LastRow: Integer): Double;
Begin
  Result := PDFlib.DrawTableRows(TableID, Left, Top, Height, FirstRow, LastRow);
End;

Function TPDFlibrary.DrawText(XPos, YPos: Double; Const Text: WideString): Integer;
Begin
  Result := PDFlib.DrawText(XPos, YPos, Text);
End;

Function TPDFlibrary.DrawTextArc(XPos, YPos, Radius, Angle: Double; Const Text: WideString; DrawOptions: Integer): Integer;
Begin
  Result := PDFlib.DrawTextArc(XPos, YPos, Radius, Angle, Text, DrawOptions);
End;

Function TPDFlibrary.DrawTextBox(Left, Top, Width, Height: Double; Const Text: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.DrawTextBox(Left, Top, Width, Height, Text, Options);
End;

Function TPDFlibrary.DrawTextBoxMatrix(Width, Height: Double; Const Text: WideString; Options: Integer; M11, M12, M21, M22, MDX, MDY: Double): Integer;
Begin
  Result := PDFlib.DrawTextBoxMatrix(Width, Height, Text, Options, M11, M12, M21, M22, MDX, MDY);
End;

Function TPDFlibrary.DrawWrappedText(XPos, YPos, Width: Double; Const Text: WideString): Integer;
Begin
  Result := PDFlib.DrawWrappedText(XPos, YPos, Width, Text);
End;

Function TPDFlibrary.EditableContentStream: Integer;
Begin
  Result := PDFlib.EditableContentStream;
End;

Function TPDFlibrary.EmbedFile(Const Title, FileName, MIMEType: WideString): Integer;
Begin
  Result := PDFlib.EmbedFile(Title, FileName, MIMEType);
End;

Function TPDFlibrary.EmbeddedFileCount: Integer;
Begin
  Result := PDFlib.EmbeddedFileCount;
End;

Function TPDFlibrary.EncapsulateContentStream: Integer;
Begin
  Result := PDFlib.EncapsulateContentStream;
End;

Function TPDFlibrary.EncodePermissions(CanPrint, CanCopy, CanChange, CanAddNotes, CanFillFields, CanCopyAccess, CanAssemble, CanPrintFull: Integer): Integer;
Begin
  Result := PDFlib.EncodePermissions(CanPrint, CanCopy, CanChange, CanAddNotes, CanFillFields, CanCopyAccess, CanAssemble, CanPrintFull);
End;

Function TPDFlibrary.EncodeStringFromVariant(NumberList: Olevariant; Const Encoding: WideString; UnmatchedAction: Integer): WideString;
Var
  NumberCodes: Array Of Cardinal;
  X: Integer;
  VC: Variant;
  CC: Cardinal;
  Max: Integer;
  Min: Integer;
  ByteEncoding: Boolean;
Begin
  SetLength(Result, 0);
  If (VarType(NumberList) and varArray) = varArray Then
  Begin
    ByteEncoding := (Encoding = 'UTF-8') or (Encoding = 'UTF-16LE') or (Encoding = 'UTF-16BE') or (Encoding = 'CP932');
    Try
      Max := VarArrayHighBound(NumberList, 1);
      Min := VarArrayLowBound(NumberList, 1);
      SetLength(NumberCodes, Max - Min + 1);
      For X := Min To Max Do
      Begin
        VC := NumberList[X];
        If VarIsOrdinal(VC) Then
        Begin
          If (ByteEncoding and (VarType(VC) = varShortInt)) Then
          Begin
            CC := Byte(VC);
          End
          Else
            CC := VC;
        End
        Else
          CC := $FFFD;
        NumberCodes[X - Min] := CC;
      End;
      Result := PLEncodeStringFromCodes(NumberCodes, AnsiString(Encoding), UnmatchedAction = 0);
    Except
    End;
  End;
End;

Function TPDFlibrary.Encrypt(Const Owner, User: WideString; Strength, Permissions: Integer): Integer;
Begin
  Result := PDFlib.Encrypt(Owner, User, Strength, Permissions);
End;

Function TPDFlibrary.EncryptFile(Const InputFileName, OutputFileName, Owner, User: WideString; Strength, Permissions: Integer): Integer;
Begin
  Result := PDFlib.EncryptFile(InputFileName, OutputFileName, Owner, User, Strength, Permissions);
End;

Function TPDFlibrary.EncryptWithFingerprint(Const Fingerprint: WideString): Integer;
Begin
  Result := PDFlib.EncryptWithFingerprint(Fingerprint);
End;

Function TPDFlibrary.EncryptionAlgorithm: Integer;
Begin
  Result := PDFlib.EncryptionAlgorithm;
End;

Function TPDFlibrary.EncryptionStatus: Integer;
Begin
  Result := PDFlib.EncryptionStatus;
End;

Function TPDFlibrary.EncryptionStrength: Integer;
Begin
  Result := PDFlib.EncryptionStrength;
End;

Function TPDFlibrary.EndPageUpdate: Integer;
Begin
  Result := PDFlib.EndPageUpdate;
End;

Function TPDFlibrary.EndSignProcessToFile(SignProcessID: Integer; Const OutputFile: WideString): Integer;
Begin
  Result := PDFlib.EndSignProcessToFile(SignProcessID, OutputFile);
End;

Function TPDFlibrary.ExtractFilePageContentToVariant(Const InputFileName, Password: WideString; Page: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.ExtractFilePageContentToString(InputFileName, Password, Page);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.ExtractFilePageText(Const InputFileName, Password: WideString; Page, Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.ExtractFilePageText(InputFileName, Password, Page, Options));
End;

Function TPDFlibrary.ExtractFilePageTextBlocks(Const InputFileName, Password: WideString; Page, Options: Integer): Integer;
Begin
  Result := PDFlib.ExtractFilePageTextBlocks(InputFileName, Password, Page, Options);
End;

Function TPDFlibrary.ExtractFilePages(Const InputFileName, Password, OutputFileName, RangeList: WideString): Integer;
Begin
  Result := PDFlib.ExtractFilePages(InputFileName, Password, OutputFileName, RangeList);
End;

Function TPDFlibrary.ExtractFilePagesEx(Const InputFileName, Password, OutputFileName, RangeList: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.ExtractFilePagesEx(InputFileName, Password, OutputFileName, RangeList, Options);
End;

Function TPDFlibrary.ExtractPageRanges(Const RangeList: WideString): Integer;
Begin
  Result := PDFlib.ExtractPageRanges(RangeList);
End;

Function TPDFlibrary.ExtractPageTextBlocks(ExtractOptions: Integer): Integer;
Begin
  Result := PDFlib.ExtractPageTextBlocks(ExtractOptions);
End;

Function TPDFlibrary.ExtractPages(StartPage, PageCount: Integer): Integer;
Begin
  Result := PDFlib.ExtractPages(StartPage, PageCount);
End;

Function TPDFlibrary.FileListCount(Const ListName: WideString): Integer;
Begin
  Result := PDFlib.FileListCount(ListName);
End;

Function TPDFlibrary.FileListItem(Const ListName: WideString; Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.FileListItem(ListName, Index));
End;

Function TPDFlibrary.FindFonts: Integer;
Begin
  Result := PDFlib.FindFonts;
End;

Function TPDFlibrary.FindFormFieldByTitle(Const Title: WideString): Integer;
Begin
  Result := PDFlib.FindFormFieldByTitle(Title);
End;

Function TPDFlibrary.FindImages: Integer;
Begin
  Result := PDFlib.FindImages;
End;

Function TPDFlibrary.FitImage(Left, Top, Width, Height: Double; HAlign, VAlign, Rotate: Integer): Integer;
Begin
  Result := PDFlib.FitImage(Left, Top, Width, Height, HAlign, VAlign, Rotate);
End;

Function TPDFlibrary.FitRotatedTextBox(Left, Top, Width, Height, Angle: Double; Const Text: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.FitRotatedTextBox(Left, Top, Width, Height, Angle, Text, Options);
End;

Function TPDFlibrary.FitTextBox(Left, Top, Width, Height: Double; Const Text: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.FitTextBox(Left, Top, Width, Height, Text, Options);
End;

Function TPDFlibrary.FlattenAnnot(Index, Options: Integer): Integer;
Begin
  Result := PDFlib.FlattenAnnot(Index, Options);
End;

Function TPDFlibrary.FlattenFormField(Index: Integer): Integer;
Begin
  Result := PDFlib.FlattenFormField(Index);
End;

Function TPDFlibrary.FontCount: Integer;
Begin
  Result := PDFlib.FontCount;
End;

Function TPDFlibrary.FontFamily: WideString;
Begin
  Result := WideString(PDFlib.FontFamily);
End;

Function TPDFlibrary.FontHasKerning: Integer;
Begin
  Result := PDFlib.FontHasKerning;
End;

Function TPDFlibrary.FontName: WideString;
Begin
  Result := WideString(PDFlib.FontName);
End;

Function TPDFlibrary.FontReference: WideString;
Begin
  Result := WideString(PDFlib.FontReference);
End;

Function TPDFlibrary.FontSize: Integer;
Begin
  Result := PDFlib.FontSize;
End;

Function TPDFlibrary.FontType: Integer;
Begin
  Result := PDFlib.FontType;
End;

Function TPDFlibrary.FormFieldCount: Integer;
Begin
  Result := PDFlib.FormFieldCount;
End;

Function TPDFlibrary.FormFieldHasParent(Index: Integer): Integer;
Begin
  Result := PDFlib.FormFieldHasParent(Index);
End;

Function TPDFlibrary.FormFieldJavaScriptAction(Index: Integer; Const ActionType, JavaScript: WideString): Integer;
Begin
  Result := PDFlib.FormFieldJavaScriptAction(Index, ActionType, JavaScript);
End;

Function TPDFlibrary.FormFieldWebLinkAction(Index: Integer; Const ActionType, Link: WideString): Integer;
Begin
  Result := PDFlib.FormFieldWebLinkAction(Index, ActionType, Link);
End;

Function TPDFlibrary.GetActionDest(ActionID: Integer): Integer;
Begin
  Result := PDFlib.GetActionDest(ActionID);
End;

Function TPDFlibrary.GetActionType(ActionID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetActionType(ActionID));
End;

Function TPDFlibrary.GetActionURL(ActionID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetActionURL(ActionID));
End;

Function TPDFlibrary.GetAnalysisInfo(AnalysisID, AnalysisItem: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetAnalysisInfo(AnalysisID, AnalysisItem));
End;

Function TPDFlibrary.GetAnnotActionID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetAnnotActionID(Index);
End;

Function TPDFlibrary.GetAnnotDblProperty(Index, Tag: Integer): Double;
Begin
  Result := PDFlib.GetAnnotDblProperty(Index, Tag);
End;

Function TPDFlibrary.GetAnnotDest(Index: Integer): Integer;
Begin
  Result := PDFlib.GetAnnotDest(Index);
End;

Function TPDFlibrary.GetAnnotEmbeddedFileName(Index, Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetAnnotEmbeddedFileName(Index, Options));
End;

Function TPDFlibrary.GetAnnotEmbeddedFileToFile(Index, Options: Integer; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.GetAnnotEmbeddedFileToFile(Index, Options, FileName);
End;

Function TPDFlibrary.GetAnnotIntProperty(Index, Tag: Integer): Integer;
Begin
  Result := PDFlib.GetAnnotIntProperty(Index, Tag);
End;

Function TPDFlibrary.GetAnnotQuadCount(Index: Integer): Integer;
Begin
  Result := PDFlib.GetAnnotQuadCount(Index);
End;

Function TPDFlibrary.GetAnnotQuadPoints(Index, QuadNumber, PointNumber: Integer): Double;
Begin
  Result := PDFlib.GetAnnotQuadPoints(Index, QuadNumber, PointNumber);
End;

Function TPDFlibrary.GetAnnotSoundToFile(Index, Options: Integer; Const SoundFileName: WideString): Integer;
Begin
  Result := PDFlib.GetAnnotSoundToFile(Index, Options, SoundFileName);
End;

Function TPDFlibrary.GetAnnotStrProperty(Index, Tag: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetAnnotStrProperty(Index, Tag));
End;

Function TPDFlibrary.GetBarcodeWidth(NominalWidth: Double; Const Text: WideString; Barcode: Integer): Double;
Begin
  Result := PDFlib.GetBarcodeWidth(NominalWidth, Text, Barcode);
End;

Function TPDFlibrary.GetBaseURL: WideString;
Begin
  Result := WideString(PDFlib.GetBaseURL);
End;

Function TPDFlibrary.GetCSDictEPSG(CSDictID: Integer): Integer;
Begin
  Result := PDFlib.GetCSDictEPSG(CSDictID);
End;

Function TPDFlibrary.GetCSDictType(CSDictID: Integer): Integer;
Begin
  Result := PDFlib.GetCSDictType(CSDictID);
End;

Function TPDFlibrary.GetCSDictWKT(CSDictID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetCSDictWKT(CSDictID));
End;

Function TPDFlibrary.GetCanvasDC(CanvasWidth, CanvasHeight: Integer): Integer;
Begin
  Result := PDFlib.GetCanvasDC(CanvasWidth, CanvasHeight);
End;

Function TPDFlibrary.GetCanvasDCEx(CanvasWidth, CanvasHeight, ReferenceDC: Integer): Integer;
Begin
  Result := PDFlib.GetCanvasDCEx(CanvasWidth, CanvasHeight, ReferenceDC);
End;

Function TPDFlibrary.GetCatalogInformation(Const Key: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetCatalogInformation(Key));
End;

Function TPDFlibrary.GetContentStreamToVariant: Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.GetContentStreamToString;
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.GetCustomInformation(Const Key: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetCustomInformation(Key));
End;

Function TPDFlibrary.GetCustomKeys(Location: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetCustomKeys(Location));
End;

Function TPDFlibrary.GetDefaultPrinterName: WideString;
Begin
  Result := WideString(PDFlib.GetDefaultPrinterName);
End;

Function TPDFlibrary.GetDestName(DestID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetDestName(DestID));
End;

Function TPDFlibrary.GetDestPage(DestID: Integer): Integer;
Begin
  Result := PDFlib.GetDestPage(DestID);
End;

Function TPDFlibrary.GetDestType(DestID: Integer): Integer;
Begin
  Result := PDFlib.GetDestType(DestID);
End;

Function TPDFlibrary.GetDestValue(DestID, ValueKey: Integer): Double;
Begin
  Result := PDFlib.GetDestValue(DestID, ValueKey);
End;

Function TPDFlibrary.GetDocJavaScript(Const ActionType: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetDocJavaScript(ActionType));
End;

Function TPDFlibrary.GetDocumentFileName: WideString;
Begin
  Result := WideString(PDFlib.GetDocumentFileName);
End;

Function TPDFlibrary.GetDocumentFileSize: Integer;
Begin
  Result := PDFlib.GetDocumentFileSize;
End;

Function TPDFlibrary.GetDocumentID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetDocumentID(Index);
End;

Function TPDFlibrary.GetDocumentIdentifier(Part, Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetDocumentIdentifier(Part, Options));
End;

Function TPDFlibrary.GetDocumentMetadata: WideString;
Begin
  Result := WideString(PDFlib.GetDocumentMetadata);
End;

Function TPDFlibrary.GetDocumentRepaired: Integer;
Begin
  Result := PDFlib.GetDocumentRepaired;
End;

Function TPDFlibrary.GetDocumentResourceList: WideString;
Begin
  Result := WideString(PDFlib.GetDocumentResourceList);
End;

Function TPDFlibrary.GetEmbeddedFileContentToFile(Index: Integer; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.GetEmbeddedFileContentToFile(Index, FileName);
End;

Function TPDFlibrary.GetEmbeddedFileContentToVariant(Index: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.GetEmbeddedFileContentToString(Index);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.GetEmbeddedFileID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetEmbeddedFileID(Index);
End;

Function TPDFlibrary.GetEmbeddedFileIntProperty(Index, Tag: Integer): Integer;
Begin
  Result := PDFlib.GetEmbeddedFileIntProperty(Index, Tag);
End;

Function TPDFlibrary.GetEmbeddedFileStrProperty(Index, Tag: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetEmbeddedFileStrProperty(Index, Tag));
End;

Function TPDFlibrary.GetEncryptionFingerprint: WideString;
Begin
  Result := WideString(PDFlib.GetEncryptionFingerprint);
End;

Function TPDFlibrary.GetFileMetadata(Const InputFileName, Password: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetFileMetadata(InputFileName, Password));
End;

Function TPDFlibrary.GetFirstChildOutline(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetFirstChildOutline(OutlineID);
End;

Function TPDFlibrary.GetFirstOutline: Integer;
Begin
  Result := PDFlib.GetFirstOutline;
End;

Function TPDFlibrary.GetFontEncoding: Integer;
Begin
  Result := PDFlib.GetFontEncoding;
End;

Function TPDFlibrary.GetFontFlags(FontFlagItemID: Integer): Integer;
Begin
  Result := PDFlib.GetFontFlags(FontFlagItemID);
End;

Function TPDFlibrary.GetFontID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFontID(Index);
End;

Function TPDFlibrary.GetFontIsEmbedded: Integer;
Begin
  Result := PDFlib.GetFontIsEmbedded;
End;

Function TPDFlibrary.GetFontIsSubsetted: Integer;
Begin
  Result := PDFlib.GetFontIsSubsetted;
End;

Function TPDFlibrary.GetFontMetrics(MetricType: Integer): Integer;
Begin
  Result := PDFlib.GetFontMetrics(MetricType);
End;

Function TPDFlibrary.GetFontObjectNumber: Integer;
Begin
  Result := PDFlib.GetFontObjectNumber;
End;

Function TPDFlibrary.GetFormFieldActionID(Index: Integer; Const TriggerEvent: WideString): Integer;
Begin
  Result := PDFlib.GetFormFieldActionID(Index, TriggerEvent);
End;

Function TPDFlibrary.GetFormFieldAlignment(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldAlignment(Index);
End;

Function TPDFlibrary.GetFormFieldAnnotFlags(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldAnnotFlags(Index);
End;

Function TPDFlibrary.GetFormFieldBackgroundColor(Index, ColorComponent: Integer): Double;
Begin
  Result := PDFlib.GetFormFieldBackgroundColor(Index, ColorComponent);
End;

Function TPDFlibrary.GetFormFieldBackgroundColorType(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldBackgroundColorType(Index);
End;

Function TPDFlibrary.GetFormFieldBorderColor(Index, ColorComponent: Integer): Double;
Begin
  Result := PDFlib.GetFormFieldBorderColor(Index, ColorComponent);
End;

Function TPDFlibrary.GetFormFieldBorderColorType(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldBorderColorType(Index);
End;

Function TPDFlibrary.GetFormFieldBorderProperty(Index, PropKey: Integer): Double;
Begin
  Result := PDFlib.GetFormFieldBorderProperty(Index, PropKey);
End;

Function TPDFlibrary.GetFormFieldBorderStyle(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldBorderStyle(Index);
End;

Function TPDFlibrary.GetFormFieldBound(Index, Edge: Integer): Double;
Begin
  Result := PDFlib.GetFormFieldBound(Index, Edge);
End;

Function TPDFlibrary.GetFormFieldCaption(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldCaption(Index));
End;

Function TPDFlibrary.GetFormFieldCaptionEx(Index, StringType: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldCaptionEx(Index, StringType));
End;

Function TPDFlibrary.GetFormFieldCheckStyle(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldCheckStyle(Index);
End;

Function TPDFlibrary.GetFormFieldChildTitle(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldChildTitle(Index));
End;

Function TPDFlibrary.GetFormFieldChoiceType(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldChoiceType(Index);
End;

Function TPDFlibrary.GetFormFieldColor(Index, ColorComponent: Integer): Double;
Begin
  Result := PDFlib.GetFormFieldColor(Index, ColorComponent);
End;

Function TPDFlibrary.GetFormFieldComb(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldComb(Index);
End;

Function TPDFlibrary.GetFormFieldDefaultValue(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldDefaultValue(Index));
End;

Function TPDFlibrary.GetFormFieldDescription(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldDescription(Index));
End;

Function TPDFlibrary.GetFormFieldFlags(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldFlags(Index);
End;

Function TPDFlibrary.GetFormFieldFontName(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldFontName(Index));
End;

Function TPDFlibrary.GetFormFieldJavaScript(Index: Integer; Const ActionType: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldJavaScript(Index, ActionType));
End;

Function TPDFlibrary.GetFormFieldKidCount(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldKidCount(Index);
End;

Function TPDFlibrary.GetFormFieldKidTempIndex(Index, SubIndex: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldKidTempIndex(Index, SubIndex);
End;

Function TPDFlibrary.GetFormFieldMaxLen(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldMaxLen(Index);
End;

Function TPDFlibrary.GetFormFieldNoExport(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldNoExport(Index);
End;

Function TPDFlibrary.GetFormFieldPage(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldPage(Index);
End;

Function TPDFlibrary.GetFormFieldPrintable(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldPrintable(Index);
End;

Function TPDFlibrary.GetFormFieldReadOnly(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldReadOnly(Index);
End;

Function TPDFlibrary.GetFormFieldRequired(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldRequired(Index);
End;

Function TPDFlibrary.GetFormFieldRichTextString(Index: Integer; Const Key: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldRichTextString(Index, Key));
End;

Function TPDFlibrary.GetFormFieldRotation(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldRotation(Index);
End;

Function TPDFlibrary.GetFormFieldSubCount(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldSubCount(Index);
End;

Function TPDFlibrary.GetFormFieldSubDisplayName(Index, SubIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldSubDisplayName(Index, SubIndex));
End;

Function TPDFlibrary.GetFormFieldSubName(Index, SubIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldSubName(Index, SubIndex));
End;

Function TPDFlibrary.GetFormFieldSubmitActionString(Index: Integer; Const ActionType: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldSubmitActionString(Index, ActionType));
End;

Function TPDFlibrary.GetFormFieldTabOrder(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldTabOrder(Index);
End;

Function TPDFlibrary.GetFormFieldTabOrderEx(Index, Options: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldTabOrderEx(Index, Options);
End;

Function TPDFlibrary.GetFormFieldTextFlags(Index, ValueKey: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldTextFlags(Index, ValueKey);
End;

Function TPDFlibrary.GetFormFieldTextSize(Index: Integer): Double;
Begin
  Result := PDFlib.GetFormFieldTextSize(Index);
End;

Function TPDFlibrary.GetFormFieldTitle(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldTitle(Index));
End;

Function TPDFlibrary.GetFormFieldType(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldType(Index);
End;

Function TPDFlibrary.GetFormFieldValue(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldValue(Index));
End;

Function TPDFlibrary.GetFormFieldValueByTitle(Const Title: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldValueByTitle(Title));
End;

Function TPDFlibrary.GetFormFieldVisible(Index: Integer): Integer;
Begin
  Result := PDFlib.GetFormFieldVisible(Index);
End;

Function TPDFlibrary.GetFormFieldWebLink(Index: Integer; Const ActionType: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetFormFieldWebLink(Index, ActionType));
End;

Function TPDFlibrary.GetFormFontCount: Integer;
Begin
  Result := PDFlib.GetFormFontCount;
End;

Function TPDFlibrary.GetFormFontName(FontIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetFormFontName(FontIndex));
End;

Function TPDFlibrary.GetGlobalJavaScript(Const PackageName: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetGlobalJavaScript(PackageName));
End;

Function TPDFlibrary.GetHTMLTextHeight(Width: Double; Const HTMLText: WideString): Double;
Begin
  Result := PDFlib.GetHTMLTextHeight(Width, HTMLText);
End;

Function TPDFlibrary.GetHTMLTextLineCount(Width: Double; Const HTMLText: WideString): Integer;
Begin
  Result := PDFlib.GetHTMLTextLineCount(Width, HTMLText);
End;

Function TPDFlibrary.GetHTMLTextWidth(MaxWidth: Double; Const HTMLText: WideString): Double;
Begin
  Result := PDFlib.GetHTMLTextWidth(MaxWidth, HTMLText);
End;

Function TPDFlibrary.GetImageID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetImageID(Index);
End;

Function TPDFlibrary.GetImageListCount(ImageListID: Integer): Integer;
Begin
  Result := PDFlib.GetImageListCount(ImageListID);
End;

Function TPDFlibrary.GetImageListItemDataToVariant(ImageListID, ImageIndex, Options: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.GetImageListItemDataToString(ImageListID, ImageIndex, Options);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.GetImageListItemDblProperty(ImageListID, ImageIndex, PropertyID: Integer): Double;
Begin
  Result := PDFlib.GetImageListItemDblProperty(ImageListID, ImageIndex, PropertyID);
End;

Function TPDFlibrary.GetImageListItemFormatDesc(ImageListID, ImageIndex, Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetImageListItemFormatDesc(ImageListID, ImageIndex, Options));
End;

Function TPDFlibrary.GetImageListItemIntProperty(ImageListID, ImageIndex, PropertyID: Integer): Integer;
Begin
  Result := PDFlib.GetImageListItemIntProperty(ImageListID, ImageIndex, PropertyID);
End;

Function TPDFlibrary.GetImageMeasureDict: Integer;
Begin
  Result := PDFlib.GetImageMeasureDict;
End;

Function TPDFlibrary.GetImagePageCount(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.GetImagePageCount(FileName);
End;

Function TPDFlibrary.GetImagePtDataDict: Integer;
Begin
  Result := PDFlib.GetImagePtDataDict;
End;

Function TPDFlibrary.GetInformation(Key: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetInformation(Key));
End;

Function TPDFlibrary.GetInstalledFontsByCharset(CharsetIndex, Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetInstalledFontsByCharset(CharsetIndex, Options));
End;

Function TPDFlibrary.GetInstalledFontsByCodePage(CodePage, Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetInstalledFontsByCodePage(CodePage, Options));
End;

Function TPDFlibrary.GetKerning(Const CharPair: WideString): Integer;
Begin
  Result := PDFlib.GetKerning(CharPair);
End;

Function TPDFlibrary.GetLatestPrinterNames: WideString;
Begin
  Result := WideString(PDFlib.GetLatestPrinterNames);
End;

Function TPDFlibrary.GetMaxObjectNumber: Integer;
Begin
  Result := PDFlib.GetMaxObjectNumber;
End;

Function TPDFlibrary.GetMeasureDictBoundsCount(MeasureDictID: Integer): Integer;
Begin
  Result := PDFlib.GetMeasureDictBoundsCount(MeasureDictID);
End;

Function TPDFlibrary.GetMeasureDictBoundsItem(MeasureDictID, ItemIndex: Integer): Double;
Begin
  Result := PDFlib.GetMeasureDictBoundsItem(MeasureDictID, ItemIndex);
End;

Function TPDFlibrary.GetMeasureDictCoordinateSystem(MeasureDictID: Integer): Integer;
Begin
  Result := PDFlib.GetMeasureDictCoordinateSystem(MeasureDictID);
End;

Function TPDFlibrary.GetMeasureDictDCSDict(MeasureDictID: Integer): Integer;
Begin
  Result := PDFlib.GetMeasureDictDCSDict(MeasureDictID);
End;

Function TPDFlibrary.GetMeasureDictGCSDict(MeasureDictID: Integer): Integer;
Begin
  Result := PDFlib.GetMeasureDictGCSDict(MeasureDictID);
End;

Function TPDFlibrary.GetMeasureDictGPTSCount(MeasureDictID: Integer): Integer;
Begin
  Result := PDFlib.GetMeasureDictGPTSCount(MeasureDictID);
End;

Function TPDFlibrary.GetMeasureDictGPTSItem(MeasureDictID, ItemIndex: Integer): Double;
Begin
  Result := PDFlib.GetMeasureDictGPTSItem(MeasureDictID, ItemIndex);
End;

Function TPDFlibrary.GetMeasureDictLPTSCount(MeasureDictID: Integer): Integer;
Begin
  Result := PDFlib.GetMeasureDictLPTSCount(MeasureDictID);
End;

Function TPDFlibrary.GetMeasureDictLPTSItem(MeasureDictID, ItemIndex: Integer): Double;
Begin
  Result := PDFlib.GetMeasureDictLPTSItem(MeasureDictID, ItemIndex);
End;

Function TPDFlibrary.GetMeasureDictPDU(MeasureDictID, UnitIndex: Integer): Integer;
Begin
  Result := PDFlib.GetMeasureDictPDU(MeasureDictID, UnitIndex);
End;

Function TPDFlibrary.GetNamedDestination(Const DestName: WideString): Integer;
Begin
  Result := PDFlib.GetNamedDestination(DestName);
End;

Function TPDFlibrary.GetNextOutline(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetNextOutline(OutlineID);
End;

Function TPDFlibrary.GetObjectCount: Integer;
Begin
  Result := PDFlib.GetObjectCount;
End;

Function TPDFlibrary.GetObjectDecodeError(ObjectNumber: Integer): Integer;
Begin
  Result := PDFlib.GetObjectDecodeError(ObjectNumber);
End;

Function TPDFlibrary.GetObjectToVariant(ObjectNumber: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.GetObjectToString(ObjectNumber);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.GetOpenActionDestination: Integer;
Begin
  Result := PDFlib.GetOpenActionDestination;
End;

Function TPDFlibrary.GetOpenActionJavaScript: WideString;
Begin
  Result := WideString(PDFlib.GetOpenActionJavaScript);
End;

Function TPDFlibrary.GetOptionalContentConfigCount: Integer;
Begin
  Result := PDFlib.GetOptionalContentConfigCount;
End;

Function TPDFlibrary.GetOptionalContentConfigLocked(OptionalContentConfigID, OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentConfigLocked(OptionalContentConfigID, OptionalContentGroupID);
End;

Function TPDFlibrary.GetOptionalContentConfigOrderCount(OptionalContentConfigID: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentConfigOrderCount(OptionalContentConfigID);
End;

Function TPDFlibrary.GetOptionalContentConfigOrderItemID(OptionalContentConfigID, ItemIndex: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentConfigOrderItemID(OptionalContentConfigID, ItemIndex);
End;

Function TPDFlibrary.GetOptionalContentConfigOrderItemLabel(OptionalContentConfigID, ItemIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetOptionalContentConfigOrderItemLabel(OptionalContentConfigID, ItemIndex));
End;

Function TPDFlibrary.GetOptionalContentConfigOrderItemLevel(OptionalContentConfigID, ItemIndex: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentConfigOrderItemLevel(OptionalContentConfigID, ItemIndex);
End;

Function TPDFlibrary.GetOptionalContentConfigOrderItemType(OptionalContentConfigID, ItemIndex: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentConfigOrderItemType(OptionalContentConfigID, ItemIndex);
End;

Function TPDFlibrary.GetOptionalContentConfigState(OptionalContentConfigID, OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentConfigState(OptionalContentConfigID, OptionalContentGroupID);
End;

Function TPDFlibrary.GetOptionalContentGroupID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentGroupID(Index);
End;

Function TPDFlibrary.GetOptionalContentGroupName(OptionalContentGroupID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetOptionalContentGroupName(OptionalContentGroupID));
End;

Function TPDFlibrary.GetOptionalContentGroupPrintable(OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentGroupPrintable(OptionalContentGroupID);
End;

Function TPDFlibrary.GetOptionalContentGroupVisible(OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.GetOptionalContentGroupVisible(OptionalContentGroupID);
End;

Function TPDFlibrary.GetOrigin: Integer;
Begin
  Result := PDFlib.GetOrigin;
End;

Function TPDFlibrary.GetOutlineActionID(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetOutlineActionID(OutlineID);
End;

Function TPDFlibrary.GetOutlineColor(OutlineID, ColorComponent: Integer): Double;
Begin
  Result := PDFlib.GetOutlineColor(OutlineID, ColorComponent);
End;

Function TPDFlibrary.GetOutlineDest(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetOutlineDest(OutlineID);
End;

Function TPDFlibrary.GetOutlineID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetOutlineID(Index);
End;

Function TPDFlibrary.GetOutlineJavaScript(OutlineID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetOutlineJavaScript(OutlineID));
End;

Function TPDFlibrary.GetOutlineObjectNumber(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetOutlineObjectNumber(OutlineID);
End;

Function TPDFlibrary.GetOutlineOpenFile(OutlineID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetOutlineOpenFile(OutlineID));
End;

Function TPDFlibrary.GetOutlinePage(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetOutlinePage(OutlineID);
End;

Function TPDFlibrary.GetOutlineStyle(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetOutlineStyle(OutlineID);
End;

Function TPDFlibrary.GetOutlineWebLink(OutlineID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetOutlineWebLink(OutlineID));
End;

Function TPDFlibrary.GetPageBox(BoxType, Dimension: Integer): Double;
Begin
  Result := PDFlib.GetPageBox(BoxType, Dimension);
End;

Function TPDFlibrary.GetPageColorSpaces(Options: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetPageColorSpaces(Options));
End;

Function TPDFlibrary.GetPageContentToVariant: Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.GetPageContentToString;
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.GetPageImageList(Options: Integer): Integer;
Begin
  Result := PDFlib.GetPageImageList(Options);
End;

Function TPDFlibrary.GetPageJavaScript(Const ActionType: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetPageJavaScript(ActionType));
End;

Function TPDFlibrary.GetPageLGIDictContent(DictIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetPageLGIDictContent(DictIndex));
End;

Function TPDFlibrary.GetPageLGIDictCount: Integer;
Begin
  Result := PDFlib.GetPageLGIDictCount;
End;

Function TPDFlibrary.GetPageLabel(Page: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetPageLabel(Page));
End;

Function TPDFlibrary.GetPageLayout: Integer;
Begin
  Result := PDFlib.GetPageLayout;
End;

Function TPDFlibrary.GetPageMode: Integer;
Begin
  Result := PDFlib.GetPageMode;
End;

Function TPDFlibrary.GetPageText(ExtractOptions: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetPageText(ExtractOptions));
End;

Function TPDFlibrary.GetPageUserUnit: Double;
Begin
  Result := PDFlib.GetPageUserUnit;
End;

Function TPDFlibrary.GetPageViewPortCount: Integer;
Begin
  Result := PDFlib.GetPageViewPortCount;
End;

Function TPDFlibrary.GetPageViewPortID(Index: Integer): Integer;
Begin
  Result := PDFlib.GetPageViewPortID(Index);
End;

Function TPDFlibrary.GetParentOutline(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetParentOutline(OutlineID);
End;

Function TPDFlibrary.GetPrevOutline(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.GetPrevOutline(OutlineID);
End;

Function TPDFlibrary.GetPrintPreviewBitmapToVariant(Const PrinterName: WideString; PreviewPage, PrintOptions, MaxDimension, PreviewOptions: Integer)
  : Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.GetPrintPreviewBitmapToString(PrinterName, PreviewPage, PrintOptions, MaxDimension, PreviewOptions);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.GetPrinterBins(Const PrinterName: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetPrinterBins(PrinterName));
End;

Function TPDFlibrary.GetPrinterDevModeToVariant(Const PrinterName: WideString): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.GetPrinterDevModeToString(PrinterName);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.GetPrinterMediaTypes(Const PrinterName: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetPrinterMediaTypes(PrinterName));
End;

Function TPDFlibrary.GetPrinterNames: WideString;
Begin
  Result := WideString(PDFlib.GetPrinterNames);
End;

Function TPDFlibrary.GetRenderScale: Double;
Begin
  Result := PDFlib.GetRenderScale;
End;

Function TPDFlibrary.GetSignProcessByteRange(SignProcessID, ArrayPosition: Integer): Integer;
Begin
  Result := PDFlib.GetSignProcessByteRange(SignProcessID, ArrayPosition);
End;

Function TPDFlibrary.GetSignProcessResult(SignProcessID: Integer): Integer;
Begin
  Result := PDFlib.GetSignProcessResult(SignProcessID);
End;

Function TPDFlibrary.GetStringListCount(StringListID: Integer): Integer;
Begin
  Result := PDFlib.GetStringListCount(StringListID);
End;

Function TPDFlibrary.GetStringListItem(StringListID, ItemIndex: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetStringListItem(StringListID, ItemIndex));
End;

Function TPDFlibrary.GetTabOrderMode: WideString;
Begin
  Result := WideString(PDFlib.GetTabOrderMode);
End;

Function TPDFlibrary.GetTableCellDblProperty(TableID, RowNumber, ColumnNumber, Tag: Integer): Double;
Begin
  Result := PDFlib.GetTableCellDblProperty(TableID, RowNumber, ColumnNumber, Tag);
End;

Function TPDFlibrary.GetTableCellIntProperty(TableID, RowNumber, ColumnNumber, Tag: Integer): Integer;
Begin
  Result := PDFlib.GetTableCellIntProperty(TableID, RowNumber, ColumnNumber, Tag);
End;

Function TPDFlibrary.GetTableCellStrProperty(TableID, RowNumber, ColumnNumber, Tag: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetTableCellStrProperty(TableID, RowNumber, ColumnNumber, Tag));
End;

Function TPDFlibrary.GetTableColumnCount(TableID: Integer): Integer;
Begin
  Result := PDFlib.GetTableColumnCount(TableID);
End;

Function TPDFlibrary.GetTableLastDrawnRow(TableID: Integer): Integer;
Begin
  Result := PDFlib.GetTableLastDrawnRow(TableID);
End;

Function TPDFlibrary.GetTableRowCount(TableID: Integer): Integer;
Begin
  Result := PDFlib.GetTableRowCount(TableID);
End;

Function TPDFlibrary.GetTempPath: WideString;
Begin
  Result := WideString(PDFlib.GetTempPath);
End;

Function TPDFlibrary.GetTextAscent: Double;
Begin
  Result := PDFlib.GetTextAscent;
End;

Function TPDFlibrary.GetTextBlockAsString(TextBlockListID, Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetTextBlockAsString(TextBlockListID, Index));
End;

Function TPDFlibrary.GetTextBlockBound(TextBlockListID, Index, BoundIndex: Integer): Double;
Begin
  Result := PDFlib.GetTextBlockBound(TextBlockListID, Index, BoundIndex);
End;

Function TPDFlibrary.GetTextBlockCharWidth(TextBlockListID, Index, CharIndex: Integer): Double;
Begin
  Result := PDFlib.GetTextBlockCharWidth(TextBlockListID, Index, CharIndex);
End;

Function TPDFlibrary.GetTextBlockColor(TextBlockListID, Index, ColorComponent: Integer): Double;
Begin
  Result := PDFlib.GetTextBlockColor(TextBlockListID, Index, ColorComponent);
End;

Function TPDFlibrary.GetTextBlockColorType(TextBlockListID, Index: Integer): Integer;
Begin
  Result := PDFlib.GetTextBlockColorType(TextBlockListID, Index);
End;

Function TPDFlibrary.GetTextBlockCount(TextBlockListID: Integer): Integer;
Begin
  Result := PDFlib.GetTextBlockCount(TextBlockListID);
End;

Function TPDFlibrary.GetTextBlockFontName(TextBlockListID, Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetTextBlockFontName(TextBlockListID, Index));
End;

Function TPDFlibrary.GetTextBlockFontSize(TextBlockListID, Index: Integer): Double;
Begin
  Result := PDFlib.GetTextBlockFontSize(TextBlockListID, Index);
End;

Function TPDFlibrary.GetTextBlockText(TextBlockListID, Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetTextBlockText(TextBlockListID, Index));
End;

Function TPDFlibrary.GetTextBound(Edge: Integer): Double;
Begin
  Result := PDFlib.GetTextBound(Edge);
End;

Function TPDFlibrary.GetTextDescent: Double;
Begin
  Result := PDFlib.GetTextDescent;
End;

Function TPDFlibrary.GetTextHeight: Double;
Begin
  Result := PDFlib.GetTextHeight;
End;

Function TPDFlibrary.GetTextSize: Double;
Begin
  Result := PDFlib.GetTextSize;
End;

Function TPDFlibrary.GetTextWidth(Const Text: WideString): Double;
Begin
  Result := PDFlib.GetTextWidth(Text);
End;

Function TPDFlibrary.GetUnicodeCharactersFromEncoding(Encoding: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetUnicodeCharactersFromEncoding(Encoding));
End;

Function TPDFlibrary.GetViewPortBBox(ViewPortID, Dimension: Integer): Double;
Begin
  Result := PDFlib.GetViewPortBBox(ViewPortID, Dimension);
End;

Function TPDFlibrary.GetViewPortMeasureDict(ViewPortID: Integer): Integer;
Begin
  Result := PDFlib.GetViewPortMeasureDict(ViewPortID);
End;

Function TPDFlibrary.GetViewPortName(ViewPortID: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetViewPortName(ViewPortID));
End;

Function TPDFlibrary.GetViewPortPtDataDict(ViewPortID: Integer): Integer;
Begin
  Result := PDFlib.GetViewPortPtDataDict(ViewPortID);
End;

Function TPDFlibrary.GetViewerPreferences(Option: Integer): Integer;
Begin
  Result := PDFlib.GetViewerPreferences(Option);
End;

Function TPDFlibrary.GetWrappedText(Width: Double; Const Delimiter, Text: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetWrappedText(Width, Delimiter, Text));
End;

Function TPDFlibrary.GetWrappedTextBreakString(Width: Double; Const Delimiter, Text: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetWrappedTextBreakString(Width, Delimiter, Text));
End;

Function TPDFlibrary.GetWrappedTextHeight(Width: Double; Const Text: WideString): Double;
Begin
  Result := PDFlib.GetWrappedTextHeight(Width, Text);
End;

Function TPDFlibrary.GetWrappedTextLineCount(Width: Double; Const Text: WideString): Integer;
Begin
  Result := PDFlib.GetWrappedTextLineCount(Width, Text);
End;

Function TPDFlibrary.GetXFAFormFieldCount: Integer;
Begin
  Result := PDFlib.GetXFAFormFieldCount;
End;

Function TPDFlibrary.GetXFAFormFieldName(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GetXFAFormFieldName(Index));
End;

Function TPDFlibrary.GetXFAFormFieldNames(Const Delimiter: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetXFAFormFieldNames(Delimiter));
End;

Function TPDFlibrary.GetXFAFormFieldValue(Const XFAFieldName: WideString): WideString;
Begin
  Result := WideString(PDFlib.GetXFAFormFieldValue(XFAFieldName));
End;

Function TPDFlibrary.GlobalJavaScriptCount: Integer;
Begin
  Result := PDFlib.GlobalJavaScriptCount;
End;

Function TPDFlibrary.GlobalJavaScriptPackageName(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.GlobalJavaScriptPackageName(Index));
End;

Function TPDFlibrary.HasFontResources: Integer;
Begin
  Result := PDFlib.HasFontResources;
End;

Function TPDFlibrary.HasPageBox(BoxType: Integer): Integer;
Begin
  Result := PDFlib.HasPageBox(BoxType);
End;

Function TPDFlibrary.HidePage: Integer;
Begin
  Result := PDFlib.HidePage;
End;

Function TPDFlibrary.ImageCount: Integer;
Begin
  Result := PDFlib.ImageCount;
End;

Function TPDFlibrary.ImageFillColor: Integer;
Begin
  Result := PDFlib.ImageFillColor;
End;

Function TPDFlibrary.ImageHeight: Integer;
Begin
  Result := PDFlib.ImageHeight;
End;

Function TPDFlibrary.ImageHorizontalResolution: Integer;
Begin
  Result := PDFlib.ImageHorizontalResolution;
End;

Function TPDFlibrary.ImageResolutionUnits: Integer;
Begin
  Result := PDFlib.ImageResolutionUnits;
End;

Function TPDFlibrary.ImageType: Integer;
Begin
  Result := PDFlib.ImageType;
End;

Function TPDFlibrary.ImageVerticalResolution: Integer;
Begin
  Result := PDFlib.ImageVerticalResolution;
End;

Function TPDFlibrary.ImageWidth: Integer;
Begin
  Result := PDFlib.ImageWidth;
End;

Function TPDFlibrary.ImportEMFFromFile(Const FileName: WideString; FontOptions, GeneralOptions: Integer): Integer;
Begin
  Result := PDFlib.ImportEMFFromFile(FileName, FontOptions, GeneralOptions);
End;

Function TPDFlibrary.InsertPages(StartPage, PageCount: Integer): Integer;
Begin
  Result := PDFlib.InsertPages(StartPage, PageCount);
End;

Function TPDFlibrary.InsertTableColumns(TableID, Position, NewColumnCount: Integer): Integer;
Begin
  Result := PDFlib.InsertTableColumns(TableID, Position, NewColumnCount);
End;

Function TPDFlibrary.InsertTableRows(TableID, Position, NewRowCount: Integer): Integer;
Begin
  Result := PDFlib.InsertTableRows(TableID, Position, NewRowCount);
End;

Function TPDFlibrary.IsAnnotFormField(Index: Integer): Integer;
Begin
  Result := PDFlib.IsAnnotFormField(Index);
End;

Function TPDFlibrary.IsLinearized: Integer;
Begin
  Result := PDFlib.IsLinearized;
End;

Function TPDFlibrary.IsTaggedPDF: Integer;
Begin
  Result := PDFlib.IsTaggedPDF;
End;

Function TPDFlibrary.LastErrorCode: Integer;
Begin
  Result := PDFlib.LastErrorCode;
End;

Function TPDFlibrary.LastRenderError: WideString;
Begin
  Result := WideString(PDFlib.LastRenderError);
End;

Function TPDFlibrary.LibraryVersion: WideString;
Begin
  Result := WideString(PDFlib.LibraryVersion);
End;

Function TPDFlibrary.LibraryVersionEx: WideString;
Begin
  Result := WideString(PDFlib.LibraryVersionEx);
End;

Function TPDFlibrary.LinearizeFile(Const InputFileName, Password, OutputFileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.LinearizeFile(InputFileName, Password, OutputFileName, Options);
End;

Function TPDFlibrary.LoadFromCanvasDC(DPI: Double; Options: Integer): Integer;
Begin
  Result := PDFlib.LoadFromCanvasDC(DPI, Options);
End;

Function TPDFlibrary.LoadFromFile(Const FileName, Password: WideString): Integer;
Begin
  Result := PDFlib.LoadFromFile(FileName, Password);
End;

Function TPDFlibrary.LoadFromVariant(Source: Olevariant; Const Password: WideString): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(Source) = (varByte or varArray or varByRef)) or (VarType(Source) = (varByte or varArray)) or (VarType(Source) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(Source, 1);
      Min := VarArrayLowBound(Source, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(Source[X]));
      Result := PDFlib.LoadFromString(S, Password);
    Except
    End;
End;

Function TPDFlibrary.LoadState: Integer;
Begin
  Result := PDFlib.LoadState;
End;

Function TPDFlibrary.MergeDocument(DocumentID: Integer): Integer;
Begin
  Result := PDFlib.MergeDocument(DocumentID);
End;

Function TPDFlibrary.MergeFileList(Const ListName, OutputFileName: WideString): Integer;
Begin
  Result := PDFlib.MergeFileList(ListName, OutputFileName);
End;

Function TPDFlibrary.MergeFileListFast(Const ListName, OutputFileName: WideString): Integer;
Begin
  Result := PDFlib.MergeFileListFast(ListName, OutputFileName);
End;

Function TPDFlibrary.MergeFiles(Const FirstFileName, SecondFileName, OutputFileName: WideString): Integer;
Begin
  Result := PDFlib.MergeFiles(FirstFileName, SecondFileName, OutputFileName);
End;

Function TPDFlibrary.MergeTableCells(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer): Integer;
Begin
  Result := PDFlib.MergeTableCells(TableID, FirstRow, FirstColumn, LastRow, LastColumn);
End;

Function TPDFlibrary.MoveContentStream(FromPosition, ToPosition: Integer): Integer;
Begin
  Result := PDFlib.MoveContentStream(FromPosition, ToPosition);
End;

Function TPDFlibrary.MoveOutlineAfter(OutlineID, SiblingID: Integer): Integer;
Begin
  Result := PDFlib.MoveOutlineAfter(OutlineID, SiblingID);
End;

Function TPDFlibrary.MoveOutlineBefore(OutlineID, SiblingID: Integer): Integer;
Begin
  Result := PDFlib.MoveOutlineBefore(OutlineID, SiblingID);
End;

Function TPDFlibrary.MovePage(NewPosition: Integer): Integer;
Begin
  Result := PDFlib.MovePage(NewPosition);
End;

Function TPDFlibrary.MovePath(NewX, NewY: Double): Integer;
Begin
  Result := PDFlib.MovePath(NewX, NewY);
End;

Function TPDFlibrary.MultiplyScale(MultScaleBy: Double): Integer;
Begin
  Result := PDFlib.MultiplyScale(MultScaleBy);
End;

Function TPDFlibrary.NewChildFormField(Index: Integer; Const Title: WideString; FieldType: Integer): Integer;
Begin
  Result := PDFlib.NewChildFormField(Index, Title, FieldType);
End;

Function TPDFlibrary.NewContentStream: Integer;
Begin
  Result := PDFlib.NewContentStream;
End;

Function TPDFlibrary.NewCustomPrinter(Const OriginalPrinterName: WideString): WideString;
Begin
  Result := WideString(PDFlib.NewCustomPrinter(OriginalPrinterName));
End;

Function TPDFlibrary.NewDestination(DestPage, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer;
Begin
  Result := PDFlib.NewDestination(DestPage, Zoom, DestType, Left, Top, Right, Bottom);
End;

Function TPDFlibrary.NewDocument: Integer;
Begin
  Result := PDFlib.NewDocument;
End;

Function TPDFlibrary.NewFormField(Const Title: WideString; FieldType: Integer): Integer;
Begin
  Result := PDFlib.NewFormField(Title, FieldType);
End;

Function TPDFlibrary.NewInternalPrinterObject(Options: Integer): Integer;
Begin
  Result := PDFlib.NewInternalPrinterObject(Options);
End;

Function TPDFlibrary.NewNamedDestination(Const DestName: WideString; DestID: Integer): Integer;
Begin
  Result := PDFlib.NewNamedDestination(DestName, DestID);
End;

Function TPDFlibrary.NewOptionalContentGroup(Const GroupName: WideString): Integer;
Begin
  Result := PDFlib.NewOptionalContentGroup(GroupName);
End;

Function TPDFlibrary.NewOutline(Parent: Integer; Const Title: WideString; DestPage: Integer; DestPosition: Double): Integer;
Begin
  Result := PDFlib.NewOutline(Parent, Title, DestPage, DestPosition);
End;

Function TPDFlibrary.NewPage: Integer;
Begin
  Result := PDFlib.NewPage;
End;

Function TPDFlibrary.NewPageFromCanvasDC(DPI: Double; Options: Integer): Integer;
Begin
  Result := PDFlib.NewPageFromCanvasDC(DPI, Options);
End;

Function TPDFlibrary.NewPages(PageCount: Integer): Integer;
Begin
  Result := PDFlib.NewPages(PageCount);
End;

Function TPDFlibrary.NewPostScriptXObject(Const PS: WideString): Integer;
Begin
  Result := PDFlib.NewPostScriptXObject(PS);
End;

Function TPDFlibrary.NewRGBAxialShader(Const ShaderName: WideString; StartX, StartY, StartRed, StartGreen, StartBlue, EndX, EndY, EndRed, EndGreen,
  EndBlue: Double; Extend: Integer): Integer;
Begin
  Result := PDFlib.NewRGBAxialShader(ShaderName, StartX, StartY, StartRed, StartGreen, StartBlue, EndX, EndY, EndRed, EndGreen, EndBlue, Extend);
End;

Function TPDFlibrary.NewSignProcessFromFile(Const InputFile, Password: WideString): Integer;
Begin
  Result := PDFlib.NewSignProcessFromFile(InputFile, Password);
End;

Function TPDFlibrary.NewStaticOutline(Parent: Integer; Const Title: WideString): Integer;
Begin
  Result := PDFlib.NewStaticOutline(Parent, Title);
End;

Function TPDFlibrary.NewTilingPatternFromCapturedPage(Const PatternName: WideString; CaptureID: Integer): Integer;
Begin
  Result := PDFlib.NewTilingPatternFromCapturedPage(PatternName, CaptureID);
End;

Function TPDFlibrary.NoEmbedFontListAdd(Const FontName: WideString): Integer;
Begin
  Result := PDFlib.NoEmbedFontListAdd(FontName);
End;

Function TPDFlibrary.NoEmbedFontListCount: Integer;
Begin
  Result := PDFlib.NoEmbedFontListCount;
End;

Function TPDFlibrary.NoEmbedFontListGet(Index: Integer): WideString;
Begin
  Result := WideString(PDFlib.NoEmbedFontListGet(Index));
End;

Function TPDFlibrary.NoEmbedFontListRemoveAll: Integer;
Begin
  Result := PDFlib.NoEmbedFontListRemoveAll;
End;

Function TPDFlibrary.NoEmbedFontListRemoveIndex(Index: Integer): Integer;
Begin
  Result := PDFlib.NoEmbedFontListRemoveIndex(Index);
End;

Function TPDFlibrary.NoEmbedFontListRemoveName(Const FontName: WideString): Integer;
Begin
  Result := PDFlib.NoEmbedFontListRemoveName(FontName);
End;

Function TPDFlibrary.NormalizePage(NormalizeOptions: Integer): Integer;
Begin
  Result := PDFlib.NormalizePage(NormalizeOptions);
End;

Function TPDFlibrary.OpenOutline(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.OpenOutline(OutlineID);
End;

Function TPDFlibrary.OptionalContentGroupCount: Integer;
Begin
  Result := PDFlib.OptionalContentGroupCount;
End;

Function TPDFlibrary.OutlineCount: Integer;
Begin
  Result := PDFlib.OutlineCount;
End;

Function TPDFlibrary.OutlineTitle(OutlineID: Integer): WideString;
Begin
  Result := WideString(PDFlib.OutlineTitle(OutlineID));
End;

Function TPDFlibrary.PageCount: Integer;
Begin
  Result := PDFlib.PageCount;
End;

Function TPDFlibrary.PageHasFontResources(PageNumber: Integer): Integer;
Begin
  Result := PDFlib.PageHasFontResources(PageNumber);
End;

Function TPDFlibrary.PageHeight: Double;
Begin
  Result := PDFlib.PageHeight;
End;

Function TPDFlibrary.PageJavaScriptAction(Const ActionType, JavaScript: WideString): Integer;
Begin
  Result := PDFlib.PageJavaScriptAction(ActionType, JavaScript);
End;

Function TPDFlibrary.PageRotation: Integer;
Begin
  Result := PDFlib.PageRotation;
End;

Function TPDFlibrary.PageWidth: Double;
Begin
  Result := PDFlib.PageWidth;
End;

Function TPDFlibrary.PrintDocument(Const PrinterName: WideString; StartPage, EndPage, Options: Integer): Integer;
Begin
  Result := PDFlib.PrintDocument(PrinterName, StartPage, EndPage, Options);
End;

Function TPDFlibrary.PrintDocumentToFile(Const PrinterName: WideString; StartPage, EndPage, Options: Integer; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.PrintDocumentToFile(PrinterName, StartPage, EndPage, Options, FileName);
End;

Function TPDFlibrary.PrintMode(Mode: Integer): Integer;
Begin
  Result := PDFlib.PrintMode(Mode);
End;

Function TPDFlibrary.PrintOptions(PageScaling, AutoRotateCenter: Integer; Const Title: WideString): Integer;
Begin
  Result := PDFlib.PrintOptions(PageScaling, AutoRotateCenter, Title);
End;

Function TPDFlibrary.PrintPages(Const PrinterName, PageRanges: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.PrintPages(PrinterName, PageRanges, Options);
End;

Function TPDFlibrary.PrintPagesToFile(Const PrinterName, PageRanges: WideString; Options: Integer; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.PrintPagesToFile(PrinterName, PageRanges, Options, FileName);
End;

Function TPDFlibrary.ReleaseImage(ImageID: Integer): Integer;
Begin
  Result := PDFlib.ReleaseImage(ImageID);
End;

Function TPDFlibrary.ReleaseImageList(ImageListID: Integer): Integer;
Begin
  Result := PDFlib.ReleaseImageList(ImageListID);
End;

Function TPDFlibrary.ReleaseSignProcess(SignProcessID: Integer): Integer;
Begin
  Result := PDFlib.ReleaseSignProcess(SignProcessID);
End;

Function TPDFlibrary.ReleaseStringList(StringListID: Integer): Integer;
Begin
  Result := PDFlib.ReleaseStringList(StringListID);
End;

Function TPDFlibrary.ReleaseTextBlocks(TextBlockListID: Integer): Integer;
Begin
  Result := PDFlib.ReleaseTextBlocks(TextBlockListID);
End;

Function TPDFlibrary.RemoveAppearanceStream(Index: Integer): Integer;
Begin
  Result := PDFlib.RemoveAppearanceStream(Index);
End;

Function TPDFlibrary.RemoveCustomInformation(Const Key: WideString): Integer;
Begin
  Result := PDFlib.RemoveCustomInformation(Key);
End;

Function TPDFlibrary.RemoveDocument(DocumentID: Integer): Integer;
Begin
  Result := PDFlib.RemoveDocument(DocumentID);
End;

Function TPDFlibrary.RemoveEmbeddedFile(Index: Integer): Integer;
Begin
  Result := PDFlib.RemoveEmbeddedFile(Index);
End;

Function TPDFlibrary.RemoveFormFieldBackgroundColor(Index: Integer): Integer;
Begin
  Result := PDFlib.RemoveFormFieldBackgroundColor(Index);
End;

Function TPDFlibrary.RemoveFormFieldBorderColor(Index: Integer): Integer;
Begin
  Result := PDFlib.RemoveFormFieldBorderColor(Index);
End;

Function TPDFlibrary.RemoveFormFieldChoiceSub(Index: Integer; Const SubName: WideString): Integer;
Begin
  Result := PDFlib.RemoveFormFieldChoiceSub(Index, SubName);
End;

Function TPDFlibrary.RemoveGlobalJavaScript(Const PackageName: WideString): Integer;
Begin
  Result := PDFlib.RemoveGlobalJavaScript(PackageName);
End;

Function TPDFlibrary.RemoveOpenAction: Integer;
Begin
  Result := PDFlib.RemoveOpenAction;
End;

Function TPDFlibrary.RemoveOutline(OutlineID: Integer): Integer;
Begin
  Result := PDFlib.RemoveOutline(OutlineID);
End;

Function TPDFlibrary.RemovePageBox(BoxType: Integer): Integer;
Begin
  Result := PDFlib.RemovePageBox(BoxType);
End;

Function TPDFlibrary.RemoveSharedContentStreams: Integer;
Begin
  Result := PDFlib.RemoveSharedContentStreams;
End;

Function TPDFlibrary.RemoveStyle(Const StyleName: WideString): Integer;
Begin
  Result := PDFlib.RemoveStyle(StyleName);
End;

Function TPDFlibrary.RemoveUsageRights: Integer;
Begin
  Result := PDFlib.RemoveUsageRights;
End;

Function TPDFlibrary.RemoveXFAEntries(Options: Integer): Integer;
Begin
  Result := PDFlib.RemoveXFAEntries(Options);
End;

Function TPDFlibrary.RenderAsMultipageTIFFToFile(DPI: Double; Const PageRanges: WideString; ImageOptions, OutputOptions: Integer;
  Const FileName: WideString): Integer;
Begin
  Result := PDFlib.RenderAsMultipageTIFFToFile(DPI, PageRanges, ImageOptions, OutputOptions, FileName);
End;

Function TPDFlibrary.RenderDocumentToFile(DPI: Double; StartPage, EndPage, Options: Integer; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.RenderDocumentToFile(DPI, StartPage, EndPage, Options, FileName);
End;

Function TPDFlibrary.RenderPageToDC(DPI: Double; Page: Integer; DC: Integer): Integer;
Begin
  Result := PDFlib.RenderPageToDC(DPI, Page, HDC(DC));
End;

Function TPDFlibrary.RenderPageToDCClip(DPI: Double; Page, DC: Integer; Const Clip: WideString): Integer;
Begin
  Result := PDFlib.RenderPageToDCClip(DPI, Page, DC, AnsiString(Clip));
End;

Function TPDFlibrary.RenderPageToFile(DPI: Double; Page, Options: Integer; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.RenderPageToFile(DPI, Page, Options, FileName);
End;

Function TPDFlibrary.RenderPageToVariant(DPI: Double; Page, Options: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.RenderPageToString(DPI, Page, Options);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.ReplaceFonts(Options: Integer): Integer;
Begin
  Result := PDFlib.ReplaceFonts(Options);
End;

Function TPDFlibrary.ReplaceImage(OriginalImageID, NewImageID: Integer): Integer;
Begin
  Result := PDFlib.ReplaceImage(OriginalImageID, NewImageID);
End;

Function TPDFlibrary.ReplaceTag(Const Tag, NewValue: WideString): Integer;
Begin
  Result := PDFlib.ReplaceTag(Tag, NewValue);
End;

Function TPDFlibrary.RequestPrinterStatus(StatusCommand: Integer): Integer;
Begin
  Result := PDFlib.RequestPrinterStatus(StatusCommand);
End;

Function TPDFlibrary.RetrieveCustomDataToFile(Const Key, FileName: WideString; Location: Integer): Integer;
Begin
  Result := PDFlib.RetrieveCustomDataToFile(Key, FileName, Location);
End;

Function TPDFlibrary.RetrieveCustomDataToVariant(Const Key: WideString; Location: Integer): Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.RetrieveCustomDataToString(AnsiString(Key), Location);
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.ReverseImage(Reset: Integer): Integer;
Begin
  Result := PDFlib.ReverseImage(Reset);
End;

Function TPDFlibrary.RotatePage(PageRotation: Integer): Integer;
Begin
  Result := PDFlib.RotatePage(PageRotation);
End;

Function TPDFlibrary.SaveFontToFile(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.SaveFontToFile(FileName);
End;

Function TPDFlibrary.SaveImageListItemDataToFile(ImageListID, ImageIndex, Options: Integer; Const ImageFileName: WideString): Integer;
Begin
  Result := PDFlib.SaveImageListItemDataToFile(ImageListID, ImageIndex, Options, ImageFileName);
End;

Function TPDFlibrary.SaveImageToFile(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.SaveImageToFile(FileName);
End;

Function TPDFlibrary.SaveImageToVariant: Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.SaveImageToString;
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.SaveState: Integer;
Begin
  Result := PDFlib.SaveState;
End;

Function TPDFlibrary.SaveStyle(Const StyleName: WideString): Integer;
Begin
  Result := PDFlib.SaveStyle(StyleName);
End;

Function TPDFlibrary.SaveToFile(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.SaveToFile(FileName);
End;

Function TPDFlibrary.SaveToVariant: Olevariant;
Var
  S: AnsiString;
  P: Pointer;
Begin
  S := PDFlib.SaveToString;
  Result := VarArrayCreate([0, Length(S) - 1], varByte);
  P := VarArrayLock(Result);
  Try
    Move(S[1], P^, Length(S));
  Finally
    VarArrayUnlock(Result);
  End;
End;

Function TPDFlibrary.SecurityInfo(SecurityItem: Integer): Integer;
Begin
  Result := PDFlib.SecurityInfo(SecurityItem);
End;

Function TPDFlibrary.SelectContentStream(NewIndex: Integer): Integer;
Begin
  Result := PDFlib.SelectContentStream(NewIndex);
End;

Function TPDFlibrary.SelectDocument(DocumentID: Integer): Integer;
Begin
  Result := PDFlib.SelectDocument(DocumentID);
End;

Function TPDFlibrary.SelectFont(FontID: Integer): Integer;
Begin
  Result := PDFlib.SelectFont(FontID);
End;

Function TPDFlibrary.SelectImage(ImageID: Integer): Integer;
Begin
  Result := PDFlib.SelectImage(ImageID);
End;

Function TPDFlibrary.SelectPage(PageNumber: Integer): Integer;
Begin
  Result := PDFlib.SelectPage(PageNumber);
End;

Function TPDFlibrary.SelectRenderer(RendererID: Integer): Integer;
Begin
  Result := PDFlib.SelectRenderer(RendererID);
End;

Function TPDFlibrary.SelectedDocument: Integer;
Begin
  Result := PDFlib.SelectedDocument;
End;

Function TPDFlibrary.SelectedFont: Integer;
Begin
  Result := PDFlib.SelectedFont;
End;

Function TPDFlibrary.SelectedImage: Integer;
Begin
  Result := PDFlib.SelectedImage;
End;

Function TPDFlibrary.SelectedPage: Integer;
Begin
  Result := PDFlib.SelectedPage;
End;

Function TPDFlibrary.SetActionURL(ActionID: Integer; Const NewURL: WideString): Integer;
Begin
  Result := PDFlib.SetActionURL(ActionID, NewURL);
End;

Function TPDFlibrary.SetAnnotBorderColor(Index: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetAnnotBorderColor(Index, Red, Green, Blue);
End;

Function TPDFlibrary.SetAnnotBorderStyle(Index: Integer; Width: Double; Style: Integer; DashOn, DashOff: Double): Integer;
Begin
  Result := PDFlib.SetAnnotBorderStyle(Index, Width, Style, DashOn, DashOff);
End;

Function TPDFlibrary.SetAnnotContents(Index: Integer; Const NewContents: WideString): Integer;
Begin
  Result := PDFlib.SetAnnotContents(Index, NewContents);
End;

Function TPDFlibrary.SetAnnotDblProperty(Index, Tag: Integer; NewValue: Double): Integer;
Begin
  Result := PDFlib.SetAnnotDblProperty(Index, Tag, NewValue);
End;

Function TPDFlibrary.SetAnnotIntProperty(Index, Tag, NewValue: Integer): Integer;
Begin
  Result := PDFlib.SetAnnotIntProperty(Index, Tag, NewValue);
End;

Function TPDFlibrary.SetAnnotOptional(Index, OptionalContentGroupID: Integer): Integer;
Begin
  If PDFlib.FontType = 11 Then
    Result := PDFlib.SetAnnotOptional(Index, OptionalContentGroupID)
  Else
    Result := PDFlib.SetAnnotOptional(Index, OptionalContentGroupID);
End;

Function TPDFlibrary.SetAnnotQuadPoints(Index, QuadNumber: Integer; X1, Y1, X2, Y2, X3, Y3, X4, Y4: Double): Integer;
Begin
  Result := PDFlib.SetAnnotQuadPoints(Index, QuadNumber, X1, Y1, X2, Y2, X3, Y3, X4, Y4);
End;

Function TPDFlibrary.SetAnnotRect(Index: Integer; Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.SetAnnotRect(Index, Left, Top, Width, Height);
End;

Function TPDFlibrary.SetAnnotStrProperty(Index, Tag: Integer; Const NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetAnnotStrProperty(Index, Tag, NewValue);
End;

Function TPDFlibrary.SetAppendInputFromVariant(Source: Olevariant): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(Source) = (varByte or varArray or varByRef)) or (VarType(Source) = (varByte or varArray)) or (VarType(Source) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(Source, 1);
      Min := VarArrayLowBound(Source, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(Source[X]));
      Result := PDFlib.SetAppendInputFromString(S);
    Except
    End;
End;

Function TPDFlibrary.SetBaseURL(Const NewBaseURL: WideString): Integer;
Begin
  Result := PDFlib.SetBaseURL(NewBaseURL);
End;

Function TPDFlibrary.SetBlendMode(BlendMode: Integer): Integer;
Begin
  Result := PDFlib.SetBlendMode(BlendMode);
End;

Function TPDFlibrary.SetBreakString(Const NewBreakString: WideString): Integer;
Begin
  Result := PDFlib.SetBreakString(NewBreakString);
End;

Function TPDFlibrary.SetCSDictEPSG(CSDictID, NewEPSG: Integer): Integer;
Begin
  Result := PDFlib.SetCSDictEPSG(CSDictID, NewEPSG);
End;

Function TPDFlibrary.SetCSDictType(CSDictID, NewDictType: Integer): Integer;
Begin
  Result := PDFlib.SetCSDictType(CSDictID, NewDictType);
End;

Function TPDFlibrary.SetCSDictWKT(CSDictID: Integer; Const NewWKT: WideString): Integer;
Begin
  Result := PDFlib.SetCSDictWKT(CSDictID, NewWKT);
End;

Function TPDFlibrary.SetCapturedPageOptional(CaptureID, OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.SetCapturedPageOptional(CaptureID, OptionalContentGroupID);
End;

Function TPDFlibrary.SetCapturedPageTransparencyGroup(CaptureID, CS, Isolate, Knockout: Integer): Integer;
Begin
  Result := PDFlib.SetCapturedPageTransparencyGroup(CaptureID, CS, Isolate, Knockout);
End;

Function TPDFlibrary.SetCatalogInformation(Const Key, NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetCatalogInformation(Key, NewValue);
End;

Function TPDFlibrary.SetCharWidth(CharCode, NewWidth: Integer): Integer;
Begin
  Result := PDFlib.SetCharWidth(CharCode, NewWidth);
End;

Function TPDFlibrary.SetClippingPath: Integer;
Begin
  Result := PDFlib.SetClippingPath;
End;

Function TPDFlibrary.SetClippingPathEvenOdd: Integer;
Begin
  Result := PDFlib.SetClippingPathEvenOdd;
End;

Function TPDFlibrary.SetCompatibility(CompatibilityItem, CompatibilityMode: Integer): Integer;
Begin
  Result := PDFlib.SetCompatibility(CompatibilityItem, CompatibilityMode);
End;

Function TPDFlibrary.SetContentStreamFromVariant(NewValue: Olevariant): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(NewValue) = (varByte or varArray or varByRef)) or (VarType(NewValue) = (varByte or varArray)) or
    (VarType(NewValue) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(NewValue, 1);
      Min := VarArrayLowBound(NewValue, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(NewValue[X]));
      Result := PDFlib.SetContentStreamFromString(S);
    Except
    End;
End;

Function TPDFlibrary.SetContentStreamOptional(OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.SetContentStreamOptional(OptionalContentGroupID);
End;

Function TPDFlibrary.SetCropBox(Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.SetCropBox(Left, Top, Width, Height);
End;

Function TPDFlibrary.SetCustomInformation(Const Key, NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetCustomInformation(Key, NewValue);
End;

Function TPDFlibrary.SetCustomLineDash(Const DashPattern: WideString; DashPhase: Double): Integer;
Begin
  Result := PDFlib.SetCustomLineDash(DashPattern, DashPhase);
End;

Function TPDFlibrary.SetPDFiumFileName(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.SetPDFiumFileName(FileName);
End;

Function TPDFlibrary.SetDecodeMode(NewDecodeMode: Integer): Integer;
Begin
  Result := PDFlib.SetDecodeMode(NewDecodeMode);
End;

Function TPDFlibrary.SetDestProperties(DestID, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer;
Begin
  Result := PDFlib.SetDestProperties(DestID, Zoom, DestType, Left, Top, Right, Bottom);
End;

Function TPDFlibrary.SetDestValue(DestID, ValueKey: Integer; NewValue: Double): Integer;
Begin
  Result := PDFlib.SetDestValue(DestID, ValueKey, NewValue);
End;

Function TPDFlibrary.SetDocumentMetadata(Const XMP: WideString): Integer;
Begin
  Result := PDFlib.SetDocumentMetadata(XMP);
End;

Function TPDFlibrary.SetEmbeddedFileStrProperty(Index, Tag: Integer; Const NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetEmbeddedFileStrProperty(Index, Tag, NewValue);
End;

Function TPDFlibrary.SetFillColor(Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetFillColor(Red, Green, Blue);
End;

Function TPDFlibrary.SetFillColorCMYK(C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetFillColorCMYK(C, M, Y, K);
End;

Function TPDFlibrary.SetFillColorSep(Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetFillColorSep(ColorName, Tint);
End;

Function TPDFlibrary.SetFillShader(Const ShaderName: WideString): Integer;
Begin
  Result := PDFlib.SetFillShader(ShaderName);
End;

Function TPDFlibrary.SetFillTilingPattern(Const PatternName: WideString): Integer;
Begin
  Result := PDFlib.SetFillTilingPattern(PatternName);
End;

Function TPDFlibrary.SetFindImagesMode(NewFindImagesMode: Integer): Integer;
Begin
  Result := PDFlib.SetFindImagesMode(NewFindImagesMode);
End;

Function TPDFlibrary.SetFontEncoding(Encoding: Integer): Integer;
Begin
  Result := PDFlib.SetFontEncoding(Encoding);
End;

Function TPDFlibrary.SetFontFlags(Fixed, Serif, Symbolic, Script, Italic, AllCap, SmallCap, ForceBold: Integer): Integer;
Begin
  Result := PDFlib.SetFontFlags(Fixed, Serif, Symbolic, Script, Italic, AllCap, SmallCap, ForceBold);
End;

Function TPDFlibrary.SetFormFieldAlignment(Index, Alignment: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldAlignment(Index, Alignment);
End;

Function TPDFlibrary.SetFormFieldAnnotFlags(Index, NewFlags: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldAnnotFlags(Index, NewFlags);
End;

Function TPDFlibrary.SetFormFieldBackgroundColor(Index: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBackgroundColor(Index, Red, Green, Blue);
End;

Function TPDFlibrary.SetFormFieldBackgroundColorCMYK(Index: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBackgroundColorCMYK(Index, C, M, Y, K);
End;

Function TPDFlibrary.SetFormFieldBackgroundColorGray(Index: Integer; Gray: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBackgroundColorGray(Index, Gray);
End;

Function TPDFlibrary.SetFormFieldBackgroundColorSep(Index: Integer; Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBackgroundColorSep(Index, ColorName, Tint);
End;

Function TPDFlibrary.SetFormFieldBorderColor(Index: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBorderColor(Index, Red, Green, Blue);
End;

Function TPDFlibrary.SetFormFieldBorderColorCMYK(Index: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBorderColorCMYK(Index, C, M, Y, K);
End;

Function TPDFlibrary.SetFormFieldBorderColorGray(Index: Integer; Gray: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBorderColorGray(Index, Gray);
End;

Function TPDFlibrary.SetFormFieldBorderColorSep(Index: Integer; Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBorderColorSep(Index, ColorName, Tint);
End;

Function TPDFlibrary.SetFormFieldBorderStyle(Index: Integer; Width: Double; Style: Integer; DashOn, DashOff: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBorderStyle(Index, Width, Style, DashOn, DashOff);
End;

Function TPDFlibrary.SetFormFieldBounds(Index: Integer; Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldBounds(Index, Left, Top, Width, Height);
End;

Function TPDFlibrary.SetFormFieldCalcOrder(Index, Order: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldCalcOrder(Index, Order);
End;

Function TPDFlibrary.SetFormFieldCaption(Index: Integer; Const NewCaption: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldCaption(Index, NewCaption);
End;

Function TPDFlibrary.SetFormFieldCheckStyle(Index, CheckStyle, Position: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldCheckStyle(Index, CheckStyle, Position);
End;

Function TPDFlibrary.SetFormFieldChildTitle(Index: Integer; Const NewTitle: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldChildTitle(Index, NewTitle);
End;

Function TPDFlibrary.SetFormFieldChoiceSub(Index, SubIndex: Integer; Const SubName, DisplayName: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldChoiceSub(Index, SubIndex, SubName, DisplayName);
End;

Function TPDFlibrary.SetFormFieldChoiceType(Index, ChoiceType: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldChoiceType(Index, ChoiceType);
End;

Function TPDFlibrary.SetFormFieldColor(Index: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldColor(Index, Red, Green, Blue);
End;

Function TPDFlibrary.SetFormFieldColorCMYK(Index: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldColorCMYK(Index, C, M, Y, K);
End;

Function TPDFlibrary.SetFormFieldColorSep(Index: Integer; Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldColorSep(Index, ColorName, Tint);
End;

Function TPDFlibrary.SetFormFieldComb(Index, Comb: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldComb(Index, Comb);
End;

Function TPDFlibrary.SetFormFieldDefaultValue(Index: Integer; Const NewDefaultValue: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldDefaultValue(Index, NewDefaultValue);
End;

Function TPDFlibrary.SetFormFieldDescription(Index: Integer; Const NewDescription: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldDescription(Index, NewDescription);
End;

Function TPDFlibrary.SetFormFieldFlags(Index, NewFlags: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldFlags(Index, NewFlags);
End;

Function TPDFlibrary.SetFormFieldFont(Index, FontIndex: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldFont(Index, FontIndex);
End;

Function TPDFlibrary.SetFormFieldHighlightMode(Index, NewMode: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldHighlightMode(Index, NewMode);
End;

Function TPDFlibrary.SetFormFieldIcon(Index, IconType, CaptureID: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldIcon(Index, IconType, CaptureID);
End;

Function TPDFlibrary.SetFormFieldIconStyle(Index, Placement, Scale, ScaleType, HorizontalShift, VerticalShift: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldIconStyle(Index, Placement, Scale, ScaleType, HorizontalShift, VerticalShift);
End;

Function TPDFlibrary.SetFormFieldMaxLen(Index, NewMaxLen: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldMaxLen(Index, NewMaxLen);
End;

Function TPDFlibrary.SetFormFieldNoExport(Index, NoExport: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldNoExport(Index, NoExport);
End;

Function TPDFlibrary.SetFormFieldOptional(Index, OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldOptional(Index, OptionalContentGroupID);
End;

Function TPDFlibrary.SetFormFieldPage(Index, NewPage: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldPage(Index, NewPage);
End;

Function TPDFlibrary.SetFormFieldPrintable(Index, Printable: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldPrintable(Index, Printable);
End;

Function TPDFlibrary.SetFormFieldReadOnly(Index, ReadOnly: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldReadOnly(Index, ReadOnly);
End;

Function TPDFlibrary.SetFormFieldRequired(Index, Required: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldRequired(Index, Required);
End;

Function TPDFlibrary.SetFormFieldResetAction(Index: Integer; Const ActionType: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldResetAction(Index, ActionType);
End;

Function TPDFlibrary.SetFormFieldRichTextString(Index: Integer; Const Key, NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldRichTextString(Index, Key, NewValue);
End;

Function TPDFlibrary.SetFormFieldRotation(Index, Angle: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldRotation(Index, Angle);
End;

Function TPDFlibrary.SetFormFieldSignatureImage(Index, ImageID, Options: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldSignatureImage(Index, ImageID, Options);
End;

Function TPDFlibrary.SetFormFieldStandardFont(Index, StandardFontID: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldStandardFont(Index, StandardFontID);
End;

Function TPDFlibrary.SetFormFieldSubmitAction(Index: Integer; Const ActionType, Link: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldSubmitAction(Index, ActionType, Link);
End;

Function TPDFlibrary.SetFormFieldSubmitActionEx(Index: Integer; Const ActionType, Link: WideString; Flags: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldSubmitActionEx(Index, ActionType, Link, Flags);
End;

Function TPDFlibrary.SetFormFieldTabOrder(Index, Order: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldTabOrder(Index, Order);
End;

Function TPDFlibrary.SetFormFieldTextFlags(Index, Multiline, Password, FileSelect, DoNotSpellCheck, DoNotScroll: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldTextFlags(Index, Multiline, Password, FileSelect, DoNotSpellCheck, DoNotScroll);
End;

Function TPDFlibrary.SetFormFieldTextSize(Index: Integer; NewTextSize: Double): Integer;
Begin
  Result := PDFlib.SetFormFieldTextSize(Index, NewTextSize);
End;

Function TPDFlibrary.SetFormFieldTitle(Index: Integer; Const NewTitle: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldTitle(Index, NewTitle);
End;

Function TPDFlibrary.SetFormFieldValue(Index: Integer; Const NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldValue(Index, NewValue);
End;

Function TPDFlibrary.SetFormFieldValueByTitle(Const Title, NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetFormFieldValueByTitle(Title, NewValue);
End;

Function TPDFlibrary.SetFormFieldVisible(Index, Visible: Integer): Integer;
Begin
  Result := PDFlib.SetFormFieldVisible(Index, Visible);
End;

Function TPDFlibrary.SetGDIPlusFileName(Const DLLFileName: WideString): Integer;
Begin
  Result := PDFlib.SetGDIPlusFileName(DLLFileName);
End;

Function TPDFlibrary.SetGDIPlusOptions(OptionID, NewValue: Integer): Integer;
Begin
  Result := PDFlib.SetGDIPlusOptions(OptionID, NewValue);
End;

Function TPDFlibrary.SetHTMLBoldFont(Const FontSet: WideString; FontID: Integer): Integer;
Begin
  Result := PDFlib.SetHTMLBoldFont(FontSet, FontID);
End;

Function TPDFlibrary.SetHTMLBoldItalicFont(Const FontSet: WideString; FontID: Integer): Integer;
Begin
  Result := PDFlib.SetHTMLBoldItalicFont(FontSet, FontID);
End;

Function TPDFlibrary.SetHTMLItalicFont(Const FontSet: WideString; FontID: Integer): Integer;
Begin
  Result := PDFlib.SetHTMLItalicFont(FontSet, FontID);
End;

Function TPDFlibrary.SetHTMLNormalFont(Const FontSet: WideString; FontID: Integer): Integer;
Begin
  Result := PDFlib.SetHTMLNormalFont(FontSet, FontID);
End;

Function TPDFlibrary.SetHeaderCommentsFromVariant(Source: Olevariant): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(Source) = (varByte or varArray or varByRef)) or (VarType(Source) = (varByte or varArray)) or (VarType(Source) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(Source, 1);
      Min := VarArrayLowBound(Source, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(Source[X]));
      Result := PDFlib.SetHeaderCommentsFromString(S);
    Except
    End;
End;

Function TPDFlibrary.SetImageAsMask(MaskType: Integer): Integer;
Begin
  Result := PDFlib.SetImageAsMask(MaskType);
End;

Function TPDFlibrary.SetImageMask(FromRed, FromGreen, FromBlue, ToRed, ToGreen, ToBlue: Double): Integer;
Begin
  Result := PDFlib.SetImageMask(FromRed, FromGreen, FromBlue, ToRed, ToGreen, ToBlue);
End;

Function TPDFlibrary.SetImageMaskCMYK(FromC, FromM, FromY, FromK, ToC, ToM, ToY, ToK: Double): Integer;
Begin
  Result := PDFlib.SetImageMaskCMYK(FromC, FromM, FromY, FromK, ToC, ToM, ToY, ToK);
End;

Function TPDFlibrary.SetImageMaskFromImage(ImageID: Integer): Integer;
Begin
  Result := PDFlib.SetImageMaskFromImage(ImageID);
End;

Function TPDFlibrary.SetImageOptional(OptionalContentGroupID: Integer): Integer;
Begin
  Result := PDFlib.SetImageOptional(OptionalContentGroupID);
End;

Function TPDFlibrary.SetImageResolution(Horizontal, Vertical, Units: Integer): Integer;
Begin
  Result := PDFlib.SetImageResolution(Horizontal, Vertical, Units);
End;

Function TPDFlibrary.SetInformation(Key: Integer; Const NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetInformation(Key, NewValue);
End;

Function TPDFlibrary.SetJPEGQuality(Quality: Integer): Integer;
Begin
  Result := PDFlib.SetJPEGQuality(Quality);
End;

Function TPDFlibrary.SetJavaScriptMode(JSMode: Integer): Integer;
Begin
  Result := PDFlib.SetJavaScriptMode(JSMode);
End;

Function TPDFlibrary.SetKerning(Const CharPair: WideString; Adjustment: Integer): Integer;
Begin
  Result := PDFlib.SetKerning(CharPair, Adjustment);
End;

Function TPDFlibrary.SetLineCap(LineCap: Integer): Integer;
Begin
  Result := PDFlib.SetLineCap(LineCap);
End;

Function TPDFlibrary.SetLineColor(Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetLineColor(Red, Green, Blue);
End;

Function TPDFlibrary.SetLineColorCMYK(C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetLineColorCMYK(C, M, Y, K);
End;

Function TPDFlibrary.SetLineColorSep(Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetLineColorSep(ColorName, Tint);
End;

Function TPDFlibrary.SetLineDash(DashOn, DashOff: Double): Integer;
Begin
  Result := PDFlib.SetLineDash(DashOn, DashOff);
End;

Function TPDFlibrary.SetLineDashEx(Const DashValues: WideString): Integer;
Begin
  Result := PDFlib.SetLineDashEx(DashValues);
End;

Function TPDFlibrary.SetLineJoin(LineJoin: Integer): Integer;
Begin
  Result := PDFlib.SetLineJoin(LineJoin);
End;

Function TPDFlibrary.SetLineShader(Const ShaderName: WideString): Integer;
Begin
  Result := PDFlib.SetLineShader(ShaderName);
End;

Function TPDFlibrary.SetLineWidth(LineWidth: Double): Integer;
Begin
  Result := PDFlib.SetLineWidth(LineWidth);
End;

Function TPDFlibrary.SetMarkupAnnotStyle(Index: Integer; Red, Green, Blue, Transparency: Double): Integer;
Begin
  Result := PDFlib.SetMarkupAnnotStyle(Index, Red, Green, Blue, Transparency);
End;

Function TPDFlibrary.SetMeasureDictBoundsCount(MeasureDictID, NewCount: Integer): Integer;
Begin
  Result := PDFlib.SetMeasureDictBoundsCount(MeasureDictID, NewCount);
End;

Function TPDFlibrary.SetMeasureDictBoundsItem(MeasureDictID, ItemIndex: Integer; NewValue: Double): Integer;
Begin
  Result := PDFlib.SetMeasureDictBoundsItem(MeasureDictID, ItemIndex, NewValue);
End;

Function TPDFlibrary.SetMeasureDictCoordinateSystem(MeasureDictID, CoordinateSystemID: Integer): Integer;
Begin
  Result := PDFlib.SetMeasureDictCoordinateSystem(MeasureDictID, CoordinateSystemID);
End;

Function TPDFlibrary.SetMeasureDictGPTSCount(MeasureDictID, NewCount: Integer): Integer;
Begin
  Result := PDFlib.SetMeasureDictGPTSCount(MeasureDictID, NewCount);
End;

Function TPDFlibrary.SetMeasureDictGPTSItem(MeasureDictID, ItemIndex: Integer; NewValue: Double): Integer;
Begin
  Result := PDFlib.SetMeasureDictGPTSItem(MeasureDictID, ItemIndex, NewValue);
End;

Function TPDFlibrary.SetMeasureDictLPTSCount(MeasureDictID, NewCount: Integer): Integer;
Begin
  Result := PDFlib.SetMeasureDictLPTSCount(MeasureDictID, NewCount);
End;

Function TPDFlibrary.SetMeasureDictLPTSItem(MeasureDictID, ItemIndex: Integer; NewValue: Double): Integer;
Begin
  Result := PDFlib.SetMeasureDictLPTSItem(MeasureDictID, ItemIndex, NewValue);
End;

Function TPDFlibrary.SetMeasureDictPDU(MeasureDictID, LinearUnit, AreaUnit, AngularUnit: Integer): Integer;
Begin
  Result := PDFlib.SetMeasureDictPDU(MeasureDictID, LinearUnit, AreaUnit, AngularUnit);
End;

Function TPDFlibrary.SetMeasurementUnits(MeasurementUnits: Integer): Integer;
Begin
  Result := PDFlib.SetMeasurementUnits(MeasurementUnits);
End;

Function TPDFlibrary.SetNeedAppearances(NewValue: Integer): Integer;
Begin
  Result := PDFlib.SetNeedAppearances(NewValue);
End;

Function TPDFlibrary.SetObjectFromVariant(ObjectNumber: Integer; NewValue: Olevariant): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(NewValue) = (varByte or varArray or varByRef)) or (VarType(NewValue) = (varByte or varArray)) or
    (VarType(NewValue) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(NewValue, 1);
      Min := VarArrayLowBound(NewValue, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(NewValue[X]));
      Result := PDFlib.SetObjectFromString(ObjectNumber, S);
    Except
    End;
End;

Function TPDFlibrary.SetOpenActionDestination(OpenPage, Zoom: Integer): Integer;
Begin
  Result := PDFlib.SetOpenActionDestination(OpenPage, Zoom);
End;

Function TPDFlibrary.SetOpenActionDestinationFull(OpenPage, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer;
Begin
  Result := PDFlib.SetOpenActionDestinationFull(OpenPage, Zoom, DestType, Left, Top, Right, Bottom);
End;

Function TPDFlibrary.SetOpenActionJavaScript(Const JavaScript: WideString): Integer;
Begin
  Result := PDFlib.SetOpenActionJavaScript(JavaScript);
End;

Function TPDFlibrary.SetOpenActionMenu(Const MenuItem: WideString): Integer;
Begin
  Result := PDFlib.SetOpenActionMenu(MenuItem);
End;

Function TPDFlibrary.SetOptionalContentConfigLocked(OptionalContentConfigID, OptionalContentGroupID, NewLocked: Integer): Integer;
Begin
  Result := PDFlib.SetOptionalContentConfigLocked(OptionalContentConfigID, OptionalContentGroupID, NewLocked);
End;

Function TPDFlibrary.SetOptionalContentConfigState(OptionalContentConfigID, OptionalContentGroupID, NewState: Integer): Integer;
Begin
  Result := PDFlib.SetOptionalContentConfigState(OptionalContentConfigID, OptionalContentGroupID, NewState);
End;

Function TPDFlibrary.SetOptionalContentGroupName(OptionalContentGroupID: Integer; Const NewGroupName: WideString): Integer;
Begin
  Result := PDFlib.SetOptionalContentGroupName(OptionalContentGroupID, NewGroupName);
End;

Function TPDFlibrary.SetOptionalContentGroupPrintable(OptionalContentGroupID, Printable: Integer): Integer;
Begin
  Result := PDFlib.SetOptionalContentGroupPrintable(OptionalContentGroupID, Printable);
End;

Function TPDFlibrary.SetOptionalContentGroupVisible(OptionalContentGroupID, Visible: Integer): Integer;
Begin
  Result := PDFlib.SetOptionalContentGroupVisible(OptionalContentGroupID, Visible);
End;

Function TPDFlibrary.SetOrigin(Origin: Integer): Integer;
Begin
  Result := PDFlib.SetOrigin(Origin);
End;

Function TPDFlibrary.SetOutlineColor(OutlineID: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetOutlineColor(OutlineID, Red, Green, Blue);
End;

Function TPDFlibrary.SetOutlineDestination(OutlineID, DestPage: Integer; DestPosition: Double): Integer;
Begin
  Result := PDFlib.SetOutlineDestination(OutlineID, DestPage, DestPosition);
End;

Function TPDFlibrary.SetOutlineDestinationFull(OutlineID, DestPage, Zoom, DestType: Integer; Left, Top, Right, Bottom: Double): Integer;
Begin
  Result := PDFlib.SetOutlineDestinationFull(OutlineID, DestPage, Zoom, DestType, Left, Top, Right, Bottom);
End;

Function TPDFlibrary.SetOutlineDestinationZoom(OutlineID, DestPage: Integer; DestPosition: Double; Zoom: Integer): Integer;
Begin
  Result := PDFlib.SetOutlineDestinationZoom(OutlineID, DestPage, DestPosition, Zoom);
End;

Function TPDFlibrary.SetOutlineJavaScript(OutlineID: Integer; Const JavaScript: WideString): Integer;
Begin
  Result := PDFlib.SetOutlineJavaScript(OutlineID, JavaScript);
End;

Function TPDFlibrary.SetOutlineNamedDestination(OutlineID: Integer; Const DestName: WideString): Integer;
Begin
  Result := PDFlib.SetOutlineNamedDestination(OutlineID, DestName);
End;

Function TPDFlibrary.SetOutlineOpenFile(OutlineID: Integer; Const FileName: WideString): Integer;
Begin
  Result := PDFlib.SetOutlineOpenFile(OutlineID, FileName);
End;

Function TPDFlibrary.SetOutlineRemoteDestination(OutlineID: Integer; Const FileName: WideString; OpenPage, Zoom, DestType: Integer;
  PntLeft, PntTop, PntRight, PntBottom: Double; NewWindow: Integer): Integer;
Begin
  Result := PDFlib.SetOutlineRemoteDestination(OutlineID, FileName, OpenPage, Zoom, DestType, PntLeft, PntTop, PntRight, PntBottom, NewWindow);
End;

Function TPDFlibrary.SetOutlineStyle(OutlineID, SetItalic, SetBold: Integer): Integer;
Begin
  Result := PDFlib.SetOutlineStyle(OutlineID, SetItalic, SetBold);
End;

Function TPDFlibrary.SetOutlineTitle(OutlineID: Integer; Const NewTitle: WideString): Integer;
Begin
  Result := PDFlib.SetOutlineTitle(OutlineID, NewTitle);
End;

Function TPDFlibrary.SetOutlineWebLink(OutlineID: Integer; Const Link: WideString): Integer;
Begin
  Result := PDFlib.SetOutlineWebLink(OutlineID, Link);
End;

Function TPDFlibrary.SetOverprint(StrokingOverprint, OtherOverprint, OverprintMode: Integer): Integer;
Begin
  Result := PDFlib.SetOverprint(StrokingOverprint, OtherOverprint, OverprintMode);
End;

Function TPDFlibrary.SetPDFAMode(NewMode: Integer): Integer;
Begin
  Result := PDFlib.SetPDFAMode(NewMode);
End;

Function TPDFlibrary.SetPNGTransparencyColor(RedByte, GreenByte, BlueByte: Integer): Integer;
Begin
  Result := PDFlib.SetPNGTransparencyColor(RedByte, GreenByte, BlueByte);
End;

Function TPDFlibrary.SetPageActionMenu(Const MenuItem: WideString): Integer;
Begin
  Result := PDFlib.SetPageActionMenu(MenuItem);
End;

Function TPDFlibrary.SetPageBox(BoxType: Integer; Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.SetPageBox(BoxType, Left, Top, Width, Height);
End;

Function TPDFlibrary.SetPageContentFromVariant(NewValue: Olevariant): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(NewValue) = (varByte or varArray or varByRef)) or (VarType(NewValue) = (varByte or varArray)) or
    (VarType(NewValue) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(NewValue, 1);
      Min := VarArrayLowBound(NewValue, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(NewValue[X]));
      Result := PDFlib.SetPageContentFromString(S);
    Except
    End;
End;

Function TPDFlibrary.SetPageDimensions(NewPageWidth, NewPageHeight: Double): Integer;
Begin
  Result := PDFlib.SetPageDimensions(NewPageWidth, NewPageHeight);
End;

Function TPDFlibrary.SetPageLayout(NewPageLayout: Integer): Integer;
Begin
  Result := PDFlib.SetPageLayout(NewPageLayout);
End;

Function TPDFlibrary.SetPageMode(NewPageMode: Integer): Integer;
Begin
  Result := PDFlib.SetPageMode(NewPageMode);
End;

Function TPDFlibrary.SetPageSize(Const PaperName: WideString): Integer;
Begin
  Result := PDFlib.SetPageSize(PaperName);
End;

Function TPDFlibrary.SetPageThumbnail: Integer;
Begin
  Result := PDFlib.SetPageThumbnail;
End;

Function TPDFlibrary.SetPageTransparencyGroup(CS, Isolate, Knockout: Integer): Integer;
Begin
  Result := PDFlib.SetPageTransparencyGroup(CS, Isolate, Knockout);
End;

Function TPDFlibrary.SetPageUserUnit(UserUnit: Double): Integer;
Begin
  Result := PDFlib.SetPageUserUnit(UserUnit);
End;

Function TPDFlibrary.SetPrecision(NewPrecision: Integer): Integer;
Begin
  Result := PDFlib.SetPrecision(NewPrecision);
End;

Function TPDFlibrary.SetPrinterDevModeFromVariant(Source: Olevariant): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(Source) = (varByte or varArray or varByRef)) or (VarType(Source) = (varByte or varArray)) or (VarType(Source) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(Source, 1);
      Min := VarArrayLowBound(Source, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(Source[X]));
      Result := PDFlib.SetPrinterDevModeFromString(S);
    Except
    End;
End;

Function TPDFlibrary.SetRenderCropType(NewCropType: Integer): Integer;
Begin
  Result := PDFlib.SetRenderCropType(NewCropType);
End;

Function TPDFlibrary.SetRenderDCErasePage(NewErasePage: Integer): Integer;
Begin
  Result := PDFlib.SetRenderDCErasePage(NewErasePage);
End;

Function TPDFlibrary.SetRenderDCOffset(NewOffsetX, NewOffsetY: Integer): Integer;
Begin
  Result := PDFlib.SetRenderDCOffset(NewOffsetX, NewOffsetY);
End;

Function TPDFlibrary.SetRenderOptions(OptionID, NewValue: Integer): Integer;
Begin
  Result := PDFlib.SetRenderOptions(OptionID, NewValue);
End;

Function TPDFlibrary.SetRenderScale(NewScale: Double): Integer;
Begin
  Result := PDFlib.SetRenderScale(NewScale);
End;

Function TPDFlibrary.SetScale(NewScale: Double): Integer;
Begin
  Result := PDFlib.SetScale(NewScale);
End;

Function TPDFlibrary.SetSignProcessCustomSubFilter(SignProcessID: Integer; Const SubFilterStr: WideString): Integer;
Begin
  Result := PDFlib.SetSignProcessCustomSubFilter(SignProcessID, SubFilterStr);
End;

Function TPDFlibrary.SetSignProcessField(SignProcessID: Integer; Const SignatureFieldName: WideString): Integer;
Begin
  Result := PDFlib.SetSignProcessField(SignProcessID, SignatureFieldName);
End;

Function TPDFlibrary.SetSignProcessFieldBounds(SignProcessID: Integer; Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.SetSignProcessFieldBounds(SignProcessID, Left, Top, Width, Height);
End;

Function TPDFlibrary.SetSignProcessFieldImageFromFile(SignProcessID: Integer; Const ImageFileName: WideString; Options: Integer): Integer;
Begin
  Result := PDFlib.SetSignProcessFieldImageFromFile(SignProcessID, ImageFileName, Options);
End;

Function TPDFlibrary.SetSignProcessFieldPage(SignProcessID, SignaturePage: Integer): Integer;
Begin
  Result := PDFlib.SetSignProcessFieldPage(SignProcessID, SignaturePage);
End;

Function TPDFlibrary.SetSignProcessInfo(SignProcessID: Integer; Const Reason, Location, ContactInfo: WideString): Integer;
Begin
  Result := PDFlib.SetSignProcessInfo(SignProcessID, Reason, Location, ContactInfo);
End;

Function TPDFlibrary.SetSignProcessKeyset(SignProcessID, KeysetID: Integer): Integer;
Begin
  Result := PDFlib.SetSignProcessKeyset(SignProcessID, KeysetID);
End;

Function TPDFlibrary.SetSignProcessPFXFromFile(SignProcessID: Integer; Const PFXFileName, PFXPassword: WideString): Integer;
Begin
  Result := PDFlib.SetSignProcessPFXFromFile(SignProcessID, PFXFileName, PFXPassword);
End;

Function TPDFlibrary.SetSignProcessPassthrough(SignProcessID, SignatureLength: Integer): Integer;
Begin
  Result := PDFlib.SetSignProcessPassthrough(SignProcessID, SignatureLength);
End;

Function TPDFlibrary.SetSignProcessSubFilter(SignProcessID, SubFilter: Integer): Integer;
Begin
  Result := PDFlib.SetSignProcessSubFilter(SignProcessID, SubFilter);
End;

Function TPDFlibrary.SetTabOrderMode(Const Mode: WideString): Integer;
Begin
  Result := PDFlib.SetTabOrderMode(Mode);
End;

Function TPDFlibrary.SetTableBorderColor(TableID, BorderIndex: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTableBorderColor(TableID, BorderIndex, Red, Green, Blue);
End;

Function TPDFlibrary.SetTableBorderColorCMYK(TableID, BorderIndex: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTableBorderColorCMYK(TableID, BorderIndex, C, M, Y, K);
End;

Function TPDFlibrary.SetTableBorderWidth(TableID, BorderIndex: Integer; NewWidth: Double): Integer;
Begin
  Result := PDFlib.SetTableBorderWidth(TableID, BorderIndex, NewWidth);
End;

Function TPDFlibrary.SetTableCellAlignment(TableID, FirstRow, FirstColumn, LastRow, LastColumn, NewCellAlignment: Integer): Integer;
Begin
  Result := PDFlib.SetTableCellAlignment(TableID, FirstRow, FirstColumn, LastRow, LastColumn, NewCellAlignment);
End;

Function TPDFlibrary.SetTableCellBackgroundColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTableCellBackgroundColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn, Red, Green, Blue);
End;

Function TPDFlibrary.SetTableCellBackgroundColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTableCellBackgroundColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn, C, M, Y, K);
End;

Function TPDFlibrary.SetTableCellBorderColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTableCellBorderColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex, Red, Green, Blue);
End;

Function TPDFlibrary.SetTableCellBorderColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTableCellBorderColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex, C, M, Y, K);
End;

Function TPDFlibrary.SetTableCellBorderWidth(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; NewWidth: Double): Integer;
Begin
  Result := PDFlib.SetTableCellBorderWidth(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex, NewWidth);
End;

Function TPDFlibrary.SetTableCellContent(TableID, RowNumber, ColumnNumber: Integer; Const HTMLText: WideString): Integer;
Begin
  Result := PDFlib.SetTableCellContent(TableID, RowNumber, ColumnNumber, HTMLText);
End;

Function TPDFlibrary.SetTableCellPadding(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex: Integer; NewPadding: Double): Integer;
Begin
  Result := PDFlib.SetTableCellPadding(TableID, FirstRow, FirstColumn, LastRow, LastColumn, BorderIndex, NewPadding);
End;

Function TPDFlibrary.SetTableCellTextColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTableCellTextColor(TableID, FirstRow, FirstColumn, LastRow, LastColumn, Red, Green, Blue);
End;

Function TPDFlibrary.SetTableCellTextColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTableCellTextColorCMYK(TableID, FirstRow, FirstColumn, LastRow, LastColumn, C, M, Y, K);
End;

Function TPDFlibrary.SetTableCellTextSize(TableID, FirstRow, FirstColumn, LastRow, LastColumn: Integer; NewTextSize: Double): Integer;
Begin
  Result := PDFlib.SetTableCellTextSize(TableID, FirstRow, FirstColumn, LastRow, LastColumn, NewTextSize);
End;

Function TPDFlibrary.SetTableColumnWidth(TableID, FirstColumn, LastColumn: Integer; NewWidth: Double): Integer;
Begin
  Result := PDFlib.SetTableColumnWidth(TableID, FirstColumn, LastColumn, NewWidth);
End;

Function TPDFlibrary.SetTableRowHeight(TableID, FirstRow, LastRow: Integer; NewHeight: Double): Integer;
Begin
  Result := PDFlib.SetTableRowHeight(TableID, FirstRow, LastRow, NewHeight);
End;

Function TPDFlibrary.SetTableThinBorders(TableID, ThinBorders: Integer; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTableThinBorders(TableID, ThinBorders, Red, Green, Blue);
End;

Function TPDFlibrary.SetTableThinBordersCMYK(TableID, ThinBorders: Integer; C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTableThinBordersCMYK(TableID, ThinBorders, C, M, Y, K);
End;

Function TPDFlibrary.SetTempFile(Const FileName: WideString): Integer;
Begin
  Result := PDFlib.SetTempFile(FileName);
End;

Function TPDFlibrary.SetTempPath(Const NewPath: WideString): Integer;
Begin
  Result := PDFlib.SetTempPath(NewPath);
End;

Function TPDFlibrary.SetTextAlign(TextAlign: Integer): Integer;
Begin
  Result := PDFlib.SetTextAlign(TextAlign);
End;

Function TPDFlibrary.SetTextCharSpacing(CharSpacing: Double): Integer;
Begin
  Result := PDFlib.SetTextCharSpacing(CharSpacing);
End;

Function TPDFlibrary.SetTextColor(Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTextColor(Red, Green, Blue);
End;

Function TPDFlibrary.SetTextColorCMYK(C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTextColorCMYK(C, M, Y, K);
End;

Function TPDFlibrary.SetTextColorSep(Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetTextColorSep(ColorName, Tint);
End;

Function TPDFlibrary.SetTextExtractionArea(Left, Top, Width, Height: Double): Integer;
Begin
  Result := PDFlib.SetTextExtractionArea(Left, Top, Width, Height);
End;

Function TPDFlibrary.SetTextExtractionOptions(OptionID, NewValue: Integer): Integer;
Begin
  Result := PDFlib.SetTextExtractionOptions(OptionID, NewValue);
End;

Function TPDFlibrary.SetTextExtractionScaling(Options: Integer; Horizontal, Vertical: Double): Integer;
Begin
  Result := PDFlib.SetTextExtractionScaling(Options, Horizontal, Vertical);
End;

Function TPDFlibrary.SetTextExtractionWordGap(NewWordGap: Double): Integer;
Begin
  Result := PDFlib.SetTextExtractionWordGap(NewWordGap);
End;

Function TPDFlibrary.SetTextHighlight(Highlight: Integer): Integer;
Begin
  Result := PDFlib.SetTextHighlight(Highlight);
End;

Function TPDFlibrary.SetTextHighlightColor(Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTextHighlightColor(Red, Green, Blue);
End;

Function TPDFlibrary.SetTextHighlightColorCMYK(C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTextHighlightColorCMYK(C, M, Y, K);
End;

Function TPDFlibrary.SetTextHighlightColorSep(Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetTextHighlightColorSep(ColorName, Tint);
End;

Function TPDFlibrary.SetTextMode(TextMode: Integer): Integer;
Begin
  Result := PDFlib.SetTextMode(TextMode);
End;

Function TPDFlibrary.SetTextRise(Rise: Double): Integer;
Begin
  Result := PDFlib.SetTextRise(Rise);
End;

Function TPDFlibrary.SetTextScaling(ScalePercentage: Double): Integer;
Begin
  Result := PDFlib.SetTextScaling(ScalePercentage);
End;

Function TPDFlibrary.SetTextShader(Const ShaderName: WideString): Integer;
Begin
  Result := PDFlib.SetTextShader(ShaderName);
End;

Function TPDFlibrary.SetTextSize(TextSize: Double): Integer;
Begin
  Result := PDFlib.SetTextSize(TextSize);
End;

Function TPDFlibrary.SetTextSpacing(Spacing: Double): Integer;
Begin
  Result := PDFlib.SetTextSpacing(Spacing);
End;

Function TPDFlibrary.SetTextUnderline(Underline: Integer): Integer;
Begin
  Result := PDFlib.SetTextUnderline(Underline);
End;

Function TPDFlibrary.SetTextUnderlineColor(Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetTextUnderlineColor(Red, Green, Blue);
End;

Function TPDFlibrary.SetTextUnderlineColorCMYK(C, M, Y, K: Double): Integer;
Begin
  Result := PDFlib.SetTextUnderlineColorCMYK(C, M, Y, K);
End;

Function TPDFlibrary.SetTextUnderlineColorSep(Const ColorName: WideString; Tint: Double): Integer;
Begin
  Result := PDFlib.SetTextUnderlineColorSep(ColorName, Tint);
End;

Function TPDFlibrary.SetTextUnderlineCustomDash(Const DashPattern: WideString; DashPhase: Double): Integer;
Begin
  Result := PDFlib.SetTextUnderlineCustomDash(DashPattern, DashPhase);
End;

Function TPDFlibrary.SetTextUnderlineDash(DashOn, DashOff: Double): Integer;
Begin
  Result := PDFlib.SetTextUnderlineDash(DashOn, DashOff);
End;

Function TPDFlibrary.SetTextUnderlineDistance(UnderlineDistance: Double): Integer;
Begin
  Result := PDFlib.SetTextUnderlineDistance(UnderlineDistance);
End;

Function TPDFlibrary.SetTextUnderlineWidth(UnderlineWidth: Double): Integer;
Begin
  Result := PDFlib.SetTextUnderlineWidth(UnderlineWidth);
End;

Function TPDFlibrary.SetTextWordSpacing(WordSpacing: Double): Integer;
Begin
  Result := PDFlib.SetTextWordSpacing(WordSpacing);
End;

Function TPDFlibrary.SetTransparency(Transparency: Integer): Integer;
Begin
  Result := PDFlib.SetTransparency(Transparency);
End;

Function TPDFlibrary.SetViewerPreferences(Option, NewValue: Integer): Integer;
Begin
  Result := PDFlib.SetViewerPreferences(Option, NewValue);
End;

Function TPDFlibrary.SetXFAFormFieldAccess(Const XFAFieldName: WideString; NewAccess: Integer): Integer;
Begin
  Result := PDFlib.SetXFAFormFieldAccess(XFAFieldName, NewAccess);
End;

Function TPDFlibrary.SetXFAFormFieldBorderColor(Const XFAFieldName: WideString; Red, Green, Blue: Double): Integer;
Begin
  Result := PDFlib.SetXFAFormFieldBorderColor(XFAFieldName, Red, Green, Blue);
End;

Function TPDFlibrary.SetXFAFormFieldBorderPresence(Const XFAFieldName: WideString; NewPresence: Integer): Integer;
Begin
  Result := PDFlib.SetXFAFormFieldBorderPresence(XFAFieldName, NewPresence);
End;

Function TPDFlibrary.SetXFAFormFieldBorderWidth(Const XFAFieldName: WideString; BorderWidth: Double): Integer;
Begin
  Result := PDFlib.SetXFAFormFieldBorderWidth(XFAFieldName, BorderWidth);
End;

Function TPDFlibrary.SetXFAFormFieldValue(Const XFAFieldName, NewValue: WideString): Integer;
Begin
  Result := PDFlib.SetXFAFormFieldValue(XFAFieldName, NewValue);
End;

Function TPDFlibrary.SetupPrinter(Const CustomPrinterName: WideString; Setting, NewValue: Integer): Integer;
Begin
  Result := PDFlib.SetupPrinter(CustomPrinterName, Setting, NewValue);
End;

Function TPDFlibrary.SignFile(Const InputFileName, OpenPassword, SignatureFieldName, OutputFileName, PFXFileName, PFXPassword, Reason, Location,
  ContactInfo: WideString): Integer;
Begin
  Result := PDFlib.SignFile(InputFileName, OpenPassword, SignatureFieldName, OutputFileName, PFXFileName, PFXPassword, Reason, Location, ContactInfo);
End;

Function TPDFlibrary.SplitPageText(Options: Integer): Integer;
Begin
  Result := PDFlib.SplitPageText(Options);
End;

Function TPDFlibrary.StartPath(StartX, StartY: Double): Integer;
Begin
  Result := PDFlib.StartPath(StartX, StartY);
End;

Function TPDFlibrary.StoreCustomDataFromFile(Const Key, FileName: WideString; Location, Options: Integer): Integer;
Begin
  Result := PDFlib.StoreCustomDataFromFile(Key, FileName, Location, Options);
End;

Function TPDFlibrary.StoreCustomDataFromVariant(Const Key: WideString; NewValue: Olevariant; Location, Options: Integer): Integer;
Var
  X: Integer;
  S: AnsiString;
  Max: Integer;
  Min: Integer;
Begin
  If (VarType(NewValue) = (varByte or varArray or varByRef)) or (VarType(NewValue) = (varByte or varArray)) or
    (VarType(NewValue) = (varShortInt or varArray)) Then
    Try
      Max := VarArrayHighBound(NewValue, 1);
      Min := VarArrayLowBound(NewValue, 1);
      SetLength(S, Max - Min + 1);
      For X := Min To Max Do
        S[X - Min + 1] := AnsiChar(Byte(NewValue[X]));
      Result := PDFlib.StoreCustomDataFromString(AnsiString(Key), S, Location, Options);
    Except
    End;
End;

Function TPDFlibrary.TestTempPath: Integer;
Begin
  Result := PDFlib.TestTempPath;
End;

Function TPDFlibrary.TransformFile(Const InputFileName, Password, OutputFileName: WideString; TransformType, Options: Integer): Integer;
Begin
  Result := PDFlib.TransformFile(InputFileName, Password, OutputFileName, TransformType, Options);
End;

Function TPDFlibrary.UpdateAndFlattenFormField(Index: Integer): Integer;
Begin
  Result := PDFlib.UpdateAndFlattenFormField(Index);
End;

Function TPDFlibrary.UpdateAppearanceStream(Index: Integer): Integer;
Begin
  Result := PDFlib.UpdateAppearanceStream(Index);
End;

Function TPDFlibrary.UpdateTrueTypeSubsettedFont(Const SubsetChars: WideString): Integer;
Begin
  Result := PDFlib.UpdateTrueTypeSubsettedFont(SubsetChars);
End;

Function TPDFlibrary.UseKerning(Kern: Integer): Integer;
Begin
  Result := PDFlib.UseKerning(Kern);
End;

Function TPDFlibrary.UseUnsafeContentStreams(SafetyLevel: Integer): Integer;
Begin
  Result := PDFlib.UseUnsafeContentStreams(SafetyLevel);
End;

Procedure TPDFlibrary.Initialize;
Begin
  Inherited;
  PDFlib := TPDFlib.Create;
End;

Destructor TPDFlibrary.Destroy;
Begin
  PDFlib.Free;
  Inherited;
End;

Function TPDFlibrary.IPDFlibrary_ExtractFilePageContentToString(Const InputFileName, Password: WideString; Page: Integer): WideString;
Begin
End;

Initialization

TAutoObjectFactory.Create(ComServer, TPDFlibrary, Class_PDFlibrary, ciMultiInstance, tmApartment);

End.
