clientunit.h

Direct Oracle Access 非常好的Oracle数据库直接访问组件包 支持个版本的Delphi及C++ Builder 有源码

//---------------------------------------------------------------------------
#ifndef ClientUnitH
#define ClientUnitH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <Db.hpp>
#include <DBClient.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <ExtCtrls.hpp>
#include <Grids.hpp>
#include "ReconcileUnit.h"
#include <MConnect.hpp>
#include <MidasCon.hpp>
#include <DB.hpp>
//---------------------------------------------------------------------------
class TMainForm : public TForm
{
__published:	// IDE-managed Components
    TClientDataSet *DeptClientDataSet;
    TDataSource *DeptDataSource;
    TClientDataSet *EmpClientDataSet;
    TDataSource *EmpDataSource;
    TPanel *DeptPanel;
    TPanel *DeptTopPanel;
    TSpeedButton *DeptApplyBtn;
    TSpeedButton *DeptCancelBtn;
    TDBNavigator *DeptDBNavigator;
    TDBGrid *DeptDBGrid;
    TPanel *EmpPanel;
    TPanel *EmpTopPanel;
    TDBNavigator *EmpDBNavigator;
    TDBGrid *EmpDBGrid;
    TStatusBar *StatusBar;
        TIntegerField *DeptClientDataSetDEPTNO;
        TStringField *DeptClientDataSetDNAME;
        TStringField *DeptClientDataSetLOC;
        TDataSetField *DeptClientDataSetEmpDataSet;
        TIntegerField *EmpClientDataSetEMPNO;
        TStringField *EmpClientDataSetENAME;
        TStringField *EmpClientDataSetJOB;
        TIntegerField *EmpClientDataSetMGR;
        TDateTimeField *EmpClientDataSetHIREDATE;
        TFloatField *EmpClientDataSetSAL;
        TFloatField *EmpClientDataSetCOMM;
        TIntegerField *EmpClientDataSetDEPTNO;
        TDCOMConnection *DCOMConnection;
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall DeptApplyBtnClick(TObject *Sender);
    void __fastcall DeptCancelBtnClick(TObject *Sender);
        void __fastcall EmpClientDataSetNewRecord(TDataSet *DataSet);
        void __fastcall DeptClientDataSetReconcileError(
          TCustomClientDataSet *DataSet, EReconcileError *E,
          TUpdateKind UpdateKind, TReconcileAction &Action);
        void __fastcall EmpClientDataSetReconcileError(
          TCustomClientDataSet *DataSet, EReconcileError *E,
          TUpdateKind UpdateKind, TReconcileAction &Action);
private:	// User declarations
public:		// User declarations
    __fastcall TMainForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMainForm *MainForm;
//---------------------------------------------------------------------------
#endif