Componentes.Terceros.DevExp.../official/x.26/ExpressQuantumGrid 6/Demos/CBuilder/ViewBandedFixedDemo/ViewBandedFixedDemoMain.cpp
2007-09-09 11:27:27 +00:00

90 lines
3.2 KiB
C++

//---------------------------------------------------------------------------
#include <vcl.h>
#include "shellapi.hpp"
#pragma hdrstop
#include "ViewBandedFixedDemoMain.h"
#include "AboutDemoForm.h"
#include "ViewBandedFixedDemoData.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxClasses"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridBandedTableView"
#pragma link "cxGridCustomPopupMenu"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridDBBandedTableView"
#pragma link "cxGridLevel"
#pragma link "cxGridPopupMenu"
#pragma link "cxGridTableView"
#pragma link "cxStyles"
#pragma link "cxLookAndFeels"
#pragma resource "*.dfm"
TViewBandedFixedDemoMainForm *ViewBandedFixedDemoMainForm;
//---------------------------------------------------------------------------
__fastcall TViewBandedFixedDemoMainForm::TViewBandedFixedDemoMainForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TViewBandedFixedDemoMainForm::miAboutClick(
TObject *Sender)
{
ShowAboutDemoForm();
}
//---------------------------------------------------------------------------
void __fastcall TViewBandedFixedDemoMainForm::FormShow(TObject *Sender)
{
((TcxGridTableView*)cxGrid->FocusedView)->DataController->Groups->FullExpand();
}
//---------------------------------------------------------------------------
void __fastcall TViewBandedFixedDemoMainForm::miShowBandsHeadersClick(
TObject *Sender)
{
btvUsersSchedule->OptionsView->BandHeaders = !btvUsersSchedule->OptionsView->BandHeaders;
((TMenuItem*)Sender)->Checked = btvUsersSchedule->OptionsView->BandHeaders;
}
//---------------------------------------------------------------------------
void __fastcall TViewBandedFixedDemoMainForm::miShowIndicatorClick(
TObject *Sender)
{
btvUsersSchedule->OptionsView->Indicator = !btvUsersSchedule->OptionsView->Indicator;
((TMenuItem*)Sender)->Checked = btvUsersSchedule->OptionsView->Indicator;
}
//---------------------------------------------------------------------------
void __fastcall TViewBandedFixedDemoMainForm::miMultiSelectClick(
TObject *Sender)
{
btvUsersSchedule->OptionsSelection->MultiSelect = !btvUsersSchedule->OptionsSelection->MultiSelect;
((TMenuItem*)Sender)->Checked = btvUsersSchedule->OptionsSelection->MultiSelect;
}
//---------------------------------------------------------------------------
void __fastcall TViewBandedFixedDemoMainForm::miShowColumnsHeadersClick(
TObject *Sender)
{
btvUsersSchedule->OptionsView->Header = !btvUsersSchedule->OptionsView->Header;
((TMenuItem*)Sender)->Checked = btvUsersSchedule->OptionsView->Header;
}
//---------------------------------------------------------------------------
void __fastcall TViewBandedFixedDemoMainForm::miExitClick(
TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------