home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c082_122 / 17.ddi / TVDOCDEM.ZIP / TVGUID14.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1992-06-10  |  9.4 KB  |  323 lines
  1. /*---------------------------------------------------------*/
  2. /*                                                         */
  3. /*   Turbo Vision 1.0                                      */
  4. /*   TVGUID14 Demo Source File                             */
  5. /*   Copyright (c) 1991 by Borland International           */
  6. /*                                                         */
  7. /*---------------------------------------------------------*/
  8.  
  9. // same as tvguid13 except for extra checkboxes, radiobuttons, and labels
  10. // modify TMyApp::newDialog
  11.  
  12. #include <stdlib.h>             // for exit(), random()
  13. #include <iostream.h>
  14. #include <fstream.h>            // for ifstream
  15. #include <stdio.h>              // for puts() etc
  16. #include <string.h>             // for strlen etc
  17. #include <ctype.h>
  18.  
  19. #define Uses_TEventQueue
  20. #define Uses_TEvent
  21. #define Uses_TProgram
  22. #define Uses_TApplication
  23. #define Uses_TKeys
  24. #define Uses_TRect
  25. #define Uses_TMenuBar
  26. #define Uses_TSubMenu
  27. #define Uses_TMenuItem
  28. #define Uses_TStatusLine
  29. #define Uses_TStatusItem
  30. #define Uses_TStatusDef
  31. #define Uses_TDeskTop
  32. #define Uses_TView
  33. #define Uses_TWindow
  34. #define Uses_TScroller
  35. #define Uses_TScrollBar
  36. #define Uses_TDialog
  37. #define Uses_TButton
  38. #define Uses_TSItem
  39. #define Uses_TCheckBoxes
  40. #define Uses_TRadioButtons
  41. #define Uses_TLabel
  42. #include <tv.h>
  43.  
  44. // note the extra #defines above
  45.  
  46. const int cmMyFileOpen = 200;   // assign new command values
  47. const int cmMyNewWin   = 201;
  48. const int cmNewDialog  = 202;
  49.  
  50. const char *fileToRead  = "tvguid14.cpp";
  51. const int maxLineLength = maxViewWidth+1;
  52. const int maxLines      = 100;
  53. char *lines[maxLines];
  54. int lineCount = 0;
  55. static short winNumber  = 0;    // initialize window number
  56.  
  57. class TMyApp : public TApplication
  58. {
  59.  
  60. public:
  61.     TMyApp();
  62.     static TStatusLine *initStatusLine( TRect r );
  63.     static TMenuBar *initMenuBar( TRect r );
  64.     virtual void handleEvent( TEvent& event);
  65.     void newWindow();
  66.     void newDialog();
  67.     // added member
  68. };
  69.  
  70. class TInterior : public TScroller
  71. {
  72.  
  73. public:
  74.  
  75.     TInterior( const TRect& bounds, TScrollBar *aHScrollBar,
  76.            TScrollBar *aVScrollBar );   // constructor
  77.     virtual void draw();                // override TView::draw
  78. };
  79.  
  80. class TDemoWindow : public TWindow      // define a new window class
  81. {
  82.  
  83. public:
  84.  
  85.     TDemoWindow( const TRect& bounds, const char *aTitle, short aNumber );
  86.     TInterior *makeInterior( const TRect& r, Boolean left );
  87.     virtual void sizeLimits( TPoint& minP, TPoint& maxP );
  88.     // override TWindow::sizeLimits
  89.  
  90. private:
  91.  
  92.     TInterior *lInterior, *rInterior;
  93.  
  94. };
  95.  
  96. void readFile( const char *fileName )
  97. {
  98.     ifstream fileToView( fileName );
  99.     if( !fileToView )
  100.         {
  101.         cout << "Invalid file name..." << endl;
  102.         exit( 1 );
  103.         }
  104.     else
  105.         {
  106.         char buf[maxLineLength];
  107.         while( lineCount < maxLines &&
  108.                fileToView.getline( buf, maxLineLength ) != 0 )
  109.             {
  110.             lines[lineCount] = newStr( buf );
  111.             lineCount++;
  112.             }
  113.         }
  114. }
  115.  
  116. void deleteFile()
  117. {
  118.     for( int i = 0; i < lineCount; i++ )
  119.         delete lines[i];
  120. }
  121.  
  122. TInterior::TInterior( const TRect& bounds, TScrollBar *aHScrollBar,
  123.               TScrollBar *aVScrollBar ) :
  124.        TScroller( bounds, aHScrollBar, aVScrollBar )
  125. {
  126.     options = options | ofFramed;
  127.     setLimit( maxLineLength, lineCount );
  128. }
  129.  
  130. void TInterior::draw()       // modified for scroller
  131. {
  132.     ushort color = getColor(0x0301);
  133.     for( int i = 0; i < size.y; i++ )
  134.         // for each line:
  135.         {
  136.         TDrawBuffer b;
  137.         b.moveChar( 0, ' ', color, size.x );
  138.         // fill line buffer with spaces
  139.         int j = delta.y + i;       // delta is scroller offset
  140.         if( j < lineCount && lines[j] != 0 )
  141.             {
  142.             char s[maxLineLength];
  143.             if( delta.x > strlen(lines[j] ) )
  144.                 s[0] = EOS;
  145.             else
  146.                 {
  147.                 strncpy( s, lines[j]+delta.x, size.x );
  148.                 s[size.x] = EOS;
  149.                 }
  150.             b.moveCStr( 0, s, color );
  151.             }
  152.         writeLine( 0, i, size.x, 1, b);
  153.         }
  154.  
  155. }
  156.  
  157. // modified from tvguid08:
  158. TDemoWindow::TDemoWindow( const TRect& bounds, const char *aTitle,
  159.               short aNumber) :
  160.          TWindow( bounds, aTitle, aNumber),
  161.          TWindowInit( &TDemoWindow::initFrame )
  162. {
  163.     TRect lbounds = getExtent();
  164.     TRect r( lbounds.a.x, lbounds.a.y, lbounds.b.x/2+1, lbounds.b.y );
  165.     lInterior = makeInterior( r, True );
  166.     lInterior->growMode = gfGrowHiY;
  167.     insert( lInterior );
  168.     // creates left-side scrollable interior and inserts into window
  169.     r = TRect( lbounds.b.x/2, lbounds.a.y, lbounds.b.x, lbounds.b.y );
  170.     rInterior = makeInterior( r, False );
  171.     rInterior->growMode = gfGrowHiX | gfGrowHiY;
  172.     insert( rInterior );
  173.     // likewise for right-side scroller
  174. }
  175.  
  176. TInterior *TDemoWindow::makeInterior( const TRect& bounds, Boolean left )
  177. {
  178.     TRect r = TRect( bounds.b.x-1, bounds.a.y+1, bounds.b.x, bounds.b.y-1 );
  179.     TScrollBar *vScrollBar = new TScrollBar( r );
  180.     if( vScrollBar == 0 )
  181.         {
  182.         cout << "vScrollbar init error" << endl;
  183.         exit(1);
  184.         }
  185.         // production code would display error dialog box
  186.     vScrollBar->options |= ofPostProcess;
  187.     if( left )
  188.         vScrollBar->growMode = gfGrowHiY;
  189.     insert( vScrollBar );
  190.  
  191.     r = TRect( bounds.a.x+2, bounds.b.y-1, bounds.b.x-2, bounds.b.y );
  192.     TScrollBar *hScrollBar = new TScrollBar( r );
  193.     if( hScrollBar == 0 )
  194.         {
  195.         cout << "hScrollbar init error" << endl;
  196.         exit(1);
  197.         }
  198.     hScrollBar->options |= ofPostProcess;
  199.     if( left )
  200.         hScrollBar->growMode = (gfGrowHiY | gfGrowLoY);
  201.     insert( hScrollBar );
  202.  
  203.     r = bounds;
  204.     r.grow( -1, -1 );
  205.     return new TInterior( r, hScrollBar, vScrollBar );
  206. }
  207.  
  208. void TDemoWindow::sizeLimits( TPoint& minP, TPoint& maxP )
  209. {
  210.     TWindow::sizeLimits( minP, maxP );
  211.     minP.x = lInterior->size.x+9;
  212. }
  213.  
  214. TMyApp::TMyApp() :
  215.     TProgInit( &TMyApp::initStatusLine,
  216.                &TMyApp::initMenuBar,
  217.                &TMyApp::initDeskTop
  218.              )
  219. {
  220. }
  221.  
  222. void TMyApp::handleEvent(TEvent& event)
  223. {
  224.     TApplication::handleEvent(event);
  225.     if( event.what == evCommand )
  226.         {
  227.         switch( event.message.command )
  228.             {
  229.             case cmMyNewWin:
  230.                 newWindow();
  231.                 break;
  232.             case cmNewDialog:
  233.                 newDialog();
  234.                 break;
  235.             default:
  236.                 return;
  237.             }
  238.         clearEvent( event );            // clear event after handling
  239.         }
  240. }
  241.  
  242. TMenuBar *TMyApp::initMenuBar( TRect r )
  243. {
  244.     r.b.y = r.a.y + 1;    // set bottom line 1 line below top line
  245.     return new TMenuBar( r,
  246.         *new TSubMenu( "~F~ile", kbAltF )+
  247.             *new TMenuItem( "~O~pen", cmMyFileOpen, kbF3, hcNoContext, "F3" )+
  248.             *new TMenuItem( "~N~ew",  cmMyNewWin,   kbF4, hcNoContext, "F4" )+
  249.             newLine()+
  250.             *new TMenuItem( "E~x~it", cmQuit, cmQuit, hcNoContext, "Alt-X" )+
  251.         *new TSubMenu( "~W~indow", kbAltW )+
  252.             *new TMenuItem( "~N~ext", cmNext,     kbF6, hcNoContext, "F6" )+
  253.             *new TMenuItem( "~Z~oom", cmZoom,     kbF5, hcNoContext, "F5" )+
  254.             *new TMenuItem( "~D~ialog", cmNewDialog, kbF2, hcNoContext, "F2" )
  255.             // new dialog menu added here
  256.         );
  257. }
  258.  
  259. TStatusLine *TMyApp::initStatusLine( TRect r )
  260. {
  261.     r.a.y = r.b.y - 1;     // move top to 1 line above bottom
  262.     return new TStatusLine( r,
  263.         *new TStatusDef( 0, 0xFFFF ) +
  264.         // set range of help contexts
  265.             *new TStatusItem( 0, kbF10, cmMenu ) +
  266.             // define an item
  267.             *new TStatusItem( "~Alt-X~ Exit", kbAltX, cmQuit ) +
  268.             // and another one
  269.             *new TStatusItem( "~Alt-F3~ Close", kbAltF3, cmClose )
  270.             // and another one
  271.         );
  272. }
  273.  
  274. void TMyApp::newWindow()
  275. {
  276.     TRect r( 0, 0, 45, 13 );            // set initial size and position
  277.     r.move( random(34), random(11) );   // randomly move around screen
  278.     TDemoWindow *window = new TDemoWindow ( r, "Demo Window", ++winNumber);
  279.     deskTop->insert(window);    // put window into desktop and draw it
  280. }
  281.  
  282. // changed from tvguid12: add buttons
  283. void TMyApp::newDialog()
  284. {
  285.     TDialog *pd = new TDialog( TRect( 20, 6, 60, 19), "Demo Dialog" );
  286.     if( pd )
  287.         {
  288.         TView *b = new TCheckBoxes( TRect( 3, 3, 18, 6),
  289.             new TSItem( "~H~varti",
  290.             new TSItem( "~T~ilset",
  291.             new TSItem( "~J~arlsberg", 0 )
  292.             )));
  293.         pd->insert( b );
  294.  
  295.         pd->insert( new TLabel( TRect( 2, 2, 10, 3), "Cheeses", b ));
  296.  
  297.         b = new TRadioButtons( TRect( 22, 3, 34, 6),
  298.             new TSItem( "~S~olid",
  299.             new TSItem( "~R~unny",
  300.             new TSItem( "~M~elted", 0 )
  301.             )));
  302.         pd->insert( b );
  303.  
  304.         pd->insert( new TLabel( TRect( 21, 2, 33, 3), "Consistency", b ));
  305.  
  306.         pd->insert( new TButton( TRect( 15, 10, 25, 12 ), "~O~K", cmOK,
  307.                     bfDefault ));
  308.         pd->insert( new TButton( TRect( 28, 10, 38, 12 ), "~C~ancel", cmCancel,
  309.                     bfNormal ));
  310.         deskTop->execView( pd );
  311.         }
  312.     destroy( pd );
  313. }
  314.  
  315. int main()
  316. {
  317.     readFile( fileToRead );
  318.     TMyApp myApp;
  319.     myApp.run();
  320.     deleteFile();
  321.     return 0;
  322. }
  323.