udatabase.cpp

AbsDataBase5.16 最新版

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "uDatabase.h"
#include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmDatabase *frmDatabase;
//---------------------------------------------------------------------------
__fastcall TfrmDatabase::TfrmDatabase(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmDatabase::FormShow(TObject *Sender)
{
  ePassword1->Text = frmMain->db->Password;
  ePassword2->Text = frmMain->db->Password;
  cbCryptoAgorithm->ItemIndex = Integer(frmMain->db->CryptoAlgorithm);
}
//---------------------------------------------------------------------------
void __fastcall TfrmDatabase::FormCloseQuery(TObject *Sender,
      bool &CanClose)
{
 if ((ModalResult == mrOk) && (ePassword1->Text != ePassword2->Text)) {
   CanClose = False;
   MessageDlg("Password and Confirm password are not equal", mtError,TMsgDlgButtons()<<mbOK, 0);
  }

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