home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Components / Cell Control / DATA1.CAB / VCDEMO_Files / SortDlg.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-01-11  |  4.4 KB  |  152 lines
  1. // SortDlg.cpp : implementation file
  2. //
  3.  
  4. #include "stdafx.h"
  5. #include "VCDemo.h"
  6. #include "SortDlg.h"
  7.  
  8. #ifdef _DEBUG
  9. #define new DEBUG_NEW
  10. #undef THIS_FILE
  11. static char THIS_FILE[] = __FILE__;
  12. #endif
  13.  
  14. /////////////////////////////////////////////////////////////////////////////
  15. // CSortDlg dialog
  16.  
  17.  
  18. CSortDlg::CSortDlg(CWnd* pParent /*=NULL*/)
  19.     : CDialog(CSortDlg::IDD, pParent)
  20. {
  21.     //{{AFX_DATA_INIT(CSortDlg)
  22.         // NOTE: the ClassWizard will add member initialization here
  23.     //}}AFX_DATA_INIT
  24. }
  25.  
  26.  
  27. void CSortDlg::DoDataExchange(CDataExchange* pDX)
  28. {
  29.     CDialog::DoDataExchange(pDX);
  30.     //{{AFX_DATA_MAP(CSortDlg)
  31.     DDX_Control(pDX, IDC_SGCTRL1, m_ctrl);
  32.     //}}AFX_DATA_MAP
  33. }
  34.  
  35.  
  36. BEGIN_MESSAGE_MAP(CSortDlg, CDialog)
  37.     //{{AFX_MSG_MAP(CSortDlg)
  38.     //}}AFX_MSG_MAP
  39. END_MESSAGE_MAP()
  40.  
  41. /////////////////////////////////////////////////////////////////////////////
  42. // CSortDlg message handlers
  43.  
  44. BEGIN_EVENTSINK_MAP(CSortDlg, CDialog)
  45.     //{{AFX_EVENTSINK_MAP(CSortDlg)
  46.     ON_EVENT(CSortDlg, IDC_SGCTRL1, 31 /* OnCompareSortData */, OnOnCompareSortDataSgctrl1, VTS_BOOL VTS_VARIANT VTS_VARIANT VTS_PI4)
  47.     //}}AFX_EVENTSINK_MAP
  48. END_EVENTSINK_MAP()
  49.  
  50. BOOL CSortDlg::OnInitDialog() 
  51. {
  52.     CDialog::OnInitDialog();
  53.     
  54.     // TODO: Add extra initialization here
  55.     m_ctrl.SetCols( 6 );
  56.     m_ctrl.SetRows( 8 );
  57.     m_ctrl.DoSetBackGround(4);
  58.  
  59.     m_ctrl.DoSetCellString( 0,-1, "Stock" );    
  60.     m_ctrl.DoSetCellString( 1,-1, "Open");
  61.     m_ctrl.DoSetCellString( 2,-1, "Rise/Drop");
  62.     m_ctrl.DoSetCellString( 3,-1, "Volume" );
  63.     m_ctrl.DoSetCellString( 4,-1, "10:10" );
  64.     m_ctrl.DoSetCellString( 5,-1, "Volume" );
  65.  
  66.     m_ctrl.DoSetCellString( 0,0, "Microsoft" );    
  67.     m_ctrl.DoSetCellValue( 1,0, 27.50 );
  68.     m_ctrl.DoSetCellValue( 2,0, -0.57);
  69.     m_ctrl.DoSetCellValue( 3,0, 1116200 );
  70.     m_ctrl.DoSetCellValue( 4,0, 27.60 );
  71.     m_ctrl.DoSetCellValue( 5,0, 338700 );
  72.  
  73.     m_ctrl.DoSetCellString( 0,1, "IBM" );    
  74.     m_ctrl.DoSetCellValue( 1,1, 9.59 );
  75.     m_ctrl.DoSetCellValue( 2,1, -1.94);
  76.     m_ctrl.DoSetCellValue( 3,1, 317000 );
  77.     m_ctrl.DoSetCellValue( 4,1, 9.7);
  78.     m_ctrl.DoSetCellValue( 5,1, 45600 );
  79.  
  80.     m_ctrl.DoSetCellString( 0,2, "Oracle" );    
  81.     m_ctrl.DoSetCellValue( 1,2,11.3);
  82.     m_ctrl.DoSetCellValue( 2,2, 0.89);
  83.     m_ctrl.DoSetCellValue( 3,2, 333200 );
  84.     m_ctrl.DoSetCellValue( 4,2, 11.21 );
  85.     m_ctrl.DoSetCellValue( 5,2, 20700 );
  86.  
  87.     m_ctrl.DoSetCellString( 0,3, "Sybase" );    
  88.     m_ctrl.DoSetCellValue( 1,3, 13.52);
  89.     m_ctrl.DoSetCellValue( 2,3, -2.02);
  90.     m_ctrl.DoSetCellValue( 3,3, 378500 );
  91.     m_ctrl.DoSetCellValue( 4,3, 13.68 );
  92.     m_ctrl.DoSetCellValue( 5,3, 26500 );
  93.  
  94.     m_ctrl.DoSetCellString( 0,4, "Adobe" );    
  95.     m_ctrl.DoSetCellValue( 1,4, 15.82);
  96.     m_ctrl.DoSetCellValue( 2,4, -1.12);
  97.     m_ctrl.DoSetCellValue( 3,4, 799600 );
  98.     m_ctrl.DoSetCellValue( 4,4, 15.81 );
  99.     m_ctrl.DoSetCellValue( 5,4, 69600 );
  100.  
  101.     m_ctrl.DoSetCellString( 0,5, "Yahoo" );    
  102.     m_ctrl.DoSetCellValue( 1,5, 6.3);
  103.     m_ctrl.DoSetCellValue( 2,5, -1.4);
  104.     m_ctrl.DoSetCellValue( 3,5, 476000 );
  105.     m_ctrl.DoSetCellValue( 4,5, 6.43 );
  106.     m_ctrl.DoSetCellValue( 5,5, 195500 );
  107.  
  108.     m_ctrl.DoSetCellString( 0,6, "AOL" );    
  109.     m_ctrl.DoSetCellValue( 1,6,10.21);
  110.     m_ctrl.DoSetCellValue( 2,6, -0.68);
  111.     m_ctrl.DoSetCellValue( 3,6, 221300 );
  112.     m_ctrl.DoSetCellValue( 4,6, 10.26 );
  113.     m_ctrl.DoSetCellValue( 5,6, 21200 );
  114.  
  115.     m_ctrl.DoSetCellString( 0,7, "AT&T" );    
  116.     m_ctrl.DoSetCellValue( 1,7,9.1);
  117.     m_ctrl.DoSetCellValue( 2,7, -2.04);
  118.     m_ctrl.DoSetCellValue( 3,7, 1014800 );
  119.     m_ctrl.DoSetCellValue( 4,7, 9.12);
  120.     m_ctrl.DoSetCellValue( 5,7, 97000 );
  121.  
  122.     m_ctrl.DoSetCellString( 0,8, "North" );    
  123.     m_ctrl.DoSetCellValue( 1,8, 8.98);
  124.     m_ctrl.DoSetCellValue( 2,8, -2.07);
  125.     m_ctrl.DoSetCellValue( 3,8, 757300 );
  126.     m_ctrl.DoSetCellValue( 4,8, 9.11 );
  127.     m_ctrl.DoSetCellValue( 5,8, 154400 );
  128.  
  129.     for( int i=1; i<6; i++)
  130.         m_ctrl.DoSetSortCol( i, TRUE );
  131.  
  132.     m_ctrl.SetRowSelectedMode(TRUE);
  133.     m_ctrl.SetSideLabelVisible( FALSE );
  134.     m_ctrl.SetPageLabelVisible( FALSE );
  135.     m_ctrl.DoShowCurrentCell(FALSE, TRUE);
  136.     m_ctrl.SetMultiSelectedMode(FALSE);
  137.     
  138.     m_ctrl.SetGridReadOnly(TRUE);
  139.     m_ctrl.SetCurrentTopLabelHint(FALSE);
  140.     COleVariant var( "VCDEMO" );
  141.     m_ctrl.DoSetMessageTitle( var );
  142.  
  143.     return TRUE;  // return TRUE unless you set the focus to a control
  144.                   // EXCEPTION: OCX Property Pages should return FALSE
  145. }
  146.  
  147. void CSortDlg::OnOnCompareSortDataSgctrl1(BOOL assending, const VARIANT FAR& data1, const VARIANT FAR& data2, long FAR* compareResult) 
  148. {
  149.     // TODO: Add your control notification handler code here
  150.     
  151. }
  152.