home *** CD-ROM | disk | FTP | other *** search
/ Software Recommendations - 1998 Season 1 / DNBCD4.iso / develop / lib / addzip / ADDZIP.ZIP / DELPHI / AZIP.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1997-08-09  |  9.3 KB  |  212 lines
  1. unit AZIP;
  2.  
  3. interface
  4.  
  5. uses
  6. {$IFDEF WIN32}
  7.   Windows;
  8. {$ELSE}
  9.   WinTypes, WinProcs;
  10. {$ENDIF}
  11.  
  12. {
  13. azip.pas
  14.  
  15. Borland Delphi interface unit for addZIP compression libraries
  16. Copyright ⌐ 1995,1997 Stephen Darlington. All rights reserved.
  17.  
  18. Borland Delphi interface unit created by Brad Clarke.
  19. }
  20.  
  21. function addZIP: Integer ; {$ifdef Win32} stdcall; {$endif Win32}
  22.  
  23. function addZIP_ArchiveName(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  24.  
  25. {$IFNDEF WIN32}
  26. {
  27. Self-extracting archives are only supported in the 16-bit version of AddZIP
  28. as of version 0.65
  29. }
  30. function addZIP_BuildSFX(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  31. {$ENDIF}
  32.  
  33. function addZIP_ClearAttributes(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  34.  
  35. function addZIP_Comment(lpComment : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  36.  
  37. function addZIP_Delete(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  38.  
  39. function addZIP_DeleteComment(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  40.  
  41. function addZIP_DisplayComment(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  42.  
  43. function addZIP_Encrypt(lpPassword : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  44.  
  45. function addZIP_Exclude(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  46.  
  47. function addZIP_ExcludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  48.  
  49. function addZIP_Freshen(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  50.  
  51. function addZIP_GetLastError: Integer; {$ifdef Win32} stdcall; {$endif Win32}
  52.  
  53. function addZIP_GetLastWarning: Integer; {$ifdef Win32} stdcall; {$endif Win32}
  54.  
  55. Procedure addZIP_GetVersion(var Major : Integer; var Minor : Integer); {$ifdef Win32} stdcall; {$endif Win32}
  56.  
  57. function addZIP_Include(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  58.  
  59. function addZIP_IncludeFilesNewer(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  60.  
  61. function addZIP_IncludeFilesOlder(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  62.  
  63. function addZIP_IncludeArchive(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  64.  
  65. function addZIP_IncludeDirectoryEntries(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  66.  
  67. function addZIP_IncludeHidden(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  68.  
  69. function addZIP_IncludeReadOnly(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  70.  
  71. function addZIP_IncludeSystem(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  72.  
  73. function addZIP_IncludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  74.  
  75. procedure addZIP_Initialise; {$ifdef Win32} stdcall; {$endif Win32}
  76.  
  77. function addZIP_InstallCallback(fCallback: Pointer): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  78.  
  79. function addZIP_Overwrite(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  80.  
  81. function addZIP_Recurse(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  82.  
  83. function addZIP_Register(lpUserName : PChar; lCode : LongInt): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  84.  
  85. function addZIP_SaveAttributes(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  86.  
  87. function addZIP_SaveRelativeTo(lpPath : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  88.  
  89. function addZIP_SaveStructure(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  90.  
  91. function addZIP_SetArchiveDate(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  92.  
  93. function addZIP_SetCompressionLevel(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  94.  
  95. function addZIP_SetParentWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  96.  
  97. function addZIP_SetTempDrive(lpPath : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  98.  
  99. function addZIP_SetWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  100.  
  101. function addZIP_Span(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  102.  
  103. function addZIP_Store(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  104.  
  105. function addZIP_Update(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  106.  
  107. function addZIP_UseLFN(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  108.  
  109. function addZIP_View(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  110.  
  111. {$IFDEF WIN32}
  112.   Const LIBNAME = 'AZIP32.DLL';
  113. {$ELSE}
  114.   Const LIBNAME = 'AZIP16';
  115. {$ENDIF}
  116.  
  117. implementation
  118.  
  119. function addZIP: Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  120.  
  121. function addZIP_ArchiveName(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  122.  
  123. {$IFNDEF WIN32}
  124. {
  125. Self-extracting archives are only supported in the 16-bit version of AddZIP
  126. as of version 0.65
  127. }
  128. function addZIP_BuildSFX(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}  external LIBNAME;
  129. {$ENDIF}
  130.  
  131. function addZIP_ClearAttributes(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  132.  
  133. function addZIP_Comment(lpComment : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  134.  
  135. function addZIP_Delete(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  136.  
  137. function addZIP_DeleteComment(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  138.  
  139. function addZIP_DisplayComment(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  140.  
  141. function addZIP_Encrypt(lpPassword : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  142.  
  143. function addZIP_Exclude(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  144.  
  145. function addZIP_ExcludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  146.  
  147. function addZIP_Freshen(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  148.  
  149. function addZIP_GetLastError: Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  150.  
  151. function addZIP_GetLastWarning: Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  152.  
  153. Procedure addZIP_GetVersion(var Major : Integer; var Minor : Integer); {$ifdef Win32} stdcall; {$endif Win32}
  154.           external LIBNAME;
  155.  
  156. function addZIP_Include(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  157.  
  158. function addZIP_IncludeFilesNewer(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  159.  
  160. function addZIP_IncludeFilesOlder(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  161.  
  162. function addZIP_IncludeArchive(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  163.  
  164. function addZIP_IncludeDirectoryEntries(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  165.  
  166. function addZIP_IncludeHidden(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  167.  
  168. function addZIP_IncludeReadOnly(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  169.  
  170. function addZIP_IncludeSystem(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  171.  
  172. function addZIP_IncludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  173.  
  174. procedure addZIP_Initialise; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  175.  
  176. function addZIP_InstallCallback(fCallback: Pointer): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  177.  
  178. function addZIP_Overwrite(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  179.  
  180. function addZIP_Recurse(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  181.  
  182. function addZIP_Register(lpUserName : PChar; lCode : LongInt): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  183.          external LIBNAME;
  184.  
  185. function addZIP_SaveAttributes(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  186.  
  187. function addZIP_SaveRelativeTo(lpPath : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  188.  
  189. function addZIP_SaveStructure(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  190.  
  191. function addZIP_SetArchiveDate(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}  external LIBNAME;
  192.  
  193. function addZIP_SetCompressionLevel(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  194.  
  195. function addZIP_SetParentWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  196.  
  197. function addZIP_SetTempDrive(lppath : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  198.  
  199. function addZIP_SetWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  200.  
  201. function addZIP_Span(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  202.  
  203. function addZIP_Store(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  204.  
  205. function addZIP_Update(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  206.  
  207. function addZIP_UseLFN(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  208.  
  209. function addZIP_View(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  210.  
  211. end.
  212.