Kommunikatsiyalarini rivojlanshtirish vazirligi muxammad al-xorazmiy nomidagi toshkent axborot texnologiyalari universiteti




Download 0.96 Mb.
Pdf ko'rish
bet12/12
Sana25.11.2022
Hajmi0.96 Mb.
#31780
1   ...   4   5   6   7   8   9   10   11   12
Bog'liq
loyiha ishi 2 cmestir
15, баён кирилда, Samatov, SHAMSIDDINOV ISAQJON, KT Laboratoriya ishi 4, 4-7-lab S.T, Заголовок отчета, mobiledan manga tushga test, add, 4 Amaliy ish Operatsion tizimda Windows OT parolga asoslangan autentifikatsiya, 4.10, Fizika” fani bo’yicha, Ulugʻbek.M Akademik yozuv Reklama matni mustaqil ta\'lim 2, 1-Amaliyot ishi
ILOVA 
Form2 dagi kodlar 
//--------------------------------------------------------------------------- 
 
#include  
#pragma hdrstop 
 
#include "Unit2.h" 
#include "Unit1.h" 
#include "Unit3.h" 
#include "Unit4.h" 
#include "Unit5.h" 
#include "Unit9.h" 
#include "Unit8.h" 
#include "Unit7.h" 
#include "Unit6.h" 
#include "Unit12.h" 
#include "Unit11.h" 
#include "Unit10.h" 
#include "Unit13.h" 
#include "Unit14.h" 
#include "Unit15.h" 
#include "Unit16.h" 
#include "Unit17.h" 
#include "Unit18.h" 
#include "Unit19.h" 
#include "Unit20.h" 
#include "Unit21.h" 
#include "Unit22.h" 


#include "Unit23.h" 
#include "Unit24.h" 
#include "Unit25.h" 
#include "Unit26.h" 
//--------------------------------------------------------------------------- 
#pragma package(smart_init) 
#pragma resource "*.dfm" 
TForm2 *Form2; 
//--------------------------------------------------------------------------- 
__fastcall TForm2::TForm2(TComponent* Owner) 
: TForm(Owner) 


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

Form1->Show(); 
Close(); 

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

Form3->Show(); 
Form2->Hide(); 

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

String a=InputBox("Avtokorxona xodimlariga","Parolni kiriting",""); 
int b=StrToInt(a); 


if(b==7777) 

Form4->Show(); 
Form2->Hide(); 

else { 
ShowMessage("Parol xato"); 
 


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

Form5->Show(); 
Form2->Hide(); 

//--------------------------------------------------------------------------- 
 
Form30 dagi kodlar 
//--------------------------------------------------------------------------- 
 
#include  
#pragma hdrstop 
 
#include "Unit30.h" 
#include "Unit1.h" 
#include "Unit10.h" 
#include "Unit11.h" 
#include "Unit12.h" 
#include "Unit13.h" 


#include "Unit14.h" 
#include "Unit15.h" 
#include "Unit16.h" 
#include "Unit17.h" 
#include "Unit18.h" 
#include "Unit19.h" 
#include "Unit2.h" 
#include "Unit20.h" 
#include "Unit21.h" 
#include "Unit22.h" 
#include "Unit23.h" 
#include "Unit24.h" 
#include "Unit25.h" 
#include "Unit26.h" 
#include "Unit27.h" 
#include "Unit28.h" 
#include "Unit29.h" 
#include "Unit3.h" 
#include "Unit4.h" 
#include "Unit5.h" 
#include "Unit6.h" 
#include "Unit7.h" 
#include "Unit8.h" 
#include "Unit9.h" 
//--------------------------------------------------------------------------- 
#pragma package(smart_init) 
#pragma resource "*.dfm" 
TForm30 *Form30; 
//--------------------------------------------------------------------------- 
__fastcall TForm30::TForm30(TComponent* Owner) 


: TForm(Owner) 


//--------------------------------------------------------------------------- 
void __fastcall TForm30::RadioGroup1Click(TObject *Sender) 

if(RadioGroup1->ItemIndex==0) 

ComboBox1->Visible=true; 
ComboBox2->Visible=false; 
ComboBox3->Visible=false; 

if(RadioGroup1->ItemIndex==1) 

ComboBox1->Visible=false; 
ComboBox2->Visible=true; 
ComboBox3->Visible=false; 

if(RadioGroup1->ItemIndex==2) 

ComboBox1->Visible=false; 
ComboBox2->Visible=false; 
ComboBox3->Visible=true; 


//--------------------------------------------------------------------------- 
void __fastcall TForm30::Button1Click(TObject *Sender) 

 
 


int a=StrToInt(Edit2->Text); 
if(a==0) 

ShowMessage("Avtobus bekatda"); 

else 

a=a%10; 
a=10-a; 
Label3->Visible=true; 
Label3->Caption="Avtobus "+IntToStr(a)+" minutdan so'ng bekatga 
yetib keladi"; 
 


//--------------------------------------------------------------------------- 
void __fastcall TForm30::ComboBox1Change(TObject *Sender) 

Label1->Visible=true; 
Label2->Visible=true; 
Edit1->Visible=true; 
Edit2->Visible=true; 
Button1->Visible=true; 

//--------------------------------------------------------------------------- 
void __fastcall TForm30::ComboBox2Change(TObject *Sender) 

Label1->Visible=true; 
Label2->Visible=true; 
Edit1->Visible=true; 


Edit2->Visible=true; 
Button1->Visible=true; 

//--------------------------------------------------------------------------- 
void __fastcall TForm30::ComboBox3Change(TObject *Sender) 

Label1->Visible=true; 
Label2->Visible=true; 
Edit1->Visible=true; 
Edit2->Visible=true; 
Button1->Visible=true; 

//--------------------------------------------------------------------------- 
void __fastcall TForm30::Button2Click(TObject *Sender) 

Form2->Show(); 
Close(); 

//--------------------------------------------------------------------------- 
 
Form4 dagi kodlar 
//--------------------------------------------------------------------------- 
 
#include  
#pragma hdrstop 
 
#include "Unit4.h" 
#include "Unit2.h" 
#include "Unit9.h" 
#include "Unit10.h" 


#include "Unit8.h" 
#include "Unit1.h" 
#include "Unit11.h" 
#include "Unit12.h" 
#include "Unit13.h" 
#include "Unit14.h" 
#include "Unit15.h" 
#include "Unit3.h" 
#include "Unit5.h" 
#include "Unit6.h" 
#include "Unit7.h" 
#include "Unit16.h" 
#include "Unit17.h" 
#include "Unit18.h" 
#include "Unit19.h" 
#include "Unit20.h" 
#include "Unit21.h" 
#include "Unit22.h" 
#include "Unit23.h" 
#include "Unit24.h" 
#include "Unit25.h" 
#include "Unit26.h" 
#include "Unit27.h" 
#include "Unit28.h" 
#include "Unit29.h" 
//--------------------------------------------------------------------------- 
#pragma package(smart_init) 
#pragma resource "*.dfm" 
TForm4 *Form4; 
//--------------------------------------------------------------------------- 


__fastcall TForm4::TForm4(TComponent* Owner) 
: TForm(Owner) 


//--------------------------------------------------------------------------- 
void __fastcall TForm4::Button6Click(TObject *Sender) 

Form2->Show(); 
Close(); 

//--------------------------------------------------------------------------- 
void __fastcall TForm4::Button2Click(TObject *Sender) 

Form10->Show(); 
Form4->Hide(); 
Form10->Edit1->Text=""; 
Form10->Edit2->Text=""; 

//--------------------------------------------------------------------------- 
 
void __fastcall TForm4::Button1Click(TObject *Sender) 

Form9->Show(); 
Form4->Hide(); 
 

//--------------------------------------------------------------------------- 
 
void __fastcall TForm4::Button3Click(TObject *Sender) 



String a=InputBox("Kadrlar bo'limiga","Parolni kiriting",""); 
int b=StrToInt(a); 
if(b==6666) 

Form20->Show(); 
Form4->Hide(); 

else { 
ShowMessage("Parol xato"); 

 
 

//--------------------------------------------------------------------------- 
 
void __fastcall TForm4::Button5Click(TObject *Sender) 

Form27->Show(); 
Form4->Hide(); 

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

Download 0.96 Mb.
1   ...   4   5   6   7   8   9   10   11   12




Download 0.96 Mb.
Pdf ko'rish

Bosh sahifa
Aloqalar

    Bosh sahifa



Kommunikatsiyalarini rivojlanshtirish vazirligi muxammad al-xorazmiy nomidagi toshkent axborot texnologiyalari universiteti

Download 0.96 Mb.
Pdf ko'rish