Дипломная работа: Автоматизация процесса контроля знаний учащихся ГБОУ города Москвы школы №656 А.С. Макаренко

Скачать файл

Заказать новую работу

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам

128

TQuery *QueryTmp;

TBitBtn *BitBtnEdit;

TBitBtn *BitBtnUndo;

TBitBtn *BitBtnAdd;

TBitBtn *BitBtnDel;

TBitBtn *BitBtnDelAll;

TBitBtn *BitBtnClose;

TFloatField *QueryInterMINRES;

TFloatField *QueryInterMAXRES;

TMemoField *QueryInterINTER;

TStringField *QueryInterINTERSTR;

TIntegerField *QueryInterID;

TIntegerField *QueryInterIDUSER;

TIntegerField *QueryInterIDDISC;

TIntegerField *QueryInterIDTEMA;

TIntegerField *QueryInterIDTEST;

TBitBtn *BitBtnSelect;

void __fastcall FormClose(TObject *Sender, TCloseAction &Action);

void __fastcall FormResize(TObject *Sender);

void __fastcall BitBtnCloseClick(TObject *Sender);

void __fastcall DataSourceInterDataChange(TObject *Sender,

TField *Field);

void __fastcall BitBtnAddClick(TObject *Sender);

void __fastcall BitBtnDelClick(TObject *Sender);

void __fastcall BitBtnEditClick(TObject *Sender);

void __fastcall BitBtnUndoClick(TObject *Sender);

void __fastcall BitBtnDelAllClick(TObject *Sender);

void __fastcall QueryInterCalcFields(TDataSet *DataSet);

void __fastcall BitBtnSelectClick(TObject *Sender);

private: // User declarations

TLocateOptions SearchOptions;

int DiscID;

int TemaID;

int TestID;

double* SelectedMinRes;

void __fastcall CreateSQL(int);

int __fastcall CheckDiapazon(double, double, int);

public: // User declarations

__fastcall TFormInter(TComponent* Owner);

void __fastcall Prepear(int, int, int, double*); // подготовить форму

int __fastcall Adapt(); // подогнать форму под размер главной формы

};

//---------------------------------------------------------------------------

129

extern PACKAGE TFormInter *FormInter;

//---------------------------------------------------------------------------

#endif

FormPermisU

//---------------------------------------------------------------------------

#ifndef FormPermisUH

#define FormPermisUH

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <ComCtrls.hpp>

#include <ExtCtrls.hpp>

#include <DB.hpp>

#include <DBTables.hpp>

#include <ImgList.hpp>

#include <Buttons.hpp>

//---------------------------------------------------------------------------

class TFormPermis : public TForm

{

__published: // IDE-managed Components

TTreeView *TreeDisc;

TPanel *Panel1;

TQuery *QueryDisc;

TQuery *QueryTema;

TQuery *QueryTest;

TImageList *ImageListDisc;

TTreeView *TreeView1;

TQuery *QueryPravo;

TQuery *QueryTmp;

TPanel *Panel2;

TLabel *Label1;

TLabel *LabelFIO;

TPanel *Panel3;

TBitBtn *BitBtnNo;

TBitBtn *BitBtnYes;

TPanel *Panel4;

TBitBtn *BitBtnClose;

void __fastcall TreeView1Click(TObject *Sender);

130

void __fastcall FormClose(TObject *Sender, TCloseAction &Action);

void __fastcall BitBtnYesClick(TObject *Sender);

void __fastcall BitBtnNoClick(TObject *Sender);

void __fastcall TreeDiscChanging(TObject *Sender, TTreeNode *Node,

bool &AllowChange);

void __fastcall BitBtnCloseClick(TObject *Sender);

private: // User declarations

int TypeUO; // 2 - отдел, 1 - пользователь

int ID_UO; // ИД отдела или пользователя

void __fastcall RefreshTree(); // перестроить дерево целиком

void __fastcall BuildTree(); // построить дерево предметов

void __fastcall BuildSubTreeTema(int, TTreeNode*, int); // построить поддрево

тем

void __fastcall BuildSubTreeTest(int, TTreeNode*, int); // построить пддерево

тестов

void __fastcall GetStopped(); // вычленить в БД запрещенные записи

int __fastcall IsStopped(int, int);

TTreeNode* _fastcall FindNode(TTreeView*, int, int); // найти узел в дереве

bool __fastcall DeleteRecord(int, int); // удалить из таблицы запись

bool __fastcall AddRecord(int, int); // добавить запись в таблицу

public: // User declarations

__fastcall TFormPermis(TComponent* Owner);

void __fastcall Prepear(int, int); // при открытии формы

void __fastcall Adapt(); // подогнать форму под размер главной формы

};

//---------------------------------------------------------------------------

extern PACKAGE TFormPermis *FormPermis;

//---------------------------------------------------------------------------

#endif

FormPrintResult

//---------------------------------------------------------------------------

#ifndef FormPrintResult1UH

#define FormPrintResult1UH

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

131

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <ExtCtrls.hpp>

#include <QRCtrls.hpp>

#include <QuickRpt.hpp>

//---------------------------------------------------------------------------

class TFormPrintResult1 : public TForm

{

__published: // IDE-managed Components

TQuickRep *QuickRep;

TQRBand *QRBand1;

TQRLabel *QRLabel1;

TQRLabel *QRLabelUser;

TQRLabel *QRLabelDiscName;

TQRLabel *QRLabelDate;

TQRLabel *QRLabelTime;

TQRLabel *QRLabelHard;

TQRLabel *QRLabelLimitTime;

TQRLabel *QRLabelCountQ;

TQRLabel *QRLabel2;

TQRLabel *QRLabel3;

TQRLabel *QRLabel4;

TQRLabel *QRLabel5;

TQRLabel *QRLabel6;

TQRLabel *QRLabel7;

TQRLabel *QRLabel8;

TQRLabel *QRLabel9;

TQRLabel *QRLabelCountQA;

TQRBand *QRBand3;

TQRLabel *QRLabel10;

TQRLabel *QRLabel16;

TQRLabel *QRLabel17;

TQRBand *QRBand4;

TQRDBText *QRDBText1;

TQRDBText *QRDBText5;

TQRDBText *QRDBText7;

TQRLabel *QRLabelTestName;

TQRLabel *QRLabelTemaName;

private: // User declarations

public: // User declarations

__fastcall TFormPrintResult1(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TFormPrintResult1 *FormPrintResult1;

132

//---------------------------------------------------------------------------

#endif

FormPrintStatistic

//---------------------------------------------------------------------------

#ifndef FormPrintStatistic1UH

#define FormPrintStatistic1UH

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <ExtCtrls.hpp>

#include <QRCtrls.hpp>

#include <QuickRpt.hpp>

//---------------------------------------------------------------------------

class TFormPrintStatistic1 : public TForm

{

__published: // IDE-managed Components

TQuickRep *QuickRep;

TQRBand *QRBand1;

TQRLabel *QRLabel1;

TQRLabel *QRLabel2;

TQRLabel *QRLabelDateBegin;

TQRLabel *QRLabel3;

TQRLabel *QRLabelDateEnd;

TQRLabel *QRLabel5;

TQRLabel *QRLabelUser;

TQRLabel *QRLabel6;

TQRLabel *QRLabelDisc;

TQRLabel *QRLabel9;

TQRLabel *QRLabelTest;

TQRLabel *QRLabel11;

TQRLabel *QRLabelKHardBegin;

TQRLabel *QRLabel13;

TQRLabel *QRLabelKHardEnd;

TQRLabel *QRLabel4;

TQRLabel *QRLabelTema;

TQRBand *QRBand2;

TQRLabel *QRLabel8;

Источник: https://baza.diplomsite.ru/previewfile/2090

Смотрите также:

17. Введение 18. Линейные программы 19. Ветвления 20. Программирование циклических алгоритмов
_-___-~1
_3 тема - Диффузия
_Роджерс Карл, Брак и его альтернативы
- Программа ГПИ
'Заповит' Рейнгольда Глиэра: стилистические особенности
'Просвещенный абсолютизм' Екатерины II и его влияние на развитие русской культуры
'Создание и продвижение интернет - платформы реферальной системы' на примере компании Бартер–кард
«Методы учета затрат на производство продукции, работ, услуг»Курсовая работа
«Теория человеческих потребностей Маслоу»