home *** CD-ROM | disk | FTP | other *** search
/ BUG 6 / BUGCD1997_09.BIN / UTIL / ADDZIP / ADDZIP.EXE / VB / AUNZIP16.BAS next >
Encoding:
BASIC Source File  |  1997-06-01  |  4.5 KB  |  99 lines
  1. ' Visual Basic declares file for
  2. '
  3. '     aunzip16.dll  addUNZIP 16-bit decompression library
  4. '
  5. ' Copyright ⌐ 1996,1997 Stephen Darlington. All rights reserved.
  6. ' Written by Stephen Darlington                  June 1997
  7.  
  8. Declare Function addUNZIP Lib "aunzip16.dll" () As Long
  9. Declare Function addUNZIP_ArchiveName Lib "aunzip16.dll" (ByVal filename As String) As Integer
  10. Declare Function addUNZIP_Decrypt Lib "aunzip16.dll" (ByVal cPassword As String) As Integer
  11. Declare Function addUNZIP_DisplayComment Lib "aunzip16.dll" (ByVal bFlag As Integer) As Integer
  12. Declare Function addUNZIP_Exclude Lib "aunzip16.dll" (ByVal files As String) As Integer
  13. Declare Function addUNZIP_ExcludeListFile Lib "aunzip16.dll" (ByVal cFile As String) As Integer
  14. Declare Function addUNZIP_ExtractTo Lib "aunzip16.dll" (ByVal cPath As String) As Integer
  15. Declare Function addUNZIP_Freshen Lib "aunzip16.dll" (ByVal iFlag As Integer) As Integer
  16. Declare Function addUNZIP_GetLastError Lib "aunzip16.dll" () As Integer
  17. Declare Function addUNZIP_GetLastWarning Lib "aunzip16.dll" () As Integer
  18. Declare Function addUNZIP_Include Lib "aunzip16.dll" (ByVal files As String) As Integer
  19. Declare Function addUNZIP_IncludeListFile Lib "aunzip16.dll" (ByVal cFile As String) As Integer
  20. Declare Sub addUNZIP_Initialise Lib "aunzip16.dll" ()
  21. Declare Function addUNZIP_InstallCallback Lib "aunzip16.dll" (ByVal fn As Long) As Integer
  22. Declare Function addUNZIP_Overwrite Lib "aunzip16.dll" (ByVal iFlag As Integer) As Integer
  23. Declare Function addUNZIP_Register Lib "aunzip16.dll" (ByVal cName As String, ByVal iNumber As Long) As Integer
  24. Declare Function addUNZIP_ResetDefaults Lib "aunzip16.dll" ()
  25. Declare Function addUNZIP_RestoreAttributes Lib "aunzip16.dll" (ByVal iFlag As Integer) As Integer
  26. Declare Function addUNZIP_RestoreStructure Lib "aunzip16.dll" (ByVal iFlag As Integer) As Integer
  27. Declare Function addUNZIP_SetParentWindowHandle Lib "aunzip16.dll" (ByVal Hwnd As Integer) As Integer
  28. Declare Function addUNZIP_SetWindowHandle Lib "aunzip16.dll" (ByVal Hwnd As Integer) As Integer
  29. Declare Function addUNZIP_Test Lib "aunzip16.dll" (ByVal iFlag As Integer) As Integer
  30. Declare Function addUNZIP_ToMemory Lib "aunzip16.dll" (ByVal lpStr As String, ByVal Uint32 As Long) As Integer
  31. Declare Function addUNZIP_Update Lib "aunzip16.dll" (ByVal iFlag As Integer) As Integer
  32. Declare Function addUNZIP_View Lib "aunzip16.dll" (ByVal bFlag As Integer) As Integer
  33.  
  34. ' constants for addUNZIP_Overwrite(...)
  35. Global Const azOVERWRITE_ALL = &HB
  36. Global Const azOVERWRITE_NONE = &HC
  37. Global Const azOVERWRITE_QUERY = &HA
  38.  
  39. ' constants used in messages to identify library
  40. Global Const azLIBRARY_ADDUNZIP = 1
  41.  
  42. ' constants for addUNZIP_RestoreAttributes(...)
  43. Global Const azATTR_NONE = 0
  44. Global Const azATTR_READONLY = 1
  45. Global Const azATTR_HIDDEN = 2
  46. Global Const azATTR_SYSTEM = 4
  47. Global Const azATTR_ARCHIVE = 32
  48. Global Const azATTR_ALL = 39
  49.  
  50. '  'messages' used to provide information to the calling program
  51. Global Const AM_SEARCHING = &HA
  52. Global Const AM_ZIPCOMMENT = &HB
  53. Global Const AM_ZIPPING = &HC
  54. Global Const AM_ZIPPED = &HD
  55. Global Const AM_UNZIPPING = &HE
  56. Global Const AM_UNZIPPED = &HF
  57. Global Const AM_TESTING = &H10
  58. Global Const AM_TESTED = &H11
  59. Global Const AM_DELETING = &H12
  60. Global Const AM_DELETED = &H13
  61. Global Const AM_DISKCHANGE = &H14
  62. Global Const AM_VIEW = &H15
  63. Global Const AM_ERROR = &H16
  64. Global Const AM_WARNING = &H17
  65. Global Const AM_QUERYOVERWRITE = &H18
  66. Global Const AM_COPYING = &H19
  67. Global Const AM_COPIED = &H1A
  68. Global Const AM_ABORT = &HFF
  69.  
  70. ' Constants for whether file is encrypted or not in AM_VIEW
  71. Global Const azFT_ENCRYPTED = &H1
  72. Global Const azFT_NOT_ENCRYPTED = &H0
  73.  
  74. ' Constants for whether file is text or binary in AM_VIEW
  75. Global Const azFT_BINARY = &H1
  76. Global Const azFT_TEXT = &H0
  77.  
  78. ' Constants for compression method in AM_VIEW
  79. Global Const azCM_DEFLATED_FAST = &H52
  80. Global Const azCM_DEFLATED_MAXIMUM = &H51
  81. Global Const azCM_DEFLATED_NORMAL = &H50
  82. Global Const azCM_DEFLATED_SUPERFAST = &H53
  83. Global Const azCM_IMPLODED = &H3C
  84. Global Const azCM_NONE = &H0
  85. Global Const azCM_REDUCED_1 = &H14
  86. Global Const azCM_REDUCED_2 = &H1E
  87. Global Const azCM_REDUCED_3 = &H28
  88. Global Const azCM_REDUCED_4 = &H32
  89. Global Const azCM_SHRUNK = &HA
  90. Global Const azCM_TOKENISED = &H46
  91. Global Const azCM_UNKNOWN = &HFF
  92.  
  93. ' Constants used in returning from a AM_QUERYOVERWRITE message
  94. Global Const azOW_NO = &H2
  95. Global Const azOW_NO_TO_ALL = &H3
  96. Global Const azOW_YES = &H0
  97. Global Const azOW_YES_TO_ALL = &H1
  98.  
  99.