Конструктивные противопожарные меры в вагоне

}

//--------------------------------------------------------------------------- fastcall TKPTForm::Button2Click(TObject *Sender)

{>KPTTable->Delete();Enter(this);

}

//--------------------------------------------------------------------------- fastcall TKPTForm::Button3Click(TObject *Sender)

{>KPTTable->Edit();>KPTTable->FieldByName("NumKPT")->Value = NumKPT->Text;>KPTTable->FieldByName("NameKPT")->Value = NameKPT->Text;>KPTTable->FieldByName("MinRY")->Value = MinRY->Text;>KPTTable->FieldByName("MaxRY")->Value = MaxRY->Text;>KPTTable->FieldByName("MinY")->Value = MinY->Text;>KPTTable->FieldByName("MaxY")->Value = MaxY->Text;>KPTTable->FieldByName("MinG")->Value = MinG->Text;>KPTTable->FieldByName("MaxG")->Value = MaxG->Text;>KPTTable->FieldByName("MinIntY")->Value = MinIntY->Text;>KPTTable->FieldByName("MaxIntY")->Value = MaxIntY->Text;>KPTTable->FieldByName("MinIntG")->Value = MinIntG->Text;>KPTTable->FieldByName("MaxIntG")->Value = MaxIntG->Text;

}

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

Файл :DataModule.h

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

#ifndef DataModuleH

#define DataModuleH

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

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <Db.hpp>

#include <DBTables.hpp>

//---------------------------------------------------------------------------TDM : public TDataModule

{

published: // IDE-managed Components*FrictSitesTable;*FrictSitesTableNumFrictSite;*FrictSitesTableNameFrictSite;*DSFrictSites;*SitesTable;*SitesTableNumSite;*SitesTableNameSite;*DSSites;*RCTable;*DSRC;*RCTableNumSite;*RCTableNumFrictSite;*RCTableNumJunction;*RCTableNameSignal;*RCTableNumTranslation;*FrictSitesTableNumSite;*KPTTable;*DSKPT;*KPTTableNumKPT;*KPTTableNameKPT;*KPTTableMinRY;*KPTTableMaxRY;*KPTTableMinY;*KPTTableMaxY;*KPTTableMinG;*KPTTableMaxG;*KPTTableMinIntY;*KPTTableMaxIntY;*KPTTableMinIntG;*KPTTableMaxIntG;*RCTableNumKPT;*RCTableKPT;*DSReport;*ReportTable;*ReportTableDate;*ReportTableTime;*ReportTableNameSite;*ReportTableNameFrictSite;*ReportTableNumJunction;*ReportTableNameSignal;*ReportTableNumTranslation;*ReportTableRCLength;*ReportTableIBeg;*ReportTableIEnd;*ReportTableCode;*ReportTableImp1;*ReportTableInt1;*ReportTableImp2;*ReportTableInt2;*ReportTableImp3;*ReportTableInt3;*ReportTableCycle;*ReportTableVelocity;*ReportTableNamKPT;*ReportTableComments;: // User declarations: // User declarations

fastcall TDM(TComponent* Owner);

};

//---------------------------------------------------------------------------PACKAGE TDM *DM;

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

#endif

Файл :DataModule.cpp

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

#include <vcl.h>

#pragma hdrstop

#include "DataModule.h"

#include "RCs.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"*DM;

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

fastcall TDM::TDM(TComponent* Owner)

: TDataModule(Owner)

{

}

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

Файл :RC.h

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

#ifndef RCH

#define RCH

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

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

Читайте также

Разработка приемника УКВ-радиостанции
Радиоприемное устройство - одно из важнейших и необходимых элементов радиотехнической системы передачи сообщений. Оно обеспечивает: улавливание энергии электромагнитного поля, нес ...

Проектирование мультивибратора на трёх логических элементах серии КМОП
Генераторы - специальные элементы цифровых устройств, предназначенные для формирования последовательности электрических сигналов различной формы. Генераторы обеспечивают работу цифровог ...

Проектирование двухвходовой КМОП-схемы дешифратора 2 в 4
КМОП (комплементарная логика на транзисторах металл-оксид-полупроводник; англ. CMOS, Complementary-symmetry/metal-oxide semiconductor) - технология построения электронных схем. В те ...