Лабы по МПО / Sissy_Metr / OOP / Abuchalka

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

#ifndef AbuchalkaH
#define AbuchalkaH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <ToolWin.hpp>
#include <Buttons.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
        TStatusBar *StatusBar1;
        TBevel *Bevel1;
        TRadioGroup *RadioGroup1;
        TRadioButton *RadioButton1;
        TRadioButton *RadioButton2;
        TGroupBox *GroupBox1;
        TBitBtn *BitBtn1;
        TGroupBox *GroupBox2;
        TPanel *Panel1;
        TMemo *Help;
        TPanel *Panel2;
        TPanel *Panel3;
        TEdit *B1;
        TEdit *R5;
        TEdit *E1;
        TEdit *E2;
        TEdit *E3;
        TEdit *E4;
        TEdit *B2;
        TEdit *B3;
        TEdit *B4;
        TEdit *R4;
        TPanel *Panel4;
        TEdit *R2;
        TEdit *R3;
        TEdit *R1;
        TLabel *Sign;
        TLabel *Label2;
        TEdit *Buf;
        TBitBtn *BitBtn2;
        TBitBtn *BitBtn3;
        TBitBtn *BitBtn4;
        TBitBtn *BitBtn5;
        TSpeedButton *SpeedButton1;
        TEdit *B5;
        TEdit *R6;
        TEdit *E5;
        TSpeedButton *Revers;
        TMemo *MsgBox;
        TLabel *BL2;
        TLabel *BL3;
        TLabel *EL3;
        TLabel *BL4;
        TLabel *EL4;
        TLabel *BL1;
        TLabel *EL2;
        TLabel *EL1;
        TEdit *Buf1;
        TLabel *Label;
        TBitBtn *BitBtn7;
        TBitBtn *BitBtn8;
        TEdit *Edit1;
        TEdit *Edit2;
        TBitBtn *BitBtn6;
        TLabel *Label1;
        TPanel *Panel5;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label5;
        TLabel *Label6;
        TLabel *Label7;
        void __fastcall RadioButton1Click(TObject *Sender);
        void __fastcall RadioButton2Click(TObject *Sender);
        void __fastcall RadioButton3Click(TObject *Sender);
        void __fastcall RadioButton4Click(TObject *Sender);
        void __fastcall BitBtn1Click(TObject *Sender);
        void __fastcall BitBtn2Click(TObject *Sender);
        void __fastcall BitBtn3Click(TObject *Sender);
        void __fastcall BitBtn4Click(TObject *Sender);
        void __fastcall SpeedButton1Click(TObject *Sender);
        void __fastcall BitBtn5Click(TObject *Sender);
        void __fastcall ReversClick(TObject *Sender);
        void __fastcall ReversMouseUp(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
        void __fastcall BitBtn8Click(TObject *Sender);
        void __fastcall BitBtn7Click(TObject *Sender);
        void __fastcall BitBtn6Click(TObject *Sender);
private:	// User declarations
public:		// User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------

class Operations
 {
 public:
  Operations();
  ~Operations ();

//  ------------function -------------
 int add(AnsiString  ,AnsiString );
 int sub(AnsiString  ,AnsiString );

void AddProcess (int);
void SubProcess (int);
};

class Error
{
 public:
 Error();
 ~Error();
  AnsiString ErrorMsg (int);
};

#endif