databaseconnectunit.h

来自「指纹门禁机管理系统」· C头文件 代码 · 共 60 行

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

#ifndef DatabaseConnectUnitH
#define DatabaseConnectUnitH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "BaseInputUnit.h"
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
#include "DBConfigInfoUnit.h"
#include <Dialogs.hpp>
//---------------------------------------------------------------------------
class TDatabaseConnectFrm : public TBaseDataInputFrm
{
__published:	// IDE-managed Components
        TImage *Image1;
        TEdit *edtHostName;
        TLabel *Label1;
        TEdit *edtDatabaseName;
        TEdit *edtPassword;
        TLabel *Label2;
        TEdit *edtUserName;
        TTabSheet *tsDBFile;
        TStaticText *StaticText3;
        TEdit *edtDBFileName;
        TPanel *Panel2;
        TRadioButton *rbSQLDB;
        TRadioButton *rbOracleDB;
        TRadioButton *rbAccessDB;
        TSpeedButton *spbnFileName;
        TOpenDialog *odOpenFile;
    TLabel *Label3;
    TLabel *Label4;
        void __fastcall bbtnOKClick(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormDestroy(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall rbAccessDBClick(TObject *Sender);
        void __fastcall rbSQLDBClick(TObject *Sender);
        void __fastcall rbOracleDBClick(TObject *Sender);
        void __fastcall spbnFileNameClick(TObject *Sender);
private:	// User declarations
    AnsiString ConfigFileName;
    TConfigInfoXML* pDbConfig;
    bool CheckInputInfo();
    void SetFaceValue();
    void __fastcall TryConnectDB();
public:		// User declarations
        __fastcall TDatabaseConnectFrm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TDatabaseConnectFrm *DatabaseConnectFrm;
//---------------------------------------------------------------------------
#endif