Kenjayev mahmudning dasturlash tillari fanidan tayyorlagan mustaqil ishi

Label 1 ni panel ustiga qo'ying ( Standart sahifada chapdan 4-o'rin ) Yorliqda NATIJAni qalin qilib yozing 20 balandlikda

LabeledEdit yorliqlari biriktirilgan ikkita tahrirlash oynasini Kengaytirilgan sahifadan shaklning yuqori qismiga torting  ularni bir xil gorizontal chiziqqa qo‘ying LabeledEdit komponentlari yorliqlaridagi teglarni mos ravishda VALUE X va VALUE Y ga o‘zgartiring Buning uchun ushbu komponentlarning EditLabel xususiyatidagi '+' belgisini bosing va yorliq xususiyatlarining ochiladigan ro‘yxatlarining Caption xususiyatidagi sarlavhani mos ravishda X -VALUE va Y -VALUE ga o‘zgartiring Yorliqlarni 10 ga o‘rnating. -height qalin shrift EditLabel xossasini yoping ushbu xususiyat oldidagi '-' belgisini bosish orqali . Keyin shrift balandligini 10 ga va komponentlarning Text xossasini mos ravishda 1,3 va 5,6 ga o'rnating

Yorliqli tahrir oynalari tepasida tugmasi paneli va yorlig‘i bilan bir xil vertikalda boshqa Label 2 yorlig‘ini Caption xususiyatidagi  shaklga o‘tkazing , uning ekranda o‘qish oson bo‘lishi uchun dasturlashtiriladigan formulani yozing

Shaklda HISOBLASH tugmasini bosing sichqoncha kursori bilan ustiga bosish orqali Ob’yektlar inspektoriga o‘ting  undagi voqea sahifasini ( Voqealar ) oching (yuqoridan ikkinchi) tugmasi hodisasini toping OnClick ( bosing) va ikki marta bosing. ushbu hodisa nomining oʻng tomonidagi oynaga bosing Bu har qanday hodisa uchun ishlov beruvchilarni oʻrnatishning standart usuli Lekin siz OnClick shu hodisa) boshqa yoʻl bilan oʻtishingiz mumkin: sichqonchani ikki marta bosish kifoya. tugmasi Ikkala holatda ham siz o‘zingizni Kod muharriri oynasida topasiz va u yerda sinf nomi shakli ( TForm 1 ), komponent nomi ( dan iborat bo‘lgan sarlavhali funksiyani ko‘rasiz. Tugma 1 ) va hodisa nomi On ( Bosing ) prefiksisiz. Kursor hodisa ishlov beruvchisi kiritilgan joyda joylashgan Masalan formula holatida


u shunday ko'rinishi mumkin ( kursiv ):
bekor __fastcall TForm1::Button1Click(TObject *Sender)
{
juft x,y,z;
x=StrToFloat(LabeledEdit1->Matn);
y=StrToFloat(LabeledEdit2->Matn);
z=(exp(x*x+2.37)-pow(x,1.5))/sqrt(fabs(y*y*y+atan2(y,x)));
Panel1->Caption="z="+FloatToStr(z);
}

12. 
    Ushbu faylda # o'z ichiga ” Formula direktivasidan yuqoriga va keyin o'ting . h ” direktivasini # include < matematika qo'shing . h > .
    
13. 
    Barchasini saqlash yorliq tugmasi bilan loyihani saqlang va Run | yordamida dasturni ishga tushiring Ishga tushirish yoki tegishli tezkor tugmani bosing yoki tezkor tugmani F 9 ni bosing . Qisqa kompilyatsiyadan so'ng ekranda kompilyator oynasining vaqtinchalik ko'rinishi bilan birga ilova oynasi paydo bo'ladi Paneldagi HISOBLASH tugmasini bosish orqali  ilovaning bajarilishi natijasini oling (2-rasm)
    

Fig.2 - ariza natijasi bilan shakl
Shubhasiz, natijaning formatlangan chiqishi kerak. Kod muharriri oynasiga o'tish uchun shaklning yuqori o'ng burchagidagi xochni bosish orqali natija bilan oynani yoping.

14. 
    Formatlangan chiqishni ishlov beruvchidagi satrga kiriting Buning uchun sintaksis bilan FloatToStrF funksiyasidan foydalaning: