unitmain.h

通过oci实现的oracle查询分析器功能和可以 尤其对BLOB字段的度曲

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

#ifndef UnitmainH
#define UnitmainH
#include <inifiles.hpp>
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <Buttons.hpp>
#include <ExtCtrls.hpp>
#include <inifiles.hpp>
#include <Dialogs.hpp>
#include "CSPIN.h"
#include <jpeg.hpp>
#include <Menus.hpp>
#include "OciDbClass.h"
#include <Grids.hpp>
#include <ImgList.hpp>
#include <ExtDlgs.hpp>
#include <FileCtrl.hpp>
//---------------------------------------------------------------------------
class TFormmain : public TForm
{
__published:	// IDE-managed Components
        TPageControl *PageControl1;
        TStatusBar *StatusBar1;
        TOpenDialog *OpenDialog1;
        TSaveDialog *SaveDialog3;
        TPopupMenu *PopupMenu2;
        TMenuItem *N2;
        TMainMenu *MainMenu1;
        TMenuItem *N3;
        TMenuItem *N4;
        TMenuItem *N5;
        TPanel *Panel1;
        TSplitter *Splitter2;
        TPanel *Panel2;
        TRichEdit *RichEdit1;
        TPanel *Panel3;
        TSpeedButton *SpeedButton3;
        TSpeedButton *SpeedButton8;
        TSpeedButton *SpeedButton9;
        TSpeedButton *SpeedButton2;
        TStringGrid *StringGrid2;
        TTreeView *TreeView1;
        TSplitter *Splitter1;
        TMenuItem *N6;
        TMenuItem *N7;
        TMemo *Memo1;
        TImageList *ImageList1;
        TCSpinEdit *CSpinEdit1;
        TMenuItem *N1;
        TMenuItem *N8;
        TMenuItem *N9;
        TPopupMenu *PopupMenu1;
        TMenuItem *N10;
        TPopupMenu *PopupMenu3;
        TMenuItem *N11;
        TPanel *Panel4;
        TImage *Image1;
        TMenuItem *hhh1;
        TOpenPictureDialog *OpenPictureDialog1;
        TFileListBox *FileListBox1;
        void __fastcall SpeedButton1Click(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall SpeedButton3Click(TObject *Sender);
        void __fastcall SpeedButton2Click(TObject *Sender);
        void __fastcall RichEdit1DragDrop(TObject *Sender, TObject *Source,
          int X, int Y);
        void __fastcall RichEdit1DragOver(TObject *Sender, TObject *Source,
          int X, int Y, TDragState State, bool &Accept);
        void __fastcall StringGrid2DrawCell(TObject *Sender, int ACol,
          int ARow, TRect &Rect, TGridDrawState State);
        void __fastcall SpeedButton6Click(TObject *Sender);
        void __fastcall SpeedButton7Click(TObject *Sender);
        void __fastcall BitBtn3Click(TObject *Sender);
        void __fastcall BitBtn8Click(TObject *Sender);
        void __fastcall SpeedButton9Click(TObject *Sender);
        void __fastcall SpeedButton8Click(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall RichEdit1Change(TObject *Sender);
        void __fastcall wls(TObject *Sender);
        void __fastcall PopupMenu2Popup(TObject *Sender);
        void __fastcall N2Click(TObject *Sender);
        void __fastcall FormActivate(TObject *Sender);
        void __fastcall N4Click(TObject *Sender);
        void __fastcall N5Click(TObject *Sender);
        void __fastcall N7Click(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall Panel1Resize(TObject *Sender);
        void __fastcall N8Click(TObject *Sender);
        void __fastcall N1Click(TObject *Sender);
        void __fastcall N9Click(TObject *Sender);
        void __fastcall PopupMenu1Popup(TObject *Sender);
        void __fastcall N10Click(TObject *Sender);
        void __fastcall StringGrid2SelectCell(TObject *Sender, int ACol,
          int ARow, bool &CanSelect);
        void __fastcall FormDestroy(TObject *Sender);
        void __fastcall N11Click(TObject *Sender);
        void __fastcall Panel4MouseMove(TObject *Sender, TShiftState Shift,
          int X, int Y);
        void __fastcall hhh1Click(TObject *Sender);
private:	// User declarations
     TStringList *hs ;
     TStringList *ys;
     TStringList *blobc;
     AnsiString txjb;
     int  rowiddz,txcolid;
     AnsiString jb,jbsql;
     DATABASEHANDLE        TXDBHandle;
     TOCIQuery * Querytx;
public:		// User declarations
          int                    status;
          TStringList *jbjg;
          TStringList *jbm;
          OCIDatabase           *DBDatabase;
          AnsiString Connectedfw,Connectedyh,Connectedmm;
          Boolean DataConnected,sqljstj,Dataoutjg,tz;
        __fastcall TFormmain(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormmain *Formmain;
//---------------------------------------------------------------------------
#endif