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

} __fastcall TMainForm :: FormActivate (TObject * Sender)

{();

}

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

{-> Caption=FloatToStrF (Imp1, ffGeneral, 2,0); -> Caption=FloatToStrF (Imp2, ffGeneral, 2,0); -> Caption=FloatToStrF (Imp3, ffGeneral, 2,0); -> Caption=FloatToStrF (Int1, ffGeneral, 2,0); -> Caption=FloatToStrF (Int2, ffGeneral, 2,0); -> Caption=FloatToStrF (Int3, ffGeneral, 2,0);> Caption=IntToStr (Frequency);> Caption=IntToStr (Velocity);> Caption=IntToStr (Coordinate);> Caption=CodeType;> Caption=FloatToStrF (Current, ffGeneral, 1, 0);> Caption=FloatToStrF (Cycle, ffGeneral, 2,0);> Caption=FloatToStrF (InterraptCode, ffGeneral, 2,0);> Caption=IsolJunction;

}

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

{(N8-> Checked)

{= false; -> Checked=false;

}

{= true; -> Checked=true;

}

}

//---------------------------------------------------------------------------__fastcall TMainForm :: FormClose (TObject * Sender, TCloseAction & Action)

{> Terminate ();> WaitFor ();

/ / delete MyLink;

}

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

{> ShowModal ();

}

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

Файл: Report.h

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

# ifndef ReportH

# define ReportH

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

# include

# include

# include

# include

# include

# include

# include

//---------------------------------------------------------------------------TReportForm : Public TForm

{

__published: / / IDE-managed Components*GroupBox2;*GroupBox1;*DBGrid1;*EDate;*StaticText1;*MComments;*Button1;*Button2;*Button3;*Button4;__fastcall DBGrid1CellClick (TColumn * Column); __fastcall FormActivate (TObject * Sender); __fastcall Button1Click (TObject * Sender); __fastcall Button2Click (TObject * Sender);: / / User declarations: / / User declarations

__fastcall TReportForm (TComponent * Owner);

};

/ / --------------------------------------------------------------------------- PACKAGE TReportForm * ReportForm;

/ / -------------------------------------------------...