O‘zbekiston Respublikasi Aloqa Axborotlashtirish va Telekomunikatsiya Davlat Qo‘mitasi



Yüklə 1,55 Mb.
Pdf görüntüsü
səhifə12/12
tarix29.11.2022
ölçüsü1,55 Mb.
#71259
1   ...   4   5   6   7   8   9   10   11   12
O‘zbekiston Respublikasi Aloqa Axborotlashtirish va Telekomunika

 


VI. FOYDALANILGAN ADABIYOTLAR 
1. C++ Builder 6 справочное пособие. (A.Я. АРХАНГЕЛЬСКИЙ) 
2. C va C++ tili. (Toshkent ―Voris-Nashryoti‖ 2013) 
3. Самоучитель C++ Builder (Культин Н. Б.) 
4. Borland C++ Builder. (О.Д.Вальпа Экспресс-курс – 2006) 
5. Самоучитель программирования на языке С++ 1-qism, 2-qism 
(C.Бобровский.) 
6. Алгоритмы и программы на C++ Builder (Профессиональная серия 
для программистов) (Федоренко Ю.П. – 2010) 
7. TATU Farg‘ona Filiali ―C++da dasturlash‖ fani maruzalar matni 
8. TATU Farg‘ona Filiali ―Malumotlar banki va bazalari‖ fanidan Elektron 
qo‘llanma (Qodirov. S.) 
9. 
https://uz.m.wikipedia.org/wiki/Sug‘urtalash
 
10. https://uz.uzbekinvest.uz/sugurta-lugati.html 
11. O‘zbekiston Respublikasi Sug‘urta to‘g‘risidagi qonuni. 


VII. Ilova 
Ushbu dastur himoyalangan bo‘lib unga faqat parol orqali kirish mumkin. 
6.1 rasm. Dasturning parol qismi. 

6.2 rasm Parol noto’g’ri kiritilgandagi holat. 
void __fastcall TfrmParol::BitBtn1Click(TObject *Sender) 
{if (Edit1->Text=="1122") 
{frmParol->Hide(); 
frmAsosiy->ShowModal(); 
}else 
{ switch(MessageDlg("Siz paro'lni noto'g'ri kirittingiz", 
mtWarning, TMsgDlgButtons() << mbOK, 0)) 
{ case mrOk: Edit1->Text=""; //Deactivate(); 
break; 
}}} 


Dasturning har bir tugmalarini chertganimizda o‘ziniga tegishli oynalarni ochib 
berishi uchun: 
Form(tegishli forma nomi)->ShowModal();
Buyurug‘i yoziladi. 
Qidiruv hizmatida quyidagi kodlar kiritilgan: 
{ dm->ADOQuery1->Close(); 
dm->ADOQuery1->SQL->Text="select * from sugurta_sozlari where soz like 
\"%"+ baxtsiz->Name+"%\""; 
dm->ADOQuery1->Open();} 
Parol qismi kodlari: 
if (Edit1->Text=="1122") 
{frmParol->Hide(); 
frmAsosiy->ShowModal(); 
}else 
{ switch(MessageDlg("Siz paro'lni noto'g'ri kirittingiz", 
mtWarning, TMsgDlgButtons() << mbOK, 0)) 
{ case mrOk: Edit1->Text="";
break; } 

Yüklə 1,55 Mb.

Dostları ilə paylaş:
1   ...   4   5   6   7   8   9   10   11   12




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©azkurs.org 2024
rəhbərliyinə müraciət

gir | qeydiyyatdan keç
    Ana səhifə


yükləyin