home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / vb_tools / vbxstd12 / textdemo.cp_ / TEXTDEMO.CPP
C/C++ Source or Header  |  1994-08-23  |  2KB  |  75 lines
  1. // textdemo.cpp : implementation file
  2. //
  3.  
  4. #include "stdafx.h"
  5. #include "vbxdemo.h"
  6. #include "textdemo.h"
  7.  
  8. #ifdef _DEBUG
  9. #undef THIS_FILE
  10. static char BASED_CODE THIS_FILE[] = __FILE__;
  11. #endif
  12.  
  13. /////////////////////////////////////////////////////////////////////////////
  14. // CTextDemo dialog
  15.  
  16.  
  17. CTextDemo::CTextDemo(CWnd* pParent /*=NULL*/)
  18.     : CDialog(CTextDemo::IDD, pParent)
  19. {
  20.     //{{AFX_DATA_INIT(CTextDemo)
  21.     m_szMultiline = "";
  22.     //}}AFX_DATA_INIT
  23. }
  24.  
  25. void CTextDemo::DoDataExchange(CDataExchange* pDX)
  26. {
  27.     CDialog::DoDataExchange(pDX);
  28.     //{{AFX_DATA_MAP(CTextDemo)
  29.     DDX_VBText(pDX, IDC_VBTEXT4, 20, m_szMultiline);
  30.     //}}AFX_DATA_MAP
  31. }
  32.  
  33. BEGIN_MESSAGE_MAP(CTextDemo, CDialog)
  34.     //{{AFX_MSG_MAP(CTextDemo)
  35.     ON_WM_DESTROY()
  36.     ON_BN_CLICKED(IDHELP, OnHelp)
  37.     //}}AFX_MSG_MAP
  38. END_MESSAGE_MAP()
  39.  
  40.  
  41. /////////////////////////////////////////////////////////////////////////////
  42. // CTextDemo message handlers
  43.  
  44. void CTextDemo::OnDestroy()
  45. {
  46.     CDialog::OnDestroy();
  47.     ::WinHelp( m_hWnd, "VBXSTD12.HLP", HELP_QUIT, NULL );        
  48. }
  49.  
  50. BOOL CTextDemo::OnInitDialog()
  51. {
  52.     CDialog::OnInitDialog();
  53.  
  54. m_szMultiline = "Of course it supports...\nmultiline texts!";    
  55. UpdateData( FALSE );    
  56. if ( !IsHlpHere() )
  57.         GetDlgItem( IDHELP )->EnableWindow( FALSE );
  58.     return TRUE;  // return TRUE  unless you set the focus to a control
  59. }
  60.  
  61. void CTextDemo::OnHelp()
  62. {
  63.     CString FAR szWinDir, szName, szMsg;
  64.     GetSystemDirectory( szWinDir.GetBuffer(250), 248 );
  65.     szWinDir.ReleaseBuffer();
  66.     if ( szWinDir.GetLength() > 3 )
  67.         szWinDir += "\\";
  68.     szName = szWinDir;
  69.     szName += "VBXSTD12.HLP";
  70.     if ( !IsHlpHere() )
  71.         return;
  72.     ::WinHelp( m_hWnd, szName, HELP_KEY, (long)"VBText" );
  73.     
  74. }
  75.