Реферат Розробка комп'ютерного вимірювального комплексу вагона-лабораторії залізничної автоматики, телемеханіки та зв'язку

clude

# include

# include

# include

# include

# include

# include

# include

//---------------------------------------------------------------------------TMainForm : Public TForm

{

__published: / / IDE-managed Components*MainMenu1;*N1;*N2;*N3;*N4;*N5;*Bevel1;*N6;*StaticText2;*TSite;*StaticText4;*TFrictSite;*GroupBox1;*StaticText1;*TRC;*GroupBox2;*StaticText3;*StaticText5;*StaticText6;*TImp1;*TImp2;*TImp3;*StaticText7;*StaticText8;*StaticText9;*StaticText10;*StaticText11;*StaticText12;*TInt1;*TInt2;*TInt3;*StaticText13;*StaticText14;*StaticText15;*StaticText16;*TCycle;*StaticText18;*StaticText17;*StaticText19;*TInterraptCode;*StaticText20;*TFrequency;*StaticText22;*StaticText21;*StaticText23;*TVelocity;*StaticText24;*StaticText25;*TCoordinate;*StaticText27;*TCodeType;*StaticText28;*TCurrent;*StaticText30;*StaticText29;*TIsolJunction;*MyTimer;*N7;*N8;*N9;__fastcall N5Click (TObject * Sender); __fastcall N2Click (TObject * Sender); __fastcall N3Click (TObject * Sender); __fastcall N4Click (TObject * Sender); __fastcall N6Click (TObject * Sender); __fastcall FormActivate (TObject * Sender); __fastcall MyTimerTimer ( TObject * Sender); __fastcall N8Click (TObject * Sender); __fastcall FormClose (TObject * Sender, TCloseAction & Action); __fastcall N9Click (TObject * Sender);: / / User declarations: / / User declarations__fastcall ShowSite (void);

__fastcall TMainForm (TComponent * Owner);

};

/ / --------------------------------------------------------------------------- PACKAGE TMainForm * MainForm;

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

# endif

Файл: RC.cpp

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

# include

# pragma hdrstop

# include «RC.h»

# include «Sites.h»

# include «FrictSites.h»

# include «RCs.h»

# include «KPT.h»

# include «GlobalVariables.h»

# include «DataModule.h»

# include «SerialLink.h»

# include «Report.h» * MyLink;

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

# pragma package (smart_init)

# pragma resource «*. dfm» * MainForm;

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

__fastcall TMainForm :: TMainForm (TComponent * Owner)

: TForm (Owner)

{= new SerialLink (false);

}

//---------------------------------------------------------------------------__fastcall TMainForm :: N5Click (TObject * Sender)

{> Cl...