Axborot ta’lim texnologiyalari kafedrasi

2.3-rasm 
 
2.4-rasm 

---

~ 21 ~ 
 
 
2.5-rasm 
1.  “m.mbd”  bu  -  Microsoft  Access  ma’lumotlar  bazasi.  (Baza  fayl  yonida 
turishi kerak). 
2. Ma’lumotlar bazasi to’g’ri ulanganini tekshirish tugmasi. 
3. Ulanganlik haqidagi ma’lumotlarni saqlash va tasdiqlash. 
2.14. ADOConnection1 LoginPromt xususiyatiga false tanlanadi; 
2.15.  ADOQuery1  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
2.15.1.  ADOTable1  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
2.15.2.  ADOQuery2  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
2.15.3.  ADOTable2  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
1 
2 
3 

---

~ 22 ~ 
 
2.15.4.  ADOQuery3  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
2.15.5.  ADOTable3  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
2.15.6.  ADOQuery4  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
2.15.7.  ADOTable4  komponentasi  Connection  xususiyatiga  ADOConnection1 
tanlanadi; 
2.15.8. ADOTable1 komponentasi TableName xususiyatiga Qurilish tanlanadi; 
2.15.9. ADOTable1 komponentasi Active xususiyatiga true tanlanadi; 
2.15.10. ADOTable2 komponentasi TableName xususiyatiga Hisobot tanlanadi; 
2.15.11. ADOTable2 komponentasi Active xususiyatiga true tanlanadi; 
2.15.12. ADOTable3 komponentasi TableName xususiyatiga Grafik tanlanadi; 
2.15.13. ADOTable3 komponentasi Active xususiyatiga true tanlanadi; 
2.15.14. ADOTable4 komponentasi TableName xususiyatiga Hammasi tanlanadi; 
2.15.15. ADOTable4 komponentasi Active xususiyatiga true tanlanadi; 
2.16. DataSource1 komponentasi DataSet xususiyatiga ADOTable1 tanlanadi; 
2.17. DataSource2 komponentasi DataSet xususiyatiga ADOQuery1 tanlanadi; 
2.18. DataSource3 komponentasi DataSet xususiyatiga ADOQuery2 tanlanadi; 
2.19. DataSource4 komponentasi DataSet xususiyatiga ADOQuery3 tanlanadi; 
2.20. DataSource5 komponentasi DataSet xususiyatiga ADOQuery4 tanlanadi; 
2.21.  DBGrid1  komponentasi  ustiga  sichqoncha  chap  tugmasi  ikki  marotaba 
bosiladi va “Nomi” dan boshqa barcha ma’lumotlar uchiriladi. 
2.21.1. "Nomi" ma’lumotlar ustuni razmeri kattalashtiriladi; 
2.26.  System  bo’limidan  Timer  komponentasini  olib  Form1  oynasiga  ixtiyoriy 
joylashtiriladi; 
2.26.1. Sichqonchaning chap tugmasini Timer1 ustiga 2 marta bosgan holda ichiga 
kiriladi va quyidagi dastur kod yoziladi: 
void __fastcall TForm1::Timer1Timer(TObject *Sender) 

---

~ 23 ~ 
 
{ 
   if(ta) 
   { 
sDateEdit1->Text=Now().DateString(); 
TLocateOptions qi; 
qi << loPartialKey <<  loCaseInsensitive; 
 if( !ADOTable3->Locate("Kassa_sanasi",sDateEdit1->Text,qi)) 
      { 
ADOQuery3->Insert(); 
ADOQuery3->FieldByName("Kassa_sanasi")->AsString= sDateEdit1->Text; 
ADOQuery3->FieldByName("Kassa")->AsString="0"; 
ADOQuery3->FieldByName("Pul_birligi")->AsString="So’m"; 
ADOQuery3->Post(); 
      } 
    ta=false; 
   } 
   sLabel1->Caption=TimeToStr(Now()); 
   sLabel2->Caption=Now().DateString(); 
   sLabel10->Caption=TimeToStr(Now()); 
   sLabel11->Caption=Now().DateString(); 
} 
2.27. Standart bo’limidan PopMenu komponentasini olib Form1 oynasiga ixtiyoriy 
joylashtiriladi(Ma’lumotlar Standart joylashib qoladi). 
2.27.1.  PopMenu1ning    ob’yektni  ko’rinishiga  doir  xossalaridan  Items  tanlanadi 
(... bosiladi). 
PopMenu1 Itemsga Mahsulot o’zgartirish, O‘chirish deb yoziiladi (2.6-rasm). 

---

~ 24 ~