📄 password.cpp
字号:
#define HIS
#include"../ClassHead/User.hpp"
#include"../ClassHead/BaseClass.hpp"
#include"../ClassHead/hospitalize.hpp"
#include"Card.h"
#include"Cost.h"
#include"ShopHelp.h"
#include"Student.h"
#include"DispensaryManage.h"
#include"SysManage.h"
#include"PassWord.h"
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
User*currentUser=NULL;
const unsigned MedNum=20;
void HISQuery(TQuery*qPtr,String&sql,bool returnRe)
{
qPtr->Close();
qPtr->SQL->Text=sql;
if(returnRe)qPtr->Open();
else qPtr->ExecSQL();
}
void logout(User*u,TForm*form,TQuery*query)
{
u->setEndTime();
String st=u->getStartTime().TimeString(),et=u->getEndTime().TimeString();
String id=u->getEmpID();
String sql,sd=Now().CurrentDate();
sql="update UserK set useDate='"+sd+"',startTime='"+st+"',endTime='"+et;
sql=sql+"'where userName='"+u->getUserName()+"'";
HISQuery(query,sql,false);
sql="insert into Employee(empID,inTime,outTime,useTime) values('"+id+"','"+st+"','"+et+"','"+sd+"')";
HISQuery(query,sql,false);
ShowMessage("开始工作时间:"+st+",结束时间:"+et);
form->Visible=false;
delete currentUser;currentUser=NULL;
Application->MainForm->Visible=true;
}
TPassWordForm *PassWordForm;
//---------------------------------------------------------------------------
__fastcall TPassWordForm::TPassWordForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TPassWordForm::BitBtn1Click(TObject *Sender)
{
String sql,s1=LabeledEdit1->Text,s2=LabeledEdit2->Text,s3;
unsigned id;
if(s1!=""&&s2!="")
{
sql="select*from UserK where userName='"+s1+"'and userPass='"+s2+"'";
Query1->Close();Query1->SQL->Clear();
Query1->SQL->Add(sql);Query1->Open();
if(Query1->IsEmpty())
{ShowMessage("对不起,您没有被授权,不能使用!");}
else
{s3=Query1->FieldByName("delFlag")->AsString;
if(s3=="1")
{ShowMessage("对不起,您的使用权已被撤销!");}
else
{
unsigned sEmpID=Query1->FieldByName("empID")->AsInteger;
String sName=Query1->FieldByName("name")->AsString;
String sUserType=Query1->FieldByName("userType")->AsString;
currentUser=new User(sEmpID,sName,s1,s2,sUserType,false);
currentUser->getStartTime();
switch(sUserType[1])
{
case '1':StudentForm->Visible=true;break;
case '2':CardForm->Visible=true;break;
case '3':CostForm->Visible=true;break;
case '4':ShopHelpForm->Visible=true;break;
case '5':DispensaryManageForm->Visible=true;break;
case '6':SysManageForm->Visible=true;break;
}
this->Visible=false;
}
}
}
else
{ShowMessage("请输入用户名和口令!");}
}
//---------------------------------------------------------------------------
void __fastcall TPassWordForm::BitBtn2Click(TObject *Sender)
{
LabeledEdit1->Text="";LabeledEdit2->Text="";
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -