if (CheckBox2->Checked)
summ+=10.5;
else
summ-=10.5;
Label2->Caption=FloatToStrF(summ,ffCurrency,6,2);
}
// "kartoshka" ulagichga shichqonchani bosish
void __fastcall TForm1::CheckBox3Click(TObject *Sender)
{
if (CheckBox3->Checked)
summ+=18.5;
else
summ-=18.5;
Label2->Caption=FloatToStrF(summ,ffCurrency,6,2);
}
// "Koka-Kola" ulagichiga shichqonchani bosish
void __fastcall TForm1::CheckBox4Click(TObject *Sender)
{
if (CheckBox3->Checked)
summ+=14;
else
summ-=14;
Label2->Caption=FloatToStrF(summ,ffCurrency,6,2);
}
// OK tugmasini sichqoncha bilan bosish
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (CheckBox1->Checked && CheckBox2->Checked &&
CheckBox3->Checked && CheckBox4->Checked) {
/*
foydalanuvchi to'liq to'plamga buyurtma berib
5% chegirmaga ega bo'ldi
*/
summ*=0.95;
ShowMessage("Sizga 5% chegirma taqdim etildi.\n"
"Buyurtma summasi: " + FloatToStrF(summ, ffCurrency,
6, 2) +" so'm.");
}
Do'stlaringiz bilan baham: |