home *** CD-ROM | disk | FTP | other *** search
/ Software Recommendations - 1998 Season 1 / DNBCD4.iso / develop / lib / addzip / ADDZIP.ZIP / DELPHI / AUNZIP.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1997-08-03  |  5.7 KB  |  133 lines
  1. unit AUNZIP;
  2.  
  3. interface
  4. uses
  5. {$IFDEF WIN32}
  6.   Windows;
  7. {$ELSE}
  8.   WinTypes, WinProcs;
  9. {$ENDIF}
  10.  
  11. {
  12. aunzip.pas
  13.  
  14. Borland Delphi interface unit for addUNZIP compression libraries
  15. Copyright ⌐ 1995,1997 Stephen Darlington. All rights reserved.
  16.  
  17. Borland Delphi interface unit created by Brad Clarke.
  18. }
  19.  
  20. function addUNZIP: Integer; {$ifdef Win32} stdcall; {$endif Win32}
  21.  
  22. function addUNZIP_ArchiveName(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  23.  
  24. function addUNZIP_Decrypt(lpPassword : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  25.  
  26. function addUNZIP_DisplayComment(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  27.  
  28. function addUNZIP_Exclude(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  29.  
  30. function addUNZIP_ExcludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  31.  
  32. function addUNZIP_ExtractTo(lpPath : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  33.  
  34. function addUNZIP_Freshen(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  35.  
  36. function addUNZIP_GetLastError: Integer; {$ifdef Win32} stdcall; {$endif Win32}
  37.  
  38. function addUNZIP_GetLastWarning: Integer; {$ifdef Win32} stdcall; {$endif Win32}
  39.  
  40. Procedure addUNZIP_GetVersion(var Major : Integer; var Minor : Integer); {$ifdef Win32} stdcall; {$endif Win32}
  41.  
  42. function addUNZIP_Include(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  43.  
  44. function addUNZIP_IncludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  45.  
  46. procedure addUNZIP_Initialise; {$ifdef Win32} stdcall; {$endif Win32}
  47.  
  48. function addUNZIP_InstallCallback(fCallBack: Pointer): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  49.  
  50. function addUNZIP_Overwrite(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  51.  
  52. function addUNZIP_Register(lpUserName : PChar; lCode : LongInt): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  53.  
  54. function addUNZIP_RestoreAttributes(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  55.  
  56. function addUNZIP_RestoreStructure(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  57.  
  58. function addUNZIP_SetParentWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  59.  
  60. function addUNZIP_SetWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  61.  
  62. function addUNZIP_Test(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  63.  
  64. function addUNZIP_ToMemory(lpBuffer : PChar; lBufLen : LongInt): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  65.  
  66. function addUNZIP_Update(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  67.  
  68. function addUNZIP_View(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  69.  
  70. {$IFDEF WIN32}
  71.   Const LIBNAME = 'AUNZIP32.DLL';
  72. {$ELSE}
  73.   Const LIBNAME = 'AUNZIP16';
  74. {$ENDIF}
  75.  
  76.  
  77. implementation
  78.  
  79. function addUNZIP: Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  80.  
  81. function addUNZIP_ArchiveName(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  82.  
  83. function addUNZIP_Decrypt(lpPassword : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  84.  
  85. function addUNZIP_DisplayComment(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  86.  
  87. function addUNZIP_Exclude(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  88.  
  89. function addUNZIP_ExcludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  90.  
  91. function addUNZIP_ExtractTo(lpPath : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  92.  
  93. function addUNZIP_Freshen(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  94.  
  95. function addUNZIP_GetLastError: Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  96.  
  97. function addUNZIP_GetLastWarning: Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  98.  
  99. Procedure addUNZIP_GetVersion(var Major : Integer; var Minor : Integer); {$ifdef Win32} stdcall; {$endif Win32}
  100.           external LIBNAME;
  101.  
  102. function addUNZIP_Include(lpFiles : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  103.  
  104. function addUNZIP_IncludeListFile(lpFile : PChar): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  105.  
  106. procedure addUNZIP_Initialise; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  107.  
  108. function addUNZIP_InstallCallback(fCallBack: Pointer): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  109.  
  110. function addUNZIP_Overwrite(iFlag : Integer): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  111.  
  112. function addUNZIP_Register(lpUserName : PChar; lCode : LongInt): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  113.          external LIBNAME;
  114.  
  115. function addUNZIP_RestoreAttributes(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  116.  
  117. function addUNZIP_RestoreStructure(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  118.  
  119. function addUNZIP_SetParentWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  120.  
  121. function addUNZIP_SetWindowHandle(hWnd : THandle): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  122.  
  123. function addUNZIP_Test(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  124.  
  125. function addUNZIP_ToMemory(lpBuffer : PChar; lBufLen : LongInt): Integer; {$ifdef Win32} stdcall; {$endif Win32}
  126.          external LIBNAME;
  127.  
  128. function addUNZIP_Update(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  129.  
  130. function addUNZIP_View(bFlag : Boolean): Integer; {$ifdef Win32} stdcall; {$endif Win32} external LIBNAME;
  131.  
  132. end.
  133.