student.cpp

校园刷卡系统

#include"PassWord.h"
#include"Query1_0.h"

#ifndef HIS
#include"../ClassHead/User.hpp"
#include"../ClassHead/Hospitalize.hpp"
#endif

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

#include <vcl.h>
#pragma hdrstop

#include "Student.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"


extern void HISQuery(TQuery*qPtr,String&s,bool b);
extern void logout(User*u,TForm*form,TQuery*query);
extern User*currentUser;

static Student currEmp;
static int recordNo;
static int StuSum=0;

static TQueryForm1_0* QForm0=NULL;

bool isInteger(AnsiString str,bool minus)
{
bool b=false;
str=str.TrimLeft().TrimRight();
if(!str.IsEmpty())
{
int i=1,l=str.Length();
char c;
if(str[1]=='-'&&l>1&&minus==true)
{i=2;}
while(i<=l)
{
c=str[i];
if(c>47&&c<58)++i;
else break;
}
if(i>l)b=true;
}
return b;
}

static void ClearPage2(TStudentForm*fp)
{
 fp->LabeledEdit1->Text="";
 fp->LabeledEdit2->Text="";
 fp->LabeledEdit3->Text="";
 fp->LabeledEdit4->Text="";
 fp->sex->ItemIndex=0;
}

TStudentForm *StudentForm;
//---------------------------------------------------------------------------
__fastcall TStudentForm::TStudentForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------


void __fastcall TStudentForm::FormCreate(TObject *Sender)
{
QForm0=new TQueryForm1_0(this);
}

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

void __fastcall TStudentForm::FormActivate(TObject *Sender)
{
currentUser->setStartTime();
if(currEmp.getEmpID()==0)
{
String name=currentUser->getName();
currEmp.setData(currentUser->getEmpID(),name);
showname->Caption=IntToStr(currentUser->getEmpID())+" "+name;
}
String sql="select Max(schoolID) from Student",s;
HISQuery(Query1,sql,true);
s=Query1->Fields->Fields[0]->FieldName;
StuSum=Query1->FieldByName(s)->AsInteger;
LabeledEdit1->Text=StuSum+1;
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::RadioGroup1Click(TObject *Sender)
{
recordNo=DBGrid1->DataSource->DataSet->RecNo;
int choice=RadioGroup1->ItemIndex;

if(choice==1)
{DBNavigator1->VisibleButtons=TButtonSet()<<nbPost<<nbCancel;}
else
{
DBGrid1->ReadOnly=true;
DBNavigator1->VisibleButtons=TButtonSet()<<nbFirst<<nbPrior<<nbNext<<nbLast;
switch(choice)
{
case 0:
       PageControl1->ActivePage=TabSheet2;
       break;
case 2:DBNavigator1->BtnClick(nbDelete);
       break;
case 3:ClearPage2(this);
       break;
}
}
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::DBNavigator1Click(TObject *Sender,
      TNavigateBtn Button)
{
if(Button==nbPost)
{RadioGroup1->ItemIndex=-1;}
DBGrid1->ReadOnly=true;
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::DBGrid1CellClick(TColumn *Column)
{
int index=RadioGroup1->ItemIndex,recNo=DBGrid1->DataSource->DataSet->RecNo;
if(index==1&&recNo==recordNo)
{DBGrid1->ReadOnly=false;}
else
{DBGrid1->ReadOnly=true;}
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::Button2Click(TObject *Sender)
{
if(isInteger(LabeledEdit1->Text,false))
{String s1=LabeledEdit1->Text,s2=LabeledEdit2->Text,s3=LabeledEdit3->Text,s4=LabeledEdit4->Text;
String sql,valStr,sexStr="";
int sameName=0;
if(s1!=""&&s2!="")
{
sql="select schoolID from Student";
HISQuery(Query1,sql,true);
while(!Query1->Eof)
{
if(s1==Query1->FieldByName("schoolID")->AsString)
{sameName=1;break;}
else Query1->Next();
}
if(sameName==0)
{
if(isInteger(LabeledEdit3->Text,false)&&isInteger(LabeledEdit3->Text,false))
{
sexStr=sex->Text;
valStr=s1+",'"+s2+"','"+sexStr+"','"+s3+"','"+s4+"')";
sql="insert into Student(schoolID,name,sex,id,phone)values("+valStr;
HISQuery(Query1,sql,false);
Table1->Active=false;
Table1->Active=true;
{ShowMessage("新增学生完成！");}
ClearPage2(this);
++StuSum;
LabeledEdit1->Text=StuSum+1;
}
else
{ShowMessage("身份证号或联系电话不为整型数，请更改！");}
}
else
{ShowMessage("该学号已存在，清换名！");}
}
else
{ShowMessage("学号，姓名不能为空！");}
}
else
{ShowMessage("学号非法，必须是整型数！");}
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::N4Click(TObject *Sender)
{
logout(currentUser,this,PassWordForm->Query1);
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::N6Click(TObject *Sender)
{
PassWordForm->Close();
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::N7Click(TObject *Sender)
{
ShowMessage("开始工作时间："+currentUser->getStartTime().TimeString());
}
//---------------------------------------------------------------------------



void __fastcall TStudentForm::Timer1Timer(TObject *Sender)
{
showtime->Caption=Now().CurrentDateTime();
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::N12Click(TObject *Sender)
{
QForm0->Show();
}
//---------------------------------------------------------------------------



void __fastcall TStudentForm::N10Click(TObject *Sender)
{
Application->HelpContext(2);
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::N11Click(TObject *Sender)
{
Application->HelpContext(3);
}
//---------------------------------------------------------------------------


void __fastcall TStudentForm::N13Click(TObject *Sender)
{
Application->HelpContext(4);
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::N14Click(TObject *Sender)
{
Application->HelpContext(5);
}
//---------------------------------------------------------------------------

void __fastcall TStudentForm::N16Click(TObject *Sender)
{
Application->HelpContext(27);
}
//---------------------------------------------------------------------------