ILOVA
#include
#pragma hdrstop
#include "Unit7.h"
#include "Unit4.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm7 *Form7;
//---------------------------------------------------------------------------
__fastcall TForm7::TForm7(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm7::Button1Click(TObject *Sender)
{
String log=Edit1->Text;
String par=Edit2->Text;
if ((log=="asadbek") && (par=="09091998")) {
Form4->Show();
Close();
Edit1->Clear();
Edit2->Clear();
}
else
{
MessageDlg("Login yoki parol xato!!!", mtError, mbOKCancel, 0);
}
}
//---------------------------------------------------------------------------
void __fastcall TForm7::BitBtn1Click(TObject *Sender)
Do'stlaringiz bilan baham: |