home *** CD-ROM | disk | FTP | other *** search
- /*------------------------------------------------------------*/
- /* filename - thistwin.cpp */
- /* */
- /* function(s) */
- /* THistoryWindow member functions */
- /*------------------------------------------------------------*/
-
- /*------------------------------------------------------------*/
- /* */
- /* Turbo Vision - Version 1.0 */
- /* */
- /* */
- /* Copyright (c) 1991 by Borland International */
- /* All Rights Reserved. */
- /* */
- /*------------------------------------------------------------*/
-
- #define Uses_THistoryWindow
- #define Uses_THistoryViewer
- #include <tv.h>
-
- THistInit::THistInit( TListViewer *(*cListViewer)( TRect, TWindow *, ushort ) ) :
- createListViewer( cListViewer )
- {
- }
-
- #define cpHistoryWindow "\x13\x13\x15\x18\x17\x13\x14"
-
- THistoryWindow::THistoryWindow( const TRect& bounds,
- ushort historyId ) :
- THistInit( &THistoryWindow::initViewer ),
- TWindow( bounds, 0, wnNoNumber),
- TWindowInit( &THistoryWindow::initFrame )
- {
- flags = wfClose;
- if( createListViewer != 0 &&
- (viewer = createListViewer( getExtent(), this, historyId )) != 0 )
- insert( viewer );
- }
-
- TPalette& THistoryWindow::getPalette() const
- {
- static TPalette palette( cpHistoryWindow, sizeof( cpHistoryWindow )-1 );
- return palette;
- }
-
- void THistoryWindow::getSelection( char *dest )
- {
- viewer->getText( dest, viewer->focused, 255 );
- }
-
- TListViewer *THistoryWindow::initViewer( TRect r, TWindow * win, ushort historyId )
- {
- r.grow( -1, -1 );
- return new THistoryViewer( r,
- win->standardScrollBar( sbHorizontal | sbHandleKeyboard ),
- win->standardScrollBar( sbVertical | sbHandleKeyboard ),
- historyId);
- }
-