lign="justify"> # ifndef GlobalVariablesH
# define GlobalVariablesHint CurNumSite, CurNumFrictSite, CurNumJunction; int Buffer [16]; float Imp1, Imp2, Imp3; float Int1, Int2, Int3; float Cycle; float InterraptCode; int Coordinate; int Frequency; int Velocity; float Current; AnsiString IsolJunction; AnsiString CodeType; bool ExtendedProtocol;
/ / ---------------------------------------------------------------------------
# endif
Файл: GlobalVariables.cpp
/ / ---------------------------------------------------------------------------
# include
# pragma hdrstop
# include «GlobalVariables.h» CurNumSite=2, CurNumFrictSite=1, CurNumJunction=1; Buffer [16]; Imp1=0.14, Imp2=0.13, Imp3=0.16; Int1=0.18, Int2 =0.15, Int3=0.78; Cycle=1.59; InterraptCode=1.46; Coordinate=123; Frequency=25; Velocity=45; Current=4.6; IsolJunction=«ні»; CodeType=«З»; ExtendedProtocol=true;
/ / ---------------------------------------------------------------------------
# pragma package (smart_init)
Файл: Sites.h
/ / ---------------------------------------------------------------------------
# ifndef SitesH
# define SitesH
/ / ---------------------------------------------------------------------------
# include
# include
# include
# include
# include
# include
# include
# include
# include
# include
# include
//---------------------------------------------------------------------------TSitesForm : Public TForm
{
__published: / / IDE-managed Components*DBGrid1;*Button1;*NumSite;*NameSite;*GroupBox1;*Button2;*Button3;*GroupBox2;*Button4;__fastcall DBGrid1CellClick (TColumn * Column); __fastcall DBGrid1Enter (TObject * Sender); __fastcall Button1Click (TObject * Sender); __fastcall Button2Click (TObject * Sender); __fastcall Button3Click (TObject * Sender);: / / User declarations: / / User declarations
__fastcall TSitesForm (TComponent * Owner);
};
/ / --------------------------------------------------------------------------- PACKAGE TSitesForm * SitesForm;
/ / ---------------------------------------------------------------------------
# endif
Файл: Sites.cpp
/ / ---------------------------------------------------------------------------
# include
# pragma hdrstop
# include «Sites.h»
# include «DataModule.h»
/ / ---------------------------------------------------------...