studentunit1.cpp

学生管理系统

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

#include <vcl.h>
#pragma hdrstop

#include "StudentUnit1.h"
#include "StudentUnit2.h"      //++
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Label2Click(TObject *Sender)
{
 Form2->ShowModal();   //++
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Label3Click(TObject *Sender)
{
 Close();                  //++
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
{
if(MessageDlg("退出?",mtConfirmation,TMsgDlgButtons() << mbOK << mbCancel,0)==mrCancel)
  CanClose = false;        
}
//---------------------------------------------------------------------------