home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2api / dosresou.def < prev    next >
Text File  |  1994-05-03  |  2KB  |  59 lines
  1. DEFINITION MODULE DOSRESOURCES;
  2.  
  3. (************************************************************************
  4.   OS/2 2.0 Interface for resource support.
  5.  
  6.   Copyright (c) 1992 by Juergen Neuhoff
  7. *************************************************************************)
  8.  
  9. (*$XL+       Modula-2 language extensions: '_' allowed for symbol names *)
  10. (*$CDECL+    C-style procedures                                         *)
  11.  
  12. IMPORT SYSTEM;
  13. FROM   OS2DEF IMPORT APIRET, HMODULE;
  14.  
  15. CONST (* Predefined resource types *)
  16.   RT_POINTER      = 1;  (* mouse pointer shape *)
  17.   RT_BITMAP       = 2;  (* bitmap *)
  18.   RT_MENU         = 3;  (* menu template *)
  19.   RT_DIALOG       = 4;  (* dialog template *)
  20.   RT_STRING       = 5;  (* string tables *)
  21.   RT_FONTDIR      = 6;  (* font directory *)
  22.   RT_FONT         = 7;  (* font *)
  23.   RT_ACCELTABLE   = 8;  (* accelerator tables *)
  24.   RT_RCDATA       = 9;  (* binary data *)
  25.   RT_MESSAGE      = 10; (* error msg     tables *)
  26.   RT_DLGINCLUDE   = 11; (* dialog include file name *)
  27.   RT_VKEYTBL      = 12; (* key to vkey tables *)
  28.   RT_KEYTBL       = 13; (* key to UGL tables *)
  29.   RT_CHARTBL      = 14; (* glyph to character tables *)
  30.   RT_DISPLAYINFO  = 15; (* screen display information *)
  31.   RT_FKASHORT     = 16; (* function key area short form *)
  32.   RT_FKALONG      = 17; (* function key area long form *)
  33.   RT_HELPTABLE    = 18; (* Help table for Cary Help manager *)
  34.   RT_HELPSUBTABLE = 19; (* Help subtable for Cary Help manager *)
  35.   RT_FDDIR        = 20; (* DBCS uniq/font driver directory *)
  36.   RT_FD           = 21; (* DBCS uniq/font driver *)
  37.   RT_MAX          = 22; (* 1st unused Resource Type *)
  38.   RF_ORDINALID    = 80000000H;    (* ordinal id flag in resource table *)
  39.  
  40. PROCEDURE DosGetResource
  41. ( ModHandle       : HMODULE;
  42.   TypeId          : LONGCARD;
  43.   NameId          : LONGCARD;
  44.   VAR Offset      : SYSTEM.ADDRESS
  45. )                 : APIRET;
  46.  
  47. PROCEDURE DosFreeResource
  48. ( ResAddr         : SYSTEM.ADDRESS
  49. )                 : APIRET;
  50.  
  51. PROCEDURE DosQueryResourceSize
  52. ( ModHandle       : HMODULE;
  53.   TypeId          : LONGCARD;
  54.   NameId          : LONGCARD;
  55.   VAR Size        : LONGCARD
  56. )                 : APIRET;
  57.  
  58. END DOSRESOURCES.
  59.