R. A. Yusupov C++ Builderda masalalar va topshiriqlar samarqand 2018 yil

Konvertor

Konvertor dasturi dollardan so’mga o’tkazadi. Sonli ma’lumotlarni kiritish va tasvirlash uchun TextBox va Label komponentalarni ishlatishni namiyosh etadi. Dastur shunday loyixalashtirilganki, ya’ni foydalanuvchu taxrirlash maydoniga faqat to’g’ri ma’lumotlarni (sonlarni) kiritadi. Dastur formasi 1.1-rasmda keltirilgan.


Button2

Edit2

Edit1

Button1

Label2

Label1

Label4

Label3


1.1-rasm. Konvertor dastur formasi

// Hisoblash tugmasiga sichqoncha tugmasini bosish

void __fastcall TForm1::Button1Click(TObject *Sender) {

float usd; // Dollar

float kurs; // Kurs

float sum; // So'm

//Dollar va Kurs maydonlariga ma'lumotlar

// kiritilganligini, tekshiramiz

if ((Edit1->Text).Length()==0 ||

(Edit2->Text).Length()==0) {

MessageDlg("Dollar va kursni kiritish kerak",

mtInformation, TMsgDlgButtons()<

if ((Edit1->Text).Length()==0)

Edit1->SetFocus(); // Dollar maydonida kursor

else

Edit2->SetFocus(); // Kurs maydonida kursor

return;

}

//boshlang'ich ma'lumotlarni kiritish

usd=StrToFloat(Edit1->Text);

kurs=StrToFloat(Edit2->Text);

//hisoblash

sum=usd*kurs;

//natijani chiqarish

Label4->Caption=FloatToStrF(usd,ffGeneral,7,2)+" $= "

+FloatToStrF(sum,ffGeneral,7,2)+" sum.";

}

// Dollar maydonida tugmalar bosilganda

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, System::WideChar &Key) {

// Ruxsat etilmagan belgilar kodi nol bilan

// almashtiriladi, natijada

// belgi taxrirlash oynasida xosil bo'lmaydi

// Key - bosilgan tugma kodi

// belgi ruxsat etilganligini, tekshiramiz