home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / bpos13.zip / pmbitmap.pas < prev    next >
Pascal/Delphi Source File  |  1993-11-24  |  2KB  |  74 lines

  1. {| Unit: PmBitmap
  2.  | Version: 1.00
  3.  | translated from file PmBitmap.H
  4.  | Original translation: Peter Sawatzki (ps)
  5.  | Contributing:
  6.  |   (fill in)
  7.  |
  8.  | change history:
  9.  | Date:    Ver: Author:
  10.  | 11/13/93 1.00 ps     original translation by ps
  11. }
  12. Unit PmBitmap;
  13. Interface
  14. Uses
  15.   Os2Def,
  16.   PmGpi;
  17.  
  18. {**************************************************************************\
  19. *
  20. * OS/2 Presentation Manager Bit Map, Icon and Pointer type declarations.
  21. *
  22. \**************************************************************************}
  23.  
  24. {
  25.  * This is the file format structure for Bit Maps, Pointers and Icons
  26.  * as stored in the resource file of a PM application.
  27.  *
  28.  * Notes on file format:
  29.  *   Each BITMAPFILEHEADER entry is immediately followed by the color table
  30.  *   for the bit map bits it references.
  31.  *   Icons and Pointers contain two BITMAPFILEHEADERs for each ARRAYHEADER
  32.  *   item.  The first one is for the ANDXOR mask, the second is for the
  33.  *   COLOR mask.  All offsets are absolute based on the start of the FILE.
  34.  }
  35.  
  36. Type
  37.   BITMAPFILEHEADER = Record             { bfh }
  38.     usType: USHORT;
  39.     cbSize: ULONG;
  40.     xHotspot,
  41.     yHotspot: SHORT;
  42.     offBits: ULONG;
  43.     bmp: BITMAPINFOHEADER
  44.   End;
  45.   pBITMAPFILEHEADER = ^BITMAPFILEHEADER;
  46.  
  47. {
  48.  * This is the 1.2 device independent format header
  49.  }
  50.   BITMAPARRAYFILEHEADER = Record        { bafh }
  51.     usType: USHORT;
  52.     cbSize,
  53.     offNext: ULONG;
  54.     cxDisplay,
  55.     cyDisplay: USHORT;
  56.     bfh: BITMAPFILEHEADER
  57.   End;
  58.   pBITMAPARRAYFILEHEADER = ^BITMAPARRAYFILEHEADER;
  59.  
  60. {
  61.  * These are the identifying values that go in the usType field of the
  62.  * BITMAPFILEHEADER and BITMAPARRAYFILEHEADER.
  63.  }
  64.  
  65. Const
  66.   BFT_ICON                =  $4349;                { 'IC' }
  67.   BFT_BMAP                         =  $4d42;                { 'BM' }
  68.   BFT_POINTER                      =  $5450;                { 'PT' }
  69.   BFT_COLORICON                    =  $4943;                { 'CI' }
  70.   BFT_COLORPOINTER                 =  $5043;                { 'CP' }
  71.   BFT_BITMAPARRAY                  =  $4142;                { 'BA' }
  72. Implementation
  73. End.
  74.