home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2api / gpidefau.def < prev    next >
Text File  |  1994-05-03  |  2KB  |  65 lines
  1. DEFINITION MODULE GPIDEFAULTS;
  2.  
  3. (************************************************************************
  4.   OS/2 2.0 interface for Presentation Manager
  5.            GPI Default Primitive Attributes.
  6.  
  7.   Copyright (c) 1992 by Juergen Neuhoff
  8. *************************************************************************)
  9.  
  10. (*$XL+       Modula-2 language extensions: '_' allowed for symbol names *)
  11. (*$CDECL+    C-style procedures                                         *)
  12. (*$A         default alignment for record fields                        *)
  13.  
  14. IMPORT SYSTEM;
  15. FROM   OS2DEF        IMPORT HPS, RECTL;
  16. FROM   GPIPRIMITIVES IMPORT ARCPARAMS;
  17.  
  18. (*** default functions *)
  19.  
  20. PROCEDURE GpiQueryDefArcParams
  21. ( PresSpaceHandle               : HPS;
  22.   VAR ArcParams                 : ARCPARAMS
  23. )                               : BOOLEAN;
  24.  
  25. PROCEDURE GpiQueryDefAttrs
  26. ( PresSpaceHandle               : HPS;
  27.   PrimType                      : LONGINT;
  28.   AttrMask                      : LONGCARD;
  29.   VAR Attrs                     : ARRAY OF SYSTEM.BYTE
  30. )                               : BOOLEAN;
  31.  
  32. PROCEDURE GpiQueryDefTag
  33. ( PresSpaceHandle               : HPS;
  34.   VAR Tag                       : LONGINT
  35. )                               : BOOLEAN;
  36.  
  37. PROCEDURE GpiQueryDefViewingLimits
  38. ( PresSpaceHandle               : HPS;
  39.   VAR Limits                    : RECTL
  40. )                               : BOOLEAN;
  41.  
  42. PROCEDURE GpiSetDefArcParams
  43. ( PresSpaceHandle               : HPS;
  44.   VAR ArcParams                 : ARCPARAMS
  45. )                               : BOOLEAN;
  46.  
  47. PROCEDURE GpiSetDefAttrs
  48. ( PresSpaceHandle               : HPS;
  49.   PrimType                      : LONGINT;
  50.   AttrMask                      : LONGCARD;
  51.   VAR Attrs                     : ARRAY OF SYSTEM.BYTE
  52. )                               : BOOLEAN;
  53.  
  54. PROCEDURE GpiSetDefTag
  55. ( PresSpaceHandle               : HPS;
  56.   Tag                           : LONGINT
  57. )                               : BOOLEAN;
  58.  
  59. PROCEDURE GpiSetDefViewingLimits
  60. ( PresSpaceHandle               : HPS;
  61.   VAR Limits                    : RECTL
  62. )                               : BOOLEAN;
  63.  
  64. END GPIDEFAULTS.
  65.