home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / tv20cpp.zip / tutorial / tvguid09.cpp < prev    next >
C/C++ Source or Header  |  1998-01-19  |  8KB  |  273 lines
  1. /*---------------------------------------------------------*/
  2. /*                                                         */
  3. /*   Turbo Vision 1.0                                      */
  4. /*   TVGUID09 Demo Source File                             */
  5. /*   Copyright (c) 1991 by Borland International           */
  6. /*                                                         */
  7. /*---------------------------------------------------------*/
  8. /*
  9.  * Modified by Sergio Sigala <ssigala@globalnet.it>
  10.  */
  11.  
  12. // same as tvguid08 except for multiple panes
  13. // modify TDemoWindow::makeInterior and constructor
  14.  
  15. #include <stdlib.h>             // for exit(), random()
  16. #include <iostream.h>
  17. #include <fstream.h>            // for ifstream
  18. #include <stdio.h>              // for puts() etc
  19. #include <string.h>             // for strlen etc
  20. #include <ctype.h>
  21.  
  22. #define Uses_TEventQueue
  23. #define Uses_TEvent
  24. #define Uses_TProgram
  25. #define Uses_TApplication
  26. #define Uses_TKeys
  27. #define Uses_TRect
  28. #define Uses_TMenuBar
  29. #define Uses_TSubMenu
  30. #define Uses_TMenuItem
  31. #define Uses_TStatusLine
  32. #define Uses_TStatusItem
  33. #define Uses_TStatusDef
  34. #define Uses_TDeskTop
  35. #define Uses_TView
  36. #define Uses_TWindow
  37. #define Uses_TFrame
  38. #define Uses_TScroller
  39. #define Uses_TScrollBar
  40. #include <tvision/tv.h>
  41.  
  42. const int cmMyFileOpen = 200;   // assign new command values
  43. const int cmMyNewWin   = 201;
  44.  
  45. /* SS: micro change here */
  46.  
  47. const char *fileToRead = "tvguid09.cc";
  48. //const char *fileToRead = "tvguid09.cpp";
  49. const int maxLineLength = maxViewWidth+1;
  50. const int maxLines      = 100;
  51. char *lines[maxLines];
  52. int lineCount = 0;
  53. static short winNumber  = 0;    // initialize window number
  54.  
  55. class TMyApp : public TApplication
  56. {
  57.  
  58. public:
  59.     TMyApp();
  60.     static TStatusLine *initStatusLine( TRect r );
  61.     static TMenuBar *initMenuBar( TRect r );
  62.     virtual void handleEvent( TEvent& event);
  63.     void newWindow();
  64. };
  65.  
  66. class TInterior : public TScroller
  67. {
  68.  
  69. public:
  70.  
  71.     TInterior( const TRect& bounds, TScrollBar *aHScrollBar,
  72.            TScrollBar *aVScrollBar );   // constructor
  73.     virtual void draw();                // override TView::draw
  74. };
  75.  
  76. class TDemoWindow : public TWindow      // define a new window class
  77. {
  78.  
  79. public:
  80.  
  81.     TDemoWindow( const TRect& bounds, const char *aTitle, short aNumber );
  82.     TInterior *makeInterior( const TRect& r, Boolean left );
  83.  
  84. };
  85.  
  86. void readFile( const char *fileName )
  87. {
  88.     ifstream fileToView( fileName );
  89.     if( !fileToView )
  90.         {
  91.         cout << "Invalid file name..." << endl;
  92.         exit( 1 );
  93.         }
  94.     else
  95.         {
  96.         char buf[maxLineLength];
  97.         while( lineCount < maxLines &&
  98.                fileToView.getline( buf, maxLineLength ) != 0 )
  99.             {
  100.             lines[lineCount] = newStr( buf );
  101.             lineCount++;
  102.             }
  103.         }
  104. }
  105.  
  106. void deleteFile()
  107. {
  108.     for( int i = 0; i < lineCount; i++ )
  109.         delete lines[i];
  110. }
  111.  
  112. TInterior::TInterior( const TRect& bounds, TScrollBar *aHScrollBar,
  113.               TScrollBar *aVScrollBar ) :
  114.        TScroller( bounds, aHScrollBar, aVScrollBar )
  115. {
  116.     options = options | ofFramed;
  117.     setLimit( maxLineLength, lineCount );
  118. }
  119.  
  120. void TInterior::draw()       // modified for scroller
  121. {
  122.     ushort color = getColor(0x0301);
  123.     for( int i = 0; i < size.y; i++ )
  124.         // for each line:
  125.         {
  126.         TDrawBuffer b;
  127.         b.moveChar( 0, ' ', color, size.x );
  128.         // fill line buffer with spaces
  129.         int j = delta.y + i;       // delta is scroller offset
  130.         if( j < lineCount && lines[j] != 0 )
  131.             {
  132.             char s[maxLineLength];
  133.             if( delta.x > strlen(lines[j] ) )
  134.                 s[0] = EOS;
  135.             else
  136.                 {
  137.                 strncpy( s, lines[j]+delta.x, size.x );
  138.                 s[size.x] = EOS;
  139.                 }
  140.             b.moveCStr( 0, s, color );
  141.             }
  142.         writeLine( 0, i, size.x, 1, b);
  143.         }
  144.  
  145. }
  146.  
  147. TDemoWindow::TDemoWindow( const TRect& bounds, const char *aTitle,
  148.               short aNumber) :
  149.          TWindow( bounds, aTitle, aNumber),
  150.          TWindowInit( &TDemoWindow::initFrame )
  151. {
  152.     TRect lbounds = getExtent();
  153.     TRect r( lbounds.a.x, lbounds.a.y, lbounds.b.x/2+1, lbounds.b.y );
  154.     TInterior *lInterior = makeInterior( r, True );
  155.     lInterior->growMode = gfGrowHiY;
  156.     insert( lInterior );
  157.     // creates left-side scrollable interior and inserts into window
  158.     r = TRect( lbounds.b.x/2, lbounds.a.y, lbounds.b.x, lbounds.b.y );
  159.     TInterior *rInterior = makeInterior( r, False );
  160.     rInterior->growMode = gfGrowHiX | gfGrowHiY;
  161.     insert( rInterior );
  162.     // likewise for right-side scroller
  163. }
  164.  
  165. TInterior *TDemoWindow::makeInterior( const TRect& bounds, Boolean left )
  166. {
  167.     TRect r = TRect( bounds.b.x-1, bounds.a.y+1, bounds.b.x, bounds.b.y-1 );
  168.     TScrollBar *vScrollBar = new TScrollBar( r );
  169.     if( vScrollBar == 0 )
  170.         {
  171.         cout << "vScrollbar init error" << endl;
  172.         exit(1);
  173.         }
  174.         // production code would display error dialog box
  175.     vScrollBar->options |= ofPostProcess;
  176.     if( left )
  177.         vScrollBar->growMode = gfGrowHiY;
  178.     insert( vScrollBar );
  179.  
  180.     r = TRect( bounds.a.x+2, bounds.b.y-1, bounds.b.x-2, bounds.b.y );
  181.     TScrollBar *hScrollBar = new TScrollBar( r );
  182.     if( hScrollBar == 0 )
  183.         {
  184.         cout << "hScrollbar init error" << endl;
  185.         exit(1);
  186.         }
  187.     hScrollBar->options |= ofPostProcess;
  188.     if( left )
  189.         hScrollBar->growMode = (gfGrowHiY | gfGrowLoY);
  190.     insert( hScrollBar );
  191.  
  192.     r = bounds;
  193.     r.grow( -1, -1 );
  194.     return new TInterior( r, hScrollBar, vScrollBar );
  195. }
  196.  
  197. TMyApp::TMyApp() :
  198.     TProgInit( &TMyApp::initStatusLine,
  199.                &TMyApp::initMenuBar,
  200.                &TMyApp::initDeskTop
  201.              )
  202. {
  203. }
  204.  
  205. void TMyApp::handleEvent(TEvent& event)
  206. {
  207.     TApplication::handleEvent(event);   // act like base!
  208.     if( event.what == evCommand )
  209.         {
  210.         switch( event.message.command )
  211.             {
  212.             case cmMyNewWin:            // but respond to additional commands
  213.                 newWindow();            // define action for cmMyNewWin
  214.                                         // command
  215.                 break;
  216.             default:
  217.                 return;
  218.             }
  219.         clearEvent( event );            // clear event after handling
  220.         }
  221. }
  222.  
  223. TMenuBar *TMyApp::initMenuBar( TRect r )
  224. {
  225.     r.b.y = r.a.y + 1;    // set bottom line 1 line below top line
  226.     return new TMenuBar( r,
  227.         *new TSubMenu( "~F~ile", kbAltF )+
  228.             *new TMenuItem( "~O~pen", cmMyFileOpen, kbF3, hcNoContext, "F3" )+
  229.             *new TMenuItem( "~N~ew",  cmMyNewWin,   kbF4, hcNoContext, "F4" )+
  230.             newLine()+
  231.             *new TMenuItem( "E~x~it", cmQuit, cmQuit, hcNoContext, "Alt-X" )+
  232.         *new TSubMenu( "~W~indow", kbAltW )+
  233.             *new TMenuItem( "~N~ext", cmNext,     kbF6, hcNoContext, "F6" )+
  234.             *new TMenuItem( "~Z~oom", cmZoom,     kbF5, hcNoContext, "F5" )
  235.         );
  236. }
  237.  
  238. TStatusLine *TMyApp::initStatusLine( TRect r )
  239. {
  240.     r.a.y = r.b.y - 1;     // move top to 1 line above bottom
  241.     return new TStatusLine( r,
  242.         *new TStatusDef( 0, 0xFFFF ) +
  243.         // set range of help contexts
  244.             *new TStatusItem( 0, kbF10, cmMenu ) +
  245.             // define an item
  246.             *new TStatusItem( "~Alt-X~ Exit", kbAltX, cmQuit ) +
  247.             // and another one
  248.             *new TStatusItem( "~Alt-F3~ Close", kbAltF3, cmClose )
  249.             // and another one
  250.         );
  251. }
  252.  
  253. void TMyApp::newWindow()
  254. {
  255.     TRect r( 0, 0, 45, 13 );            // set initial size and position
  256.  
  257.     /* SS: micro change here */
  258.  
  259.     //r.move( random(34), random(11) ); // randomly move around screen
  260.     r.move( random() % 34, random() % 11 ); // randomly move around screen
  261.     TDemoWindow *window = new TDemoWindow ( r, "Demo Window", ++winNumber);
  262.     deskTop->insert(window);    // put window into desktop and draw it
  263. }
  264.  
  265. int main()
  266. {
  267.     readFile( fileToRead );
  268.     TMyApp myApp;
  269.     myApp.run();
  270.     deleteFile();
  271.     return 0;
  272. }
  273.