Blame | Last modification | View Log | RSS feed
//---------------------------------------------------------------------------#include <vcl.h>#pragma hdrstop#include "ProjectConfig.h"#include "DataModule.h"//---------------------------------------------------------------------------#pragma package(smart_init)#pragma link "Grids_ts"#pragma link "TSDBGrid"#pragma link "TSGrid"#pragma link "AdvGrid"#pragma link "BaseGrid"#pragma link "DBAdvGrd"#pragma link "DBAdvGrid"#pragma link "DBAdvGrd"#pragma link "DBAdvNavigator"#pragma resource "*.dfm"TProjectConfigForm *ProjectConfigForm;//---------------------------------------------------------------------------__fastcall TProjectConfigForm::TProjectConfigForm(TComponent* Owner): TForm(Owner){}//---------------------------------------------------------------------------void __fastcall TProjectConfigForm::CloseBtnClick(TObject *Sender){Close();}//---------------------------------------------------------------------------void __fastcall TProjectConfigForm::FormShow(TObject *Sender){if (!ProjectsQuery->Active){ProjectsQuery->Open();}}//---------------------------------------------------------------------------