home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 19 / CD_ASCQ_19_010295.iso / dos / prg / c / cwl30 / cwl3demo / cwlfunc4.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-09-12  |  3.0 KB  |  93 lines
  1. #include "cwldemo.h"
  2.  
  3. int WinText (POPUP_MENU_PTR p, int sel)
  4. {
  5.   int i;
  6.   WPOINTER cw,cw2;
  7.   cw = WindowInitialize(DESKTOP_WINDOW,
  8.                         BORDER,0,0,60,6,BLACKONCYAN,BLACKONCYAN,SINGLEBOX);
  9.  
  10.   /* Write text to sub window */
  11.   WindowCenter(cw,VERTCENTER | HORIZCENTER);
  12.   WindowDisplay(cw,1,NOEFFECT);
  13.  
  14.   WindowWriteCenterString(cw,"You can write text to a window...",0);
  15.   delay_approx(1000);
  16.   WindowWriteCenterString(cw,"Hello, world!",1);
  17.   delay_approx(2000);
  18.  
  19.   /* Demonstrate writing text with different colors */
  20.   WindowClearLine(cw,0);
  21.   WindowWriteCenterString(cw,
  22.           "You can write text with a different colors...",0);
  23.   delay_approx(2000);
  24.   WindowWriteCenterStringAttr(cw,"Hello, World!",1,BLACKONWHITE);
  25.   WindowWriteCenterStringAttr(cw,"Hello, World!",2,YELLOWONRED);
  26.   delay_approx(4000);
  27.  
  28.   /* Demonstrate WindowPrintf() */
  29.   WindowClear(cw);
  30.   WindowWriteCenterString(cw,"You can even use a printf() for windows!",0);
  31.   delay_approx(2000);
  32.   WindowWriteCenterString(cw,"To demonstrate, I will count to 20...",1);
  33.   delay_approx(2000);
  34.   WindowClear(cw);
  35.  
  36.   for (i=1;i<=20;i++)
  37.   {
  38.     WindowPrintf(cw,"Count is now %d\n",i);
  39.     delay_approx(1000);
  40.   }
  41.  
  42.   delay_approx(4000);
  43.   WindowClear(cw);
  44.  
  45.   /* Demonstrate right justification of strings in a window */
  46.   WindowWriteCenterString(cw,"You can write Right Justified strings...",0);
  47.   delay_approx(2000);
  48.   WindowWriteStringRJ(cw,"These strings",2,18);
  49.   WindowWriteStringRJ(cw,"are printed Right",3,18);
  50.   WindowWriteStringRJ(cw,"justified!",4,18);
  51.   delay_approx(4000);
  52.  
  53.   /* Demonstrate centering strings around a column in a window */
  54.   WindowClear(cw);
  55.   WindowWriteCenterString(cw,
  56.       "You can write strings Centered on a certain column...",0);
  57.   delay_approx(2000);
  58.   WindowWriteStringCC(cw,"These strings",2,9);
  59.   WindowWriteStringCC(cw,"are centered on",3,9);
  60.   WindowWriteStringCC(cw,"column 9",4,9);
  61.   delay_approx(3000);
  62.   WindowClear(cw);
  63.   WindowWriteStringCC(cw,"These strings",2,18);
  64.   WindowWriteStringCC(cw,"are centered on",3,18);
  65.   WindowWriteStringCC(cw,"column 18",4,18);
  66.   delay_approx(3000);
  67.   WindowClear(cw);
  68.   WindowWriteStringCC(cw,"These strings",2,28);
  69.   WindowWriteStringCC(cw,"are centered on",3,28);
  70.   WindowWriteStringCC(cw,"column 28",4,28);
  71.   delay_approx(3000);
  72.  
  73.   cw2 = WindowInitialize(DESKTOP_WINDOW,
  74.                          BORDER,WINDOW_ROW(cw) - 3, WINDOW_COLUMN(cw) - 4,
  75.                          40,5,0x7,0x7,DOUBLEBOX);
  76.  
  77.   WindowClear(cw);
  78.   WindowWriteCenterString(cw,"You can write strings to background windows...",0);
  79.   delay_approx(5000);
  80.   WindowDisplay(cw2,2,NOEFFECT);
  81.   WindowWriteCenterString(cw,"Watch...",2);
  82.   delay_approx(2000);
  83.   WindowWriteString(cw2,"Surprise!! Surprise!!",0,0);
  84.   WindowWriteString(cw2,"Surprise!! Surprise!!",1,0);
  85.   WindowWriteString(cw2,"Surprise!! Surprise!!",2,0);
  86.   WindowWriteString(cw2,"Surprise!! Surprise!!",3,0);
  87.   delay_approx(5000);
  88.   WindowClose(cw2,NOEFFECT);
  89.   WindowClose(cw,NOEFFECT);
  90.   return POPUP_CONTINUE;
  91.  
  92. }
  93.