Tekshirdi: Toshkent 2016



Download 1,97 Mb.
bet13/13
Sana29.12.2021
Hajmi1,97 Mb.
#78774
1   ...   5   6   7   8   9   10   11   12   13
Bog'liq
Xisobot

ism

id

ism

familiya

manzil

tolov

login

parol

1

Jahongir

Uzoqov

Samarqand vil

40000

Jahongir

12432

2

Komil

Rustamov

Sirdaryo vil

40000

Komil

124214

3

Xurshid

Ko'paysinov

Namangan vil

40000

Xurshid

32423423

4

Aziz

Sultanov

Chirchiq vil

40000

Aziz

234242

5

Xumoyun

Xolmurodov

Navoiy vil

40000

Xumoyun

trefeegdf

6

Rustam

Xoliqov

Surxandaryo vil

40000

Rustam

fg

7

Asqarali

Yo'ldashov

Samarqand vil

40000

Asqarali

dgheff

8

Axlidin

Xabibullaev

Namangan vil

40000

Axlidin

fgdgfdg

9

Muxammad

Turdaliev

Farg'ona vil

40000

Muxammad

dfg

10

Abror

Karimov

Yunusobod t-n

40000

Abror

dfgdg

11

Sanjar

Muminov

Yakkasaroy t-n

40000

Sanjar

fd35t34

12

Fedya

Odam o'g'li

Yunusobod t-n

40000

Fedya

r43

13

Garri

Poter

Chilonzor t-n

40000

Garri

345

14

Farida

Ruziyeva

Yunusobod t-n

40000

Farida

436

15

Bahrom

Nematov

Yunusobod t-n

40000

Bahrom

fsdfsd32

16

Said

Suhrobov

Yakkasaroy t-n

40000

Said

2323423

17

Abbos

Farhodov

Yunusobod t-n

40000

Abbos

561561

18

Jabbor

Saidov

Chilonzor t-n

40000

Jabbor

453

19

Dili

Sumanov

Yakkasaroy t-n

40000

Dili

1651

20

Ramz

Abbosov

Yunusobod t-n

40000

Ramz

16

21

Feruz

Ikromov

Yakkasaroy t-n

40000

Feruz

15

22

Zuhri

Husenov

Chilonzor t-n

40000

Zuhri

1651

23

Hamro

Firdavsiy

Yakkasaroy t-n

40000

Hamro

651

24

Laylo

Umarova

Yunusobod t-n

40000

Laylo

6

25

Razzoq

Sharipov

Chilonzor t-n

40000

Razzoq

151

26

Bahrom

Bibitov

Yunusobod t-n

40000

Bahrom

1651

27

Yulchi

jonuzoqov

Uchtepa tumani

40000

Yulchi

151545644

28

Nortoy

Hubbumov

Xamza tuman

40000

Nortoy

45645

29

Umar

rahmatov

Chilonzor t-n

40000

Umar

41

30

Jamol

Komolov

Uchtepa tumani

40000

Jamol

5616

31

Latif

Karimov

Yakkasaroy t-n

40000

Latif

165151

32

Noila

Jumanov

Yunusobod t-n

40000

Noila

61

33

Muhammad

Buriyev

Uchtepa tumani

40000

Muhammad

16151

34

Isakboy

Turdiyev

Yakkasaroy t-n

40000

Isakboy

1615151

35

Elbek

Akromov

Yunusobod t-n

40000

Elbek

156

36

Shamil

Muhsinov

Xamza tuman

40000

Shamil

46545

37

Otabek

Ho'jayev

Yunusobod t-n

40000

Otabek

5154

38

Nurzod

Karahanov

Uchtepa tumani

40000

Nurzod

46545

40

Jamshid

Elov

Yunusobod t-n

40000

Jamshid

546

41

Komil

Husanov

Xamza tuman

40000

Komil

54546

42

Abduqodir

Muhiddinov

Yakkasaroy t-n

40000

Abduqodir

464545

43

Salim

ganiyev

Uchtepa tumani

40000

Salim

45465

44

Majid

Karimov

Yakkasaroy t-n

40000

Majid

8494

45

Bohodir

Yusupov

Uchtepa tumani

40000

Bohodir

89644

0

Shohista

To'rayev

Qashqadaryo.vil

0

Boburxon

1234



moshinasotilgan

id

Sotuvchi_ismi

Sotuvchi_familiyasi

Oluvchining_ismi

Oluvchining_familiyasi

Mashina_rusumi

Summa

1

Shohista

To'rayev

Boburxon

To'rayev




10000

2

Laylo

Umarova

Botir

jalilov

Nexia DONC

1000

3

Bahrom

Bibitov

Bohodir

sharipov

Malibu TLZ

10000

4

Shohista

To'rayev

Shohista

To'rayev

Ferrari

10000

Dastur kodi:

Form1 oynasi

#include

#pragma hdrstop

#include "Unit1.h"

#include "Mashinalar.h"

#include "bolim.h"

#include "Admin.h"

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

#pragma package(smart_init)

#pragma link "sSkinManager"

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm1::Button3Click(TObject *Sender)

{

Hide();


Form4->Show();

}

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



void __fastcall TForm1::Button1Click(TObject *Sender)

{

Hide();



Form2->Button4->Visible = false;

Form2->Show();

}

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



void __fastcall TForm1::Button2Click(TObject *Sender)

{

Hide();



Form3->Show();

}

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



void __fastcall TForm1::Button4Click(TObject *Sender)

{

Close();



}

Form2 oynasi

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

#include

#pragma hdrstop

#include "Mashinalar.h"

#include "Unit1.h"

#include "sotuvchilarr.h"

#include "Sotilgan_mashinala.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm2 *Form2;

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

__fastcall TForm2::TForm2(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm2::Button3Click(TObject *Sender)

{

Form1->Close();



}

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

void __fastcall TForm2::Button2Click(TObject *Sender)

{

Close();



Form1->Show();

}

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



void __fastcall TForm2::Edit1Change(TObject *Sender)

{

AnsiString k;



k = Edit1->Text;

ADOQuery1 -> Close();

ADOQuery1 -> SQL -> Clear();

ADOQuery1 -> SQL -> Add("select *");

ADOQuery1 -> SQL -> Add(" from baza ");

ADOQuery1 -> SQL -> Add("where "+ComboBox1->Text+" LIKE '" + k +"%'");

ADOQuery1 -> Open();

}

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



void __fastcall TForm2::Button1Click(TObject *Sender)

{

AnsiString k;



k = Edit1->Text;

ADOQuery1 -> Close();

ADOQuery1 -> SQL -> Clear();

ADOQuery1 -> SQL -> Add("select *");

ADOQuery1 -> SQL -> Add(" from baza");

ADOQuery1 -> SQL -> Add("where "+ComboBox1->Text+" LIKE '" + k +"%'");

ADOQuery1 -> Open();

}

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



void __fastcall TForm2::Button8Click(TObject *Sender)

{

ComboBox1->ItemIndex = -1;



Edit1->Text = "";

Button1->Click();

}

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



void __fastcall TForm2::Button6Click(TObject *Sender)

{

TLocateOptions qidiruv;



qidiruv<

if(Form8->ADOTable1->Locate("login",Edit2->Text,qidiruv))

{if(Form8->ADOTable1->Locate("parol",Edit3->Text,qidiruv))

{

if(DBEdit1->Text == Edit2->Text)



{

if(Edit6->Text!="" && Edit4->Text!="" && Edit5->Text!="")

{

Form9->ADOQuery1->Open();



Form9->ADOQuery1->Insert();

Form9->ADOQuery1->FieldByName("Sotuvchi_ismi")->AsString = DBEdit2->Text;

Form9->ADOQuery1->FieldByName("Sotuvchi_familiyasi")->AsString = DBEdit3->Text;

Form9->ADOQuery1->FieldByName("Oluvchining_ismi")->AsString = Edit4->Text;

Form9->ADOQuery1->FieldByName("Oluvchining_familiyasi")->AsString = Edit5->Text;

Form9->ADOQuery1->FieldByName("Summa")->AsString = Edit6->Text;

Form9->ADOQuery1->FieldByName("Mashina_rusumi")->AsString = DBEdit4->Text;

Form9->ADOQuery1->Post();

Edit4->Text="";

Edit5->Text="" ;

Edit6->Text="";

ShowMessage("Tabriklaymiz siz mashina sotib oldingiz!");

Panel1->Visible = false;

ADOQuery1->Delete();

}

else


ShowMessage("BARCHA MAYDON TO'LDIRILISHI SHART...");

//ADOQuery1->Delete();

}

}

else



ShowMessage("login yoki parol xato");

}

else



ShowMessage("login yoki parol xato");

Edit2->Clear();

Edit3->Clear();

}

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



void __fastcall TForm2::Button5Click(TObject *Sender)

{

Panel1->Visible = false;



}

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

void __fastcall TForm2::Button4Click(TObject *Sender)

{

Panel1->Visible = true;



}

Form3 oynasi

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

#include

#pragma hdrstop

#include "bolim.h"

#include "Unit1.h"

#include "Parol.h"

#include "Mashinalar.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm3 *Form3;

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

__fastcall TForm3::TForm3(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm3::Button4Click(TObject *Sender)

{

Close();


Form1->Show();

}

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



void __fastcall TForm3::Button1Click(TObject *Sender)

{

Close();



Form5->Show();

}

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



void __fastcall TForm3::Button2Click(TObject *Sender)

{

Hide();



Form2->Button4->Visible = true;

Form2->Show();

}

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



Form4 oynasi

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

#include

#pragma hdrstop

#include "Admin.h"

#include "Unit1.h"

#include "Sotuvchila.h"

#include "sotuvchilarr.h"

#include "Mashinalar.h"

#include "Sotilgan_mashinala.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm4 *Form4;

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

__fastcall TForm4::TForm4(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm4::Button3Click(TObject *Sender)

{

Form1->Close();



}

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

void __fastcall TForm4::Button2Click(TObject *Sender)

{

Button5->Visible = false;



Button4->Visible = false;

Button1->Visible = false;

Label3->Visible = false;

Panel1->Visible = true;

Close();

Form1->Show();

}

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



void __fastcall TForm4::Button6Click(TObject *Sender)

{

if(Edit1->Text =="shohista" && Edit2->Text == "1234")



{

Edit1->Text = "";

Edit2->Text = "";

Button5->Visible = true;

Button4->Visible = true;

Button1->Visible = true;

Label3->Visible = true;

Panel1->Visible = false;

}

else ShowMessage("Parol yoki login xato!");



}

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

void __fastcall TForm4::Button1Click(TObject *Sender)

{

Hide();



Form8->Show();

}

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



void __fastcall TForm4::Button4Click(TObject *Sender)

{

Hide();



Form9->Show();

}

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



void __fastcall TForm4::Button5Click(TObject *Sender)

{

Edit1->Text = "";



Edit2->Text = "";

Button5->Visible = false;

Button4->Visible = false;

Button1->Visible = false;

Label3->Visible = false;

Panel1->Visible = true;

Hide();

Form2->Show();

}

Form5 oynasi



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

#include

#pragma hdrstop

#include "Parol.h"

#include "Sotuvchila.h"

#include "regestratsiya.h"

#include "Mashinalar.h"

#include "sotuvchilarr.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm5 *Form5;

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

__fastcall TForm5::TForm5(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm5::Button1Click(TObject *Sender)

{

TLocateOptions qidiruv;



qidiruv<

if(Form8->ADOTable1->Locate("login",Edit1->Text,qidiruv))

{if(Form8->ADOTable1->Locate("parol",Edit2->Text,qidiruv))

{

Hide();



Form6->Edit1->Text = Edit1->Text;

Form6->Edit2->Text = Edit2->Text;

Form6->Show();

}

else



ShowMessage("login yoki parol xato");}

else


ShowMessage("login yoki parol xato");

Edit1->Clear();

Edit2->Clear();

}

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



void __fastcall TForm5::Label3MouseMove(TObject *Sender, TShiftState Shift,

int X, int Y)

{

Label3->Font ->Color = clRed;



}

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

void __fastcall TForm5::Label3MouseLeave(TObject *Sender)

{

Label3->Font->Color = clBlack;



}

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

void __fastcall TForm5::Label3Click(TObject *Sender)

{

Hide();



Form7->Show();

}

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



Form6 oynasi

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

#include

#pragma hdrstop

#include "Sotuvchila.h"

#include "Unit1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm6 *Form6;

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

__fastcall TForm6::TForm6(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm6::Button1Click(TObject *Sender)

{

Form1->Close();



}

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

void __fastcall TForm6::Timer1Timer(TObject *Sender)

{

AnsiString j;



j = Edit2->Text;

ADOQuery1 -> Close();

ADOQuery1 -> SQL -> Clear();

ADOQuery1 -> SQL -> Add("select *");

ADOQuery1 -> SQL -> Add(" from baza");

ADOQuery1 -> SQL -> Add("where parol LIKE '" + j +"%'");

ADOQuery1 -> Open();

if(DBEdit1->Text == Edit2->Text){

j = Edit2->Text;

ADOQuery1 -> Close();

ADOQuery1 -> SQL -> Clear();

ADOQuery1 -> SQL -> Add("select *");

ADOQuery1 -> SQL -> Add(" from baza");

ADOQuery1 -> SQL -> Add("where parol LIKE '" + j +"%'");

ADOQuery1 -> Open();

Timer1->Enabled=false;

}

}

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



void __fastcall TForm6::Button2Click(TObject *Sender)

{

Close();



Form1->Show();

}

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



void __fastcall TForm6::Button3Click(TObject *Sender)

{DBGrid1->Visible = false;

Button3->Visible = false;

Button4->Visible = false;

GroupBox1 -> Visible = true;

}

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



void __fastcall TForm6::BitBtn1Click(TObject *Sender)

{

if(Edit7->Text!="" && Edit8->Text!="" && Edit3->Text!="" &&



Edit4->Text!="" && Edit5->Text!="" && Edit6->Text!=""&& Edit9->Text != "")

{

ADOQuery1->Open();



ADOQuery1->Insert();

ADOQuery1->FieldByName("Ismi")->AsString = Edit10->Text;

ADOQuery1->FieldByName("parol")->AsString = Edit2->Text;

ADOQuery1->FieldByName("nom")->AsString = Edit3->Text;

ADOQuery1->FieldByName("narx")->AsString = Edit4->Text;

ADOQuery1->FieldByName("uzunlik")->AsString = Edit5->Text;

ADOQuery1->FieldByName("massa")->AsString = Edit6->Text;

ADOQuery1->FieldByName("tezlik")->AsString = Edit7->Text;

ADOQuery1->FieldByName("ot_kuchi")->AsString = Edit8->Text;

ADOQuery1->FieldByName("bak_sigimi")->AsString = Edit9->Text;

ADOQuery1->FieldByName("Id")->AsString =IntToStr(StrToInt(DBEdit1->Text)%12);

ADOQuery1->FieldByName("Familiyasi")->AsString = Edit11->Text;

ADOQuery1->Post();

ShowMessage(" Ma`lumot kiritildi! ");

Edit8->Text="";

Edit7->Text="";

Edit3->Text="";

Edit4->Text="" ;

Edit5->Text="";

Edit6->Text="" ;

Edit9->Text = "";

Button3->Visible = true;

Button4->Visible = true;

DBGrid1->Visible = true;

Timer1->Enabled = true;

GroupBox1 -> Visible = false;

}

else


ShowMessage("BARCHA MAYDON TO'LDIRILISHI SHART...");

}

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



void __fastcall TForm6::Button4Click(TObject *Sender)

{

ADOQuery1->Delete();



}

Form7 oynasi

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

----------------------------------------------------------------

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

#include

#pragma hdrstop

#include "regestratsiya.h"

#include "Unit1.h"

#include "sotuvchilarr.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm7 *Form7;

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

__fastcall TForm7::TForm7(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm7::Button1Click(TObject *Sender)

{

Form1->Close();



}

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

void __fastcall TForm7::Button2Click(TObject *Sender)

{

Close();



Form1->Show();

}

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



void __fastcall TForm7::Button3Click(TObject *Sender)

{

if(Edit1->Text!="" && Edit2->Text!="" && Edit3->Text!=""



&& Edit4->Text!="" && Edit5->Text!="")

{

Form8->ADOTable1->Open();



Form8->ADOTable1->Insert();

Form8->ADOTable1->FieldByName("ism")->AsString = Edit1->Text;

Form8->ADOTable1->FieldByName("familiya")->AsString = Edit2->Text;

Form8->ADOTable1->FieldByName("manzil")->AsString = Edit3->Text;

Form8->ADOTable1->FieldByName("login")->AsString = Edit4->Text;

Form8->ADOTable1->FieldByName("parol")->AsString = Edit5->Text;

Form8->ADOTable1->Post();

ShowMessage(" Ma`lumot kiritildi! ");

Edit3->Text="";

Edit4->Text="" ;

Edit5->Text="";

Edit1->Text="";

Edit2->Text="" ;

}

else



ShowMessage("BARCHA MAYDON TO'LDIRILISHI SHART...");

}

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



void __fastcall TForm7::CheckBox1Click(TObject *Sender)

{

if(CheckBox1->Checked == true)



{

CheckBox1->Visible = false;

Label1->Visible = true;

Label2->Visible = true;

Label3->Visible = true;

Label4->Visible = true;

Label5->Visible = true;

Label6->Visible = true;

Edit1->Visible = true;

Edit2->Visible = true;

Edit3->Visible = true;

Edit4->Visible = true;

Edit5->Visible = true;

Button3->Visible = true;

}

}

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



--------------------------------------------------------------

Form8 oynasi

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

#include

#pragma hdrstop

#include "sotuvchilarr.h"

#include "Unit1.h"

#include "Admin.h"

#include "Mashinalar.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm8 *Form8;

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

__fastcall TForm8::TForm8(TComponent* Owner)

: TForm(Owner)

{

}

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



void __fastcall TForm8::Button1Click(TObject *Sender)

{

Form1->Close();



}

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

void __fastcall TForm8::Button4Click(TObject *Sender)

{

Close();



Form4->Show();

}

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



void __fastcall TForm8::Button2Click(TObject *Sender)

{

ADOTable1->Delete();



Form2->ComboBox1->Text = "Ismi";

Form2->Edit1->Text = DBEdit1->Text;

Form2-> ADOQuery1->Delete();

}

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



Form 9 oynasi

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

#include

#pragma hdrstop

#include "Sotilgan_mashinala.h"

#include "Unit1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm9 *Form9;

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

__fastcall TForm9::TForm9(TComponent* Owner)

: TForm(Owner)

{

}



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

void __fastcall TForm9::Button1Click(TObject *Sender)



{

Form1->Close();



}

//---------------------------------------------------------------------------
Download 1,97 Mb.

Do'stlaringiz bilan baham:
1   ...   5   6   7   8   9   10   11   12   13




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

kiriting | ro'yxatdan o'tish
    Bosh sahifa
юртда тантана
Боғда битган
Бугун юртда
Эшитганлар жилманглар
Эшитмадим деманглар
битган бодомлар
Yangiariq tumani
qitish marakazi
Raqamli texnologiyalar
ilishida muhokamadan
tasdiqqa tavsiya
tavsiya etilgan
iqtisodiyot kafedrasi
steiermarkischen landesregierung
asarlaringizni yuboring
o'zingizning asarlaringizni
Iltimos faqat
faqat o'zingizning
steierm rkischen
landesregierung fachabteilung
rkischen landesregierung
hamshira loyihasi
loyihasi mavsum
faolyatining oqibatlari
asosiy adabiyotlar
fakulteti ahborot
ahborot havfsizligi
havfsizligi kafedrasi
fanidan bo’yicha
fakulteti iqtisodiyot
boshqaruv fakulteti
chiqarishda boshqaruv
ishlab chiqarishda
iqtisodiyot fakultet
multiservis tarmoqlari
fanidan asosiy
Uzbek fanidan
mavzulari potok
asosidagi multiservis
'aliyyil a'ziym
billahil 'aliyyil
illaa billahil
quvvata illaa
falah' deganida
Kompyuter savodxonligi
bo’yicha mustaqil
'alal falah'
Hayya 'alal
'alas soloh
Hayya 'alas
mavsum boyicha


yuklab olish