welcome.cpp

使用C++Builder开发的常住人口管理系统

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

#include <vcl.h>
#pragma hdrstop

#include "welcome.h"
#include "UnitMainForm.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmLogin *frmLogin;
//---------------------------------------------------------------------------
__fastcall TfrmLogin::TfrmLogin(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmLogin::FormCreate(TObject *Sender)
{
 edtDengLuID->Text="GUEST";
 edtDengLuID->Enabled=false;
 edtDengLuMiMa->Enabled=false;
 edtDengLuMiMa->Text="123456";
 butDengLu->Caption="普通用户登陆";
}
//---------------------------------------------------------------------------
void __fastcall TfrmLogin::comBxDengLuLeiXingChange(TObject *Sender)
{
 butDengLu->Caption=comBxDengLuLeiXing->Items->Strings[comBxDengLuLeiXing->ItemIndex];
 if(comBxDengLuLeiXing->ItemIndex)
 {
   edtDengLuID->Text="";
   edtDengLuMiMa->Text="";
   edtDengLuID->Enabled=true;
   edtDengLuMiMa->Enabled=true;
 }
 else
 {
  edtDengLuID->Text="GUEST";
  edtDengLuMiMa->Text="123456";
  edtDengLuID->Enabled=false;
  edtDengLuMiMa->Enabled=false;
 }
}
//---------------------------------------------------------------------------

void __fastcall TfrmLogin::butDengLuClick(TObject *Sender)
{
   
  if (comBxDengLuLeiXing->ItemIndex==1)
  {

      if(edtDengLuID->Text==""||edtDengLuMiMa->Text=="")
      {
          ShowMessage("管理员用户名或密码不能为空！");
          return ;
      }

      FILE *fp;
      if((fp=fopen("admin.db","rb+"))==NULL)  //不存在则新建一个
      {
        if((fp=fopen("admin.db","wb+"))==NULL)
        {
           ShowMessage("创建文件失败！！");
           return ;
        }

        Manager *Adm=new Manager ;       //管理员首次登陆就创建“密码”文件
        AnsiString AdmName,Admpass;
        AdmName="manager";
        Admpass="123456";
        strcpy(Adm->username,AdmName.c_str());
        strcpy(Adm->password,Admpass.c_str());
        fwrite(Adm,sizeof(Manager),1,fp);
        //ShowMessage("您使用的是原始密码，请尽快修改！");
        delete Adm;
      }

       //判断登陆
        fseek(fp,0,0);
        Manager *Adm= new Manager;
        while(1)
        {
           if(fread(Adm,sizeof(Manager),1,fp)!=1)
           {
              ShowMessage("用户名或密码错误！");
              edtDengLuID->Text="";
              edtDengLuMiMa->Text="";
              break;
           }
           if(strcmp(edtDengLuID->Text.c_str(),Adm->username)==0 && strcmp(edtDengLuMiMa->Text.c_str(),Adm->password)==0)
           {
             if(edtDengLuMiMa->Text=="123456")
                ShowMessage("您使用的是原始密码，请尽快修改！");
             frmLogin->Visible=false;
             edtDengLuID->Text="";
             edtDengLuMiMa->Text="";
             ///MainForm->Show();
             //ShowMessage("下面进入主窗体，但是我的兄弟还没有写呢^o^");
             Admin=true;
             frmMain->btnCZRYJLAdd->Enabled=true;
             frmMain->btnQCRYJLAdd->Enabled=true;
             frmMain->btnSWRYJLAdd->Enabled=true;
             frmMain->btnZZZAdd->Enabled=true;
             frmMain->btnZFTFAdd->Enabled=true;
             frmMain->btnSure->Enabled=true;
             frmMain->btnGLAdd->Enabled=true;
             frmMain->btnCRChange->Enabled=true;
             frmMain->Show();
             break;
           }
       }
      delete Adm;
      fclose(fp);
  }
  else
  {
     Admin=false;

     frmMain->btnCZRYJLAdd->Enabled=false;
     frmMain->btnQCRYJLAdd->Enabled=false;
     frmMain->btnSWRYJLAdd->Enabled=false;
     frmMain->btnZZZAdd->Enabled=false;
     frmMain->btnZFTFAdd->Enabled=false;
     frmMain->btnSure->Enabled=false;
     frmMain->btnGLAdd->Enabled=false;
     frmMain->btnCRChange->Enabled=false;
     
     //ShowMessage("下面进入主窗体，但是我的兄弟还没有写呢^o^");
     frmLogin->Visible=false;
     frmMain->Show();
  }

  //frmLogin->Close();

}
//---------------------------------------------------------------------------