home *** CD-ROM | disk | FTP | other *** search
/ Fritz: Win Best Test 1 / 70001.ZIP / 70001 / WINWARE1 / ARCDIB / CUSTOMU.PAS < prev    next >
Pascal/Delphi Source File  |  1993-09-26  |  466b  |  21 lines
  1. {
  2.   Interface for YourComp.DLL to import a function "MyComp" which will
  3.   compress/decompress a block of memory passed to it using an algorithm
  4.   designed by the author of the DLL
  5. }
  6.  
  7. Unit CustomU;
  8. Interface
  9. Uses WinTypes;
  10.  
  11. function MyComp(var IMAGEHANDLE: THandle; 
  12.                 var ORIGSIZE: LongInt;
  13.                     COMPRESS: Boolean) : Boolean;
  14.  
  15. Implementation
  16.  
  17. function MyComp;   external 'YOURCOMP' index 3; 
  18.  
  19. Begin
  20. End. { CustomU }
  21.