All pastes #193396 Raw Edit

Untitled

public text v1 · immutable
·published 2006-10-06 21:02 UTC
rendered paste body
//---------------------------------------------------------------------------

#include <vcl.h>
#include <iostream.h>
#pragma hdrstop

#include "Cacl.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

int a;
int rez;
int skaic[5];

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
skaic[1] = 1;
MaskEdit1->Text=skaic[1];

}

//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
skaic[2] = 2;
MaskEdit1->Text=skaic[2];
}
void __fastcall TForm1::BitBtn4Click(TObject *Sender)
{
rez = skaic[1]-skaic[2]-skaic[3];
}

//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn3Click(TObject *Sender)
{
MaskEdit1->Text=rez;
}



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

void __fastcall TForm1::BitBtn6Click(TObject *Sender)
{
skaic[3] = 3;
MaskEdit1->Text=skaic[3];

}

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


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