home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / pcxops.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  2.1 KB  |  55 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/pcxops.ads,v $ 
  2. -- $Revision: 1.3 $ $Date: 96/03/15 13:52:16 $ $Author: stm $ 
  3. -- $Id: pcxops.ads 1.3 1995/02/08 18:31:21 mps Exp mps $
  4. --
  5. -- This package performs operations on PCX files.
  6. --
  7. with Win32;
  8. with Win32.WinDef;
  9.  
  10. package PcxOps is
  11.  
  12. --
  13. -- This procedure performs the first display as well as expansion of the 
  14. -- compressed PCX image.
  15. --
  16. procedure Initial_Display(HINST        : Win32.WinDef.HINSTANCE;
  17.                           HWND         : Win32.WinDef.HWND;
  18.                           PCX_FILENAME : Win32.LPCSTR);
  19.  
  20. --
  21. -- The next two procedures zoom in or out.  The RECT parameter of Zoom_In is
  22. -- the new rectangle drawn with the mouse by the user, not the client window.
  23. --
  24. procedure Zoom_In(HWND : Win32.WinDef.HWND;
  25.                   RECT : Win32.WinDef.RECT);
  26. procedure Zoom_Out(HWND : Win32.WinDef.HWND);
  27.  
  28. --
  29. -- This procedure is called when a resizing window operation takes place.  It is
  30. -- also called by the two procedures Zoom_In & Zoom_Out.
  31. --
  32. procedure Display(HWND : Win32.WinDef.HWND);
  33.  
  34.  
  35. -------------------------------------------------------------------------------
  36. --
  37. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  38. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  39. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  40. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  41. -- the accuracy and the use of this file.  This file may be used, copied,
  42. -- modified and distributed only by licensees of Microsoft Corporation's
  43. -- WIN32 Software Development Kit in accordance with the terms of the 
  44. -- licensee's End-User License Agreement for Microsoft Software for the
  45. -- WIN32 Development Kit.
  46. --
  47. -- Copyright (c) Intermetrics, Inc. 1995
  48. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  49. -- Microsoft is a registered trademark and Windows and Windows NT are
  50. -- trademarks of Microsoft Corporation.
  51. --
  52. -------------------------------------------------------------------------------
  53.  
  54. end PcxOps;
  55.