高手帮助翻译下这几个VB函数成DELPHI的吧

Question

Public Declare Function pdfOpenPDF Lib "SII_PDF.DLL" Alias "_OpenPDF@20" (ByVal sFileName As String, _
          ByVal bIgnoreProtect As Boolean, _
          ByVal sUserPassword As String, _
          ByVal sOwnerPassword As String, _
          ByRef lHandle As Long) As LongPublic Declare Function pdfConvertPDFToTextFile Lib "SII_PDF.DLL" Alias "_ConvertPDFToTextFile@16" ( _
        ByVal lFirstPage As Long, _
        ByVal lLastPage As Long, _
        ByRef lPDFHandle As Long, _
        ByVal sOutputFile As String) As LongPublic Declare Function pdfConvertPDFToText Lib "SII_PDF.DLL" Alias "_ConvertPDFToText@20" ( _
        ByVal lFirstPage As Long, _
        ByVal lLastPage As Long, _
        ByRef lPDFHandle As Long, _
        ByVal sBuffer As String, _
        ByVal lSize As Long) As Long

Answer 1

{Public Declare Function pdfOpenPDF Lib "SII_PDF.DLL" Alias "_OpenPDF@20" (ByVal sFileName As String, _
          ByVal bIgnoreProtect As Boolean, _
          ByVal sUserPassword As String, _
          ByVal sOwnerPassword As String, _
          ByRef lHandle As Long) As Long}function pdfOpenPDF (bIgnoreProtect:Boolean;sUserPassword,sOwnerPassword:PChar;var lHandle:THandle); external 'SII_PDF.DLL' name '_OpenPDF@20';

Answer 2

{Public Declare Function pdfOpenPDF Lib "SII_PDF.DLL" Alias "_OpenPDF@20" (ByVal sFileName As String, _
          ByVal bIgnoreProtect As Boolean, _
          ByVal sUserPassword As String, _
          ByVal sOwnerPassword As String, _
          ByRef lHandle As Long) As Long}function pdfOpenPDF (
                     bIgnoreProtect:Boolean;
                     sUserPassword,sOwnerPassword:PChar;
                     var lHandle:THandle):DWORD; external 'SII_PDF.DLL' name '_OpenPDF@20';