home *** CD-ROM | disk | FTP | other *** search
/ Kyūkyoku!! X68000 Emulator / X68000Book.dat / mac / OLS / X68000 / Ko-Window / kow142s.lzh / corlib / iconent.c < prev    next >
C/C++ Source or Header  |  1991-12-17  |  948b  |  48 lines
  1. /* Icon Sub  1991 Å¼è}î┤öÄöV */
  2.  
  3. #include    <stdio.h>
  4. #include    <wlib.h>
  5. #include    <winop.h>
  6.  
  7. static short    _cor_attr= 9,
  8.         _cor_font= 12;
  9. static char    _cor_title[80];
  10.  
  11. static
  12. cor_IconExec( wp, info )
  13. WindowID    wp;
  14. EventInfo    *info;
  15. {
  16.     DrawBuf    dbuf[2];
  17.     switch( info->option ){
  18.     case EventOpen:
  19.         WindowRedraw( wp );
  20.         return    TRUE;
  21.     case EventClose:
  22.         WindowClose( wp );
  23.         return    TRUE;
  24.     case EventRedraw:
  25.         DrawSetClear( dbuf, 1 );
  26.         DrawSetSymbol( dbuf+1, 4, 0, _cor_title,_cor_attr,_cor_font );
  27.         WindowDraw( wp, dbuf, 2 );
  28.         return    TRUE;
  29.     case EventMouseSwitch:
  30.         IconMouseOperation( wp, info );
  31.         return    TRUE;
  32.     }
  33.     return    FALSE;
  34. }
  35.  
  36. void
  37. IconEnt( wp, title, attr, font )
  38. WindowID    wp;
  39. int        attr,    /* Icon Attr    */
  40.         font;    /* Icon Font    */
  41. char        *title;    /* Icon Title    */
  42. {
  43.     _cor_attr= attr;
  44.     _cor_font= font;
  45.     strcpy( _cor_title, title );
  46.     IconifyOperation( wp, strlen( title )*font/2+7, font, cor_IconExec );
  47. }
  48.