Ilmiy loyiha mavzusi: Spravochnik Farg’ona shahri dorixonalarida mavjud dorilar bazasini yaratish mundarija kirish


Ilova  Dasturning asosiy kod qismi  Bosh oyna



Download 0,94 Mb.
Pdf ko'rish
bet9/10
Sana25.01.2023
Hajmi0,94 Mb.
#902370
1   2   3   4   5   6   7   8   9   10
Bog'liq
Dorixona baza
ХИваЭИҲлар фани Оралиқ назорат мавзусини бажариш бўйича талаблар
Ilova 

Dasturning asosiy kod qismi 


Bosh oyna
//--------------------------------------------------------------------------- 
#include  
#pragma hdrstop 
#include "Unit1.h" 
#include "Unit2.h" 
#include "Project1PCH1.h" 
#include "Unit3.h" 
#include "Unit4.h" 
#include "Unit5.h" 
//--------------------------------------------------------------------------- 
#pragma package(smart_init) 
#pragma resource "*.dfm" 
TForm1 *Form1; 
//--------------------------------------------------------------------------- 
__fastcall TForm1::TForm1(TComponent* Owner) 
: TForm(Owner) 


//--------------------------------------------------------------------------- 
void __fastcall TForm1::BitBtn2Click(TObject *Sender) 

Close(); 

//--------------------------------------------------------------------------- 


28 
void __fastcall TForm1::BitBtn1Click(TObject *Sender) 

if (Edit1->Text=="Admin" && Edit2->Text==123456) {Form1->Hide();
Form2->ShowModal(); 
} else {ShowMessage("Login yoki Parol xato kiritilgan");} 

//--------------------------------------------------------------------------- 
void __fastcall TForm1::Help1Click(TObject *Sender) 

ShowMessage("Login yoki Parolni bilmasangiz kirmaganiz maqul bu 
yerdagi ma'lumotlar sir saqlanadi"); 

//--------------------------------------------------------------------------- 
void __fastcall TForm1::BitBtn3Click(TObject *Sender) 

Form2->Show(); 

//--------------------------------------------------------------------------- 
Asosiy oyna 
//--------------------------------------------------------------------------- 
#include  
#pragma hdrstop 
#include "Unit2.h" 
#include "Unit3.h" 
#include "Unit4.h" 
#include "Project1PCH1.h" 


29 
#include "Unit1.h" 
#include "Unit5.h" 
#include "Unit6.h" 
#include "Unit7.h" 
#include "Unit8.h" 
//--------------------------------------------------------------------------- 
#pragma package(smart_init) 
#pragma resource "*.dfm" 
TForm2 *Form2; 
//--------------------------------------------------------------------------- 
__fastcall TForm2::TForm2(TComponent* Owner) 
: TForm(Owner) 


//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn1Click(TObject *Sender) 

Form2->Close(); 
Form3->ShowModal(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn2Click(TObject *Sender) 

Form4->ADOnom->Insert(); 
Form4->ADODori->Insert(); 
Form4->Show(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn4Click(TObject *Sender) 



30 
Close(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn3Click(TObject *Sender) 

Form8->Show(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn1Click(TObject *Sender) 

Form2->Close(); 
Form3->ShowModal(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn2Click(TObject *Sender) 

Form4->ADOnom->Insert(); 
Form4->ADODori->Insert(); 
Form4->Show(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn4Click(TObject *Sender) 

Close(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn3Click(TObject *Sender) 



31 
Form8->Show(); 

void __fastcall TForm2::BitBtn1Click(TObject *Sender) 

Form2->Close(); 
Form3->ShowModal(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn2Click(TObject *Sender) 

Form4->ADOnom->Insert(); 
Form4->ADODori->Insert(); 
Form4->Show(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn4Click(TObject *Sender) 

Close(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm2::BitBtn3Click(TObject *Sender) 

Form8->Show(); 


Download 0,94 Mb.

Do'stlaringiz bilan baham:
1   2   3   4   5   6   7   8   9   10




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©hozir.org 2023
ma'muriyatiga murojaat qiling

    Bosh sahifa
davlat universiteti
ta’lim vazirligi
axborot texnologiyalari
zbekiston respublikasi
maxsus ta’lim
guruh talabasi
nomidagi toshkent
O’zbekiston respublikasi
o’rta maxsus
toshkent axborot
texnologiyalari universiteti
xorazmiy nomidagi
davlat pedagogika
rivojlantirish vazirligi
pedagogika instituti
Ўзбекистон республикаси
tashkil etish
vazirligi muhammad
haqida tushuncha
таълим вазирлиги
toshkent davlat
respublikasi axborot
O'zbekiston respublikasi
kommunikatsiyalarini rivojlantirish
махсус таълим
vazirligi toshkent
fanidan tayyorlagan
saqlash vazirligi
bilan ishlash
Toshkent davlat
Ishdan maqsad
fanidan mustaqil
sog'liqni saqlash
uzbekistan coronavirus
respublikasi sog'liqni
coronavirus covid
vazirligi koronavirus
koronavirus covid
qarshi emlanganlik
covid vaccination
risida sertifikat
sertifikat ministry
vaccination certificate
haqida umumiy
o’rta ta’lim
matematika fakulteti
fanlar fakulteti
pedagogika universiteti
ishlab chiqarish
moliya instituti
fanining predmeti