passunit.cpp

网吧电脑游戏升级系统

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

#include <vcl.h>
#pragma hdrstop

#include "PassUnit.h"
#include "MainUnit.h"
#include "stdio.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TPassForm *PassForm;
//---------------------------------------------------------------------------
__fastcall TPassForm::TPassForm(TComponent* Owner)
    : TForm(Owner)
{
    PassForm->ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TPassForm::BBOKClick(TObject *Sender)
{
    if(!strcmp(MainForm->sSysPass.c_str(),PassForm->MaskEdit->Text.c_str() ))
    {
        MainForm->iPassSuccess=1;
        PassForm->Close();
    }
    else
    {
        Application->MessageBox("你的秘密错误！密码验证失败！","错误",MB_OK | MB_ICONERROR);
    }
}
//---------------------------------------------------------------------------
void __fastcall TPassForm::FormShow(TObject *Sender)
{
    MaskEdit->Text="";
    MaskEdit->SetFocus();
}
//---------------------------------------------------------------------------

void __fastcall TPassForm::BBCancelClick(TObject *Sender)
{
        PassForm->Close();
}
//---------------------------------------------------------------------------