home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 4 Power Pack / Visual_Basic4_Power_Pack.bin / vb4files / schedvbx / samples.z / SCHEDDLG.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1995-03-17  |  2.1 KB  |  91 lines

  1. // scheddlg.cpp : implementation file
  2. //
  3.  
  4. #include "stdafx.h"
  5. #include "vcsamp1.h"
  6. #include "scheddlg.h"
  7.  
  8. #include "schedvbx.h"
  9.  
  10. #ifdef _DEBUG
  11. #undef THIS_FILE
  12. static char BASED_CODE THIS_FILE[] = __FILE__;
  13. #endif
  14.  
  15. /////////////////////////////////////////////////////////////////////////////
  16. // SchedDlg dialog
  17.  
  18.  
  19. SchedDlg::SchedDlg(CWnd* pParent /*=NULL*/)
  20.     : CDialog(SchedDlg::IDD, pParent)
  21. {
  22.     //{{AFX_DATA_INIT(SchedDlg)
  23.     m_SchedVBX = NULL;
  24.     //}}AFX_DATA_INIT
  25. }
  26.  
  27. void SchedDlg::DoDataExchange(CDataExchange* pDX)
  28. {
  29.     CDialog::DoDataExchange(pDX);
  30.     //{{AFX_DATA_MAP(SchedDlg)
  31.     DDX_VBControl(pDX, IDC_SCHEDVBX1, m_SchedVBX);
  32.     //}}AFX_DATA_MAP
  33. }
  34.  
  35. BEGIN_MESSAGE_MAP(SchedDlg, CDialog)
  36.     //{{AFX_MSG_MAP(SchedDlg)
  37.     ON_VBXEVENT(VBN_TBCHANGED, IDC_SCHEDVBX1, OnTbchangedSchedvbx1)
  38.     ON_BN_CLICKED(IDC_MONTHLY, OnMonthly)
  39.     ON_BN_CLICKED(IDC_RESOURCE, OnResource)
  40.     //}}AFX_MSG_MAP
  41. END_MESSAGE_MAP()
  42.  
  43.  
  44. /////////////////////////////////////////////////////////////////////////////
  45. // SchedDlg message handlers
  46.  
  47. void SchedDlg::OnTbchangedSchedvbx1(UINT, int, CWnd*, LPVOID data)
  48. {
  49.     char szBuf[81];
  50.     int iTimeBlock;
  51.     
  52.     CScheduleVBX* pSchedVBX = (CScheduleVBX*)m_SchedVBX;
  53.     
  54.     pSchedVBX->GetEventParamInt(data, 0, &iTimeBlock);
  55.     
  56.     wsprintf(szBuf, "TimeBlock = %d", iTimeBlock);
  57.     
  58.     MessageBox(szBuf, "TBChanged", MB_OK);
  59.     
  60. }
  61.  
  62. void SchedDlg::OnMonthly()
  63. {
  64.     CScheduleVBX* pSchedVBX = (CScheduleVBX*)m_SchedVBX;
  65.  
  66.     pSchedVBX->SetDisplayMode(pSchedVBX->DisplayMode_MonthlyHorz);    
  67. }
  68.  
  69. void SchedDlg::OnResource()
  70. {
  71.     CScheduleVBX* pSchedVBX = (CScheduleVBX*)m_SchedVBX;
  72.  
  73.     pSchedVBX->SetDisplayMode(pSchedVBX->DisplayMode_Resource);    
  74. }
  75.  
  76. BOOL SchedDlg::OnInitDialog()
  77. {
  78.     CDialog::OnInitDialog();
  79.     
  80.     CScheduleVBX* pSchedVBX = (CScheduleVBX*)m_SchedVBX;
  81.  
  82.     pSchedVBX->SetTSDateTimeBeg(0, "1/1/95");
  83.     pSchedVBX->SetTSDateTimeEnd(0, "1/1/96");
  84.     pSchedVBX->SetTSDateTimeView(0, "1/12/95 8:00AM");
  85.  
  86.     pSchedVBX->SetResLoad("RESOURCE.TXT");
  87.     pSchedVBX->SetTBLoad("TIMEBLKS.TXT");
  88.     
  89.     return TRUE;  // return TRUE  unless you set the focus to a control
  90. }
  91.