home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / news / 4611 / fw16d.ins / INCLUDE / FONT.CH < prev    next >
Text File  |  1994-06-03  |  1KB  |  44 lines
  1. #ifndef _FONT_CH
  2. #define _FONT_CH
  3.  
  4. #define LF_HEIGHT          1
  5. #define LF_WIDTH           2
  6. #define LF_ESCAPEMENT      3
  7. #define LF_ORIENTATION     4
  8. #define LF_WEIGHT          5
  9. #define LF_ITALIC          6
  10. #define LF_UNDERLINE       7
  11. #define LF_STRIKEOUT       8
  12. #define LF_CHARSET         9
  13. #define LF_OUTPRECISION   10
  14. #define LF_CLIPPRECISION  11
  15. #define LF_QUALITY        12
  16. #define LF_PITCHANDFAMILY 13
  17. #define LF_FACENAME       14
  18.  
  19. #xcommand DEFINE FONT <oFont> ;
  20.              [ NAME <cName> ] ;
  21.              [ SIZE <nWidth>, <nHeight> ] ;
  22.              [ <from:FROM USER> ] ;
  23.              [ <bold: BOLD> ] ;
  24.              [ <italic: ITALIC> ] ;
  25.        => ;
  26.           <oFont> := TFont():New( <cName>, <nWidth>, <nHeight>, <.from.>,;
  27.                                   [<.bold.>],,,, [<.italic.>] )
  28.  
  29. #xcommand ACTIVATE   FONT <oFont> => <oFont>:Activate()
  30.  
  31. #xcommand DEACTIVATE FONT <oFont> => <oFont>:DeActivate()
  32.  
  33. #xcommand RELEASE    FONT <oFont1> [,<oFontN> ] ;
  34.        => ;
  35.           <oFont1>:Release() [; <oFontN>:Release() ]
  36.  
  37. #xcommand SET FONT ;
  38.              [ OF <oWnd> ] ;
  39.              [ TO <oFont> ] ;
  40.        => ;
  41.           <oWnd>:SetFont( <oFont> )
  42.  
  43. #endif
  44.