Автоматизация методической печи

StaticText2->Caption="30Ã";

StaticText3->Caption="ÑÏ-73";

}

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

void fastcall TForm1::N811Click(TObject *Sender)

{

T1=1250;

if (vsad==1)

{

T2=1370;

tau=5;

}

else

if(vsad==2)

{

T2=1340;

tau=4.3;

}

else

i

f(vsad==3)

{

T2=1310;

tau=4;

}

T3=T2-50;

StaticText4->Caption=T1;

StaticText5->Caption=T2;

StaticText2->Caption="30Ã";

StaticText3->Caption="ÑÏ-81";

}

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

void fastcall TForm1::N49501Click(TObject *Sender)

{

T1=1250;

if (vsad==1)

{

T2=1360;

tau=3.3;

}

else

if(vsad==2)

{

T2=1330;

tau=3;

}

else

if(vsad==3)

{

T2=1300;

tau=2.3;

}

T3=T2-50;

StaticText4->Caption=T1;

StaticText5->Caption=T2;

StaticText2->Caption="Ì75";

StaticText3->Caption="Ðåëüñû Ñ49,Ð50";

}

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

void fastcall TForm1::N651Click(TObject *Sender)

{

T1=1250;

if (vsad==1)

{

T2=1370;

tau=3.4;

}

else

if(vsad==2)

{

T2=1340;

tau=3.1;

}

else

if(vsad==3)

{

T2=1310;

tau=2.4;

}

T3=T2-50;

StaticText4->Caption=T1;

StaticText5->Caption=T2;

StaticText2->Caption="Ì76";

StaticText3->Caption="Ðåëüñû Ð65";

}

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

void fastcall TForm1::N752Click(TObject *Sender)

{

T1=1250;

if (vsad==1)

{

T2=1370;

tau=4.2;

}

else

if(vsad==2)

{

T2=1340;

tau=3.5;

}

else

if(vsad==3)

{

T2=1310;

tau=3.3;

}

T3=T2-50;

StaticText4->Caption=T1;

StaticText5->Caption=T2;

StaticText2->Caption="Ì76";

StaticText3->Caption="Ðåëüñû Ð75";

}

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

void fastcall TForm1::N652Click(TObject *Sender)

{

T1=1250;

if (vsad==1)

{

T2=1370;

tau=4.1;

}

else

if(vsad==2)

{

T2=1340;

tau=3.4;

}

else

if(vsad==3)

{

T2=1310;

tau=3.1;

}

T3=T2-50;

StaticText4->Caption=T1;

StaticText5->Caption=T2;

StaticText2->Caption="Ì69õð.";

StaticText3->Caption="Ðåëüñû Ð65";

}

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

void fastcall TForm1::CheckBox1Click(TObject *Sender)

{

Edit1->Enabled=true;

Edit2->Enabled=true;

Edit4->Enabled=true;

Edit5->Enabled=true;

N1->Enabled=false;

N2->Enabled=false;

if(CheckBox1->Checked==false)

{

Edit1->Enabled=false;

Edit2->Enabled=false;

Edit4->Enabled=false;

Edit5->Enabled=false;

N1->Enabled=true;

N2->Enabled=true;

}

}

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

 Скачать реферат