//--------------------------------------------------------------------------- #include #include "ITSSkinF.h" #include "ITSUtilF.h" #include "AppGlobalF.h" #include "ITSLangTransF.h" #pragma hdrstop #include "ITSSEL3MF.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "FRAME_RoadListF" #pragma link "cxButtons" #pragma link "cxContainer" #pragma link "cxControls" #pragma link "cxEdit" #pragma link "cxGraphics" #pragma link "cxGroupBox" #pragma link "cxLookAndFeelPainters" #pragma link "cxLookAndFeels" #pragma link "dxSkinBlack" #pragma link "dxSkinBlue" #pragma link "dxSkinsCore" #pragma resource "*.dfm" TITSSEL3M *ITSSEL3M = NULL; //--------------------------------------------------------------------------- __fastcall TITSSEL3M::TITSSEL3M(TComponent* Owner) : TForm(Owner) { LangTrans->Translate(this, ITSDb_GetConnection()); ITSSkin_Load(this); CMM_LoadForm(g_sFormsDir, this); m_bSelected = false; FRAMERoadList1->PnlTop->Visible = false; FRAMERoadList1->PnlBottom->Visible = false; } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::CommClose() { try { CMM_SaveForm(g_sFormsDir, this); } catch(...) { } } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::FormShow(TObject *Sender) { Refresh(); TmrShow->Enabled = true; } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::TmrShowTimer(TObject *Sender) { TmrShow->Enabled = false; BtnSearchClick((TObject*)BtnSearch); } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::BtnSearchClick(TObject *Sender) { Application->ProcessMessages(); TSqlCursor sqlCrs((TControl*)BtnSearch); RefreshData(); } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::RefreshData() { // °Ë»öÁ¶°Ç¿¡ ÀÇÇÑ ¸µÅ© µ¥ÀÌÅÍ Á¶È¸ try { SelListData(); } __finally { //TvList->ApplyBestFit(NULL, false, false); } } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::SelListData() { FRAMERoadList1->UpdateList(); } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::BtnCloseClick(TObject *Sender) { Close(); } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::BtnSelectClick(TObject *Sender) { if (!MultiSelect) { String sLinkId = ""; int nSelCnt = FRAMERoadList1->GetSelLinkIds(sLinkId); if (nSelCnt == 0) { Application->MessageBox(FrmLang->lblSelErr->Caption.c_str(),//L"¸ñ·Ï¿¡¼­ µµ·Î¸¦ ¸ÕÀú ¼±Åà Çϼ¼¿ä.", cxGroupBox1->Caption.c_str(), MB_OK|MB_ICONWARNING|MB_APPLMODAL); return; } m_sSelLinkId = sLinkId; m_bSelected = true; } else { int nSelIdx; int nSelRows = FRAMERoadList1->TvList->Controller->SelectedRowCount; if (nSelRows <= 0) { Application->MessageBox(FrmLang->lblSelErr->Caption.c_str(),//L"¸ñ·Ï¿¡¼­ µµ·Î¸¦ ¸ÕÀú ¼±Åà Çϼ¼¿ä.", cxGroupBox1->Caption.c_str(), MB_OK|MB_ICONWARNING|MB_APPLMODAL); return; } SelList->Items->Clear(); for (int ii = 0; ii < nSelRows; ii++) { nSelIdx = FRAMERoadList1->TvList->Controller->SelectedRows[ii]->RecordIndex; SelList->Items->Add(FRAMERoadList1->TvList->DataController->Values[nSelIdx][FRAMERoadList1->Column01->Index]); } m_bSelected = true; } Close(); } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::FormClose(TObject *Sender, TCloseAction &Action) { CommClose(); ITSSEL3M = NULL; //Action = caFree; } //--------------------------------------------------------------------------- void __fastcall TITSSEL3M::SetMultiSelect(bool AMultiSelect) { FRAMERoadList1->TvList->OptionsSelection->MultiSelect = AMultiSelect; } //--------------------------------------------------------------------------- bool __fastcall TITSSEL3M::GetMultiSelect() { return FRAMERoadList1->TvList->OptionsSelection->MultiSelect; } //---------------------------------------------------------------------------