ucreatedb.h

自动附加SQL数据库,创建登录用户,使用简单方便,功能实用性强

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

#ifndef uCreateDBH
#define uCreateDBH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Buttons.hpp>
#include <Dialogs.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <Registry.hpp>

#define BUILD_SQL(Query, SQLString) \
  { \
    Query->Close();                   \
    Query->SQL->Clear();              \
    Query->SQL->Add(SQLString); \
  }
#define SET_PARM(Query, Name, Data) \
  Query->Parameters->ParamByName(Name)->Value = Data
//---------------------------------------------------------------------------
class TfrmCreateDB : public TForm
{
__published:	// IDE-managed Components
        TPanel *Panel1;
        TGroupBox *GroupBox1;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label5;
        TEdit *edtServer;
        TEdit *edtDefDB;
        TEdit *edtUser;
        TEdit *edtPwd;
        TPanel *Panel2;
        TCheckBox *ckDefault;
        TBitBtn *bbtnCheckConn;
        TBitBtn *bbtnSaveInfo;
        TGroupBox *GroupBox2;
        TEdit *edtMDF;
        TEdit *edtLDF;
        TSpeedButton *sbtnMDF;
        TLabel *Label6;
        TEdit *edtDBName;
        TBitBtn *bbtnAddDB;
        TOpenDialog *OpenDialog1;
        TGroupBox *GroupBox3;
        TLabel *Label7;
        TComboBox *cbDBList;
        TBitBtn *bbtnRefresh;
        TLabel *Label8;
        TLabel *Label9;
        TEdit *edtAddUser;
        TEdit *edtAddPwd;
        TBitBtn *bbtnAddUser;
        TLabel *Label10;
        TADOConnection *ADOConn;
        TADOQuery *qryPublic;
        TLabel *Label11;
        TLabel *Label12;
        TSpeedButton *sbtnLDF;
        void __fastcall bbtnRefreshClick(TObject *Sender);
        void __fastcall bbtnCheckConnClick(TObject *Sender);
        void __fastcall ckDefaultClick(TObject *Sender);
        void __fastcall sbtnMDFClick(TObject *Sender);
        void __fastcall bbtnAddDBClick(TObject *Sender);
        void __fastcall sbtnLDFClick(TObject *Sender);
        void __fastcall bbtnAddUserClick(TObject *Sender);
private:	// User declarations
public:		// User declarations
        __fastcall TfrmCreateDB(TComponent* Owner);
        TIniFile *ini;
        AnsiString strSQL;
        AnsiString strServer;//服务器名或IP
        AnsiString strDB;//数据库名
        AnsiString strUser;//用户名
        AnsiString strPwd;//密码
        AnsiString strConnectString;
        bool bIsConn;
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmCreateDB *frmCreateDB;
//---------------------------------------------------------------------------
#endif