Лабораторные работы / Захаров / LAB 5 / Unit1

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <Dialogs.hpp>
//---------------------------------------------------------------------------
class TForm2 : public TForm
{
__published:	// IDE-managed Components
	TEdit *Edit1;
	TButton *Button1;
	TButton *Button2;
	TButton *Button3;
	TButton *Button4;
	TButton *Button5;
	TButton *Button6;
	TRichEdit *RichEdit1;
	TGroupBox *GroupBox1;
	TGroupBox *GroupBox2;
	TCheckBox *CheckBox1;
	TCheckBox *CheckBox2;
	TCheckBox *CheckBox3;
	TCheckBox *CheckBox4;
	TCheckBox *CheckBox5;
	TCheckBox *CheckBox6;
	TCheckBox *CheckBox7;
	TCheckBox *CheckBox8;
	TProgressBar *ProgressBar1;
	TLabel *Label1;
	TEdit *Edit2;
	TEdit *Edit3;
	TEdit *Edit4;
	TLabel *Label2;
	TLabel *Label3;
	TOpenDialog *OpenDialog1;
	TSaveDialog *SaveDialog1;
	TPrintDialog *PrintDialog1;
	void __fastcall EditOnChange(TObject *Sender);
	void __fastcall Button1Click(TObject *Sender);
	void __fastcall Button5Click(TObject *Sender);
	void __fastcall Button6Click(TObject *Sender);
	void __fastcall Form1OnCanResize(TObject *Sender, int &NewWidth, int &NewHeight,
		  bool &Resize);
	void __fastcall Button2Click(TObject *Sender);
	void __fastcall Button3Click(TObject *Sender);
	void __fastcall Button4Click(TObject *Sender);
	void __fastcall imOpenClick(TObject *Sender);
	void __fastcall imSaveClick(TObject *Sender);
private:	// User declarations
public:		// User declarations
	__fastcall TForm2(TComponent* Owner);
	long double fac (double n);
	long double C (double n1, double k1);
	long double A (double n1, double k1);
	long double Cp(double n1, double k1);
	long double Ap(double n1, double k1);
	int ChangeC (int X[], int N1, int k1, int S1);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm2 *Form2;
//---------------------------------------------------------------------------
#endif