⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dbaware.h

📁 rx library V2.7.7a component use in delphi7 to delphi 2006
💻 H
字号:
//---------------------------------------------------------------------------
#ifndef DBAwareH
#define DBAwareH
//---------------------------------------------------------------------------
#include <vcl\Classes.hpp>
#include <vcl\Controls.hpp>
#include <vcl\StdCtrls.hpp>
#include <vcl\Forms.hpp>
#include "Placemnt.hpp"
#include "PicClip.hpp"
#include <vcl\DB.hpp>
#include "RxQuery.hpp"
#include <vcl\DBTables.hpp>
#include "DBFilter.hpp"
#include "DBQBE.hpp"
#include <vcl\Tabnotbk.hpp>
#include <vcl\ComCtrls.hpp>
#include "RXDBCtrl.hpp"
#include <vcl\DBGrids.hpp>
#include "Grids.hpp"
#include <vcl\ExtCtrls.hpp>
#include <vcl\DBCtrls.hpp>
#include <vcl\Mask.hpp>
#include "RXLookup.hpp"
#include "DBIndex.hpp"
#include "DBUtils.hpp"
#include "BdeUtils.hpp"
#include <vcl\Buttons.hpp>
#include "RXCtrls.hpp"
//---------------------------------------------------------------------------
class TDBAwareForm : public TForm
{
__published:	// IDE-managed Components
        TFormStorage *FormStorage1;
        TPicClip *PicClip;
        TDataSource *DataSource5;
        TRxQuery *rxQuery1;
        TFloatField *rxQuery1OrderNo;
        TDateTimeField *rxQuery1SaleDate;
        TStringField *rxQuery1Company;
        TFloatField *rxQuery1CustNo;
        TDateTimeField *rxQuery1ShipDate;
        TStringField *rxQuery1ShipToContact;
        TStringField *rxQuery1ShipToAddr1;
        TStringField *rxQuery1ShipToAddr2;
        TStringField *rxQuery1ShipToCity;
        TStringField *rxQuery1ShipToState;
        TStringField *rxQuery1ShipToZip;
        TStringField *rxQuery1ShipToCountry;
        TStringField *rxQuery1ShipToPhone;
        TStringField *rxQuery1ShipVIA;
        TStringField *rxQuery1PO;
        TStringField *rxQuery1Terms;
        TStringField *rxQuery1PaymentMethod;
        TCurrencyField *rxQuery1ItemsTotal;
        TFloatField *rxQuery1TaxRate;
        TCurrencyField *rxQuery1Freight;
        TCurrencyField *rxQuery1AmountPaid;
        TIntegerField *rxQuery1EmpNo;
        TStringField *rxQuery1LastName;
        TDataSource *DataSource6;
        TTable *Table4;
        TRxDBFilter *DBFilter1;
        TDataSource *DataSource4;
        TTable *Table3;
        TDataSource *DataSource2;
        TQBEQuery *QBEQuery1;
        TDataSource *DataSource1;
        TTable *Table2;
        TFloatField *Table2SpeciesNo;
        TStringField *Table2Category;
        TStringField *Table2Common_Name;
        TFloatField *Table2Lengthcm;
        TMemoField *Table2Notes;
        TGraphicField *Table2Graphic;
        TDataSource *DataSource3;
        TTable *Table1;
        TFloatField *Table1OrderNo;
        TFloatField *Table1ItemNo;
        TFloatField *Table1PartNo;
        TIntegerField *Table1Qty;
        TFloatField *Table1Discount;
        TTabbedNotebook *TabbedNotebook1;
        TGroupBox *GroupBox1;
        TRxDBGrid *rxDBGrid1;
        TPanel *Panel1;
        TCheckBox *CheckBox1;
        TCheckBox *CheckBox2;
        TGroupBox *GroupBox2;
        TDBStatusLabel *DBStatusLabel1;
        TLabel *Label2;
        TDBStatusLabel *DBStatusLabel2;
        TDBNavigator *DBNavigator1;
        TGroupBox *GroupBox3;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label5;
        TLabel *Label6;
        TMaskEdit *Edit1;
        TRxDBLookupCombo *rxDBLookupCombo1;
        TGroupBox *GroupBox4;
        TLabel *Label7;
        TRxDBGrid *rxDBGrid2;
        TDBIndexCombo *DBIndexCombo1;
        TPanel *Panel2;
        TGroupBox *GroupBox6;
        TDBNavigator *DBNavigator;
        TGroupBox *GroupBox7;
        TLabel *Label15;
        TPanel *Panel3;
        TScrollBox *ScrollBox;
        TLabel *Label8;
        TLabel *Label9;
        TLabel *Label10;
        TLabel *Label11;
        TLabel *Label12;
        TLabel *Label13;
        TLabel *Label14;
        TDBEdit *EditCompany;
        TDBEdit *EditCity;
        TDBEdit *EditState;
        TDBEdit *EditZip;
        TDBEdit *EditCountry;
        TDBEdit *EditPhone;
        TGroupBox *GroupBox5;
        TSpeedButton *EnterQuery;
        TSpeedButton *ExecQuery;
        TSpeedButton *CancelQuery;
        TRadioGroup *RadioGroup1;
        TDBEdit *EditCustNo;
        TGroupBox *GroupBox8;
        TLabel *Label16;
        TLabel *Label1;
        TPanel *Panel4;
        TLabel *Label17;
        TLabel *Label19;
        TRxDBLookupCombo *rxDBLookupCombo2;
        TComboBox *ComboBox2;
        TRxDBGrid *DBGrid1;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall CheckBox1Click(TObject *Sender);
        void __fastcall rxDBLookupCombo1Change(TObject *Sender);
        void __fastcall EnterQueryClick(TObject *Sender);
        void __fastcall ExecQueryClick(TObject *Sender);
        void __fastcall CancelQueryClick(TObject *Sender);
        void __fastcall RadioGroup1Click(TObject *Sender);
        void __fastcall DBFilter1Change(TObject *Sender);
        void __fastcall ComboBox2Change(TObject *Sender);
        void __fastcall rxDBLookupCombo2Change(TObject *Sender);
        
        void __fastcall rxDBLookupCombo1GetImage(TObject *Sender, bool IsEmpty,
        TGraphic *&Graphic, int &TextMargin);
        void __fastcall DBGrid1CheckButton(TObject *Sender, long ACol,
        TField *Field, bool &Enabled);
        void __fastcall DBGrid1TitleBtnClick(TObject *Sender, long ACol,
        TField *Field);
        void __fastcall CheckBox2Click(TObject *Sender);
        void __fastcall rxDBGrid1GetCellParams(TObject *Sender, TField *Field,
        TFont *AFont, TColor &Background, bool Highlight);
private:	// User declarations
        void __fastcall SetMacro(const AnsiString MacroName,
          const AnsiString AValue);
public:		// User declarations
        __fastcall TDBAwareForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TDBAwareForm *DBAwareForm;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -