dbtreesample.h

一套及时通讯的原码

//---------------------------------------------------------------------------
#ifndef DBTreeSampleH
#define DBTreeSampleH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "fcdbtreeview.hpp"
#include "fcDemoRichEdit.hpp"
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <Db.hpp>
#include <DBCtrls.hpp>
#include <DBTables.hpp>
#include <ImgList.hpp>
#include <Mask.hpp>
#include "fcImager.hpp"
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TDMTreeViewForm : public TForm
{
__published:	// IDE-managed Components
        TLabel *TreeStateLabel;
        TSpeedButton *SpeedButton1;
        TPageControl *PageControl1;
        TTabSheet *CustomersTabSheet;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label7;
        TLabel *Label6;
        TLabel *Label5;
        TLabel *Label8;
        TLabel *Label9;
        TLabel *Label10;
        TLabel *Label13;
        TLabel *Label12;
        TLabel *Label11;
        TDBEdit *EditCustNo;
        TDBEdit *EditCompany;
        TDBEdit *EditAddr;
        TDBEdit *EditAddr2;
        TDBEdit *EditZip;
        TDBEdit *EditState;
        TDBEdit *EditCity;
        TDBEdit *EditCountry;
        TDBEdit *EditPhone;
        TDBEdit *EditFAX;
        TDBEdit *EditLastInvoiceDate;
        TDBEdit *EditContact;
        TDBEdit *EditTaxRate;
        TTabSheet *OrdersTabSheet;
        TLabel *Label14;
        TLabel *Label15;
        TLabel *Label16;
        TLabel *Label17;
        TLabel *Label18;
        TLabel *Label25;
        TLabel *Label28;
        TLabel *Label29;
        TLabel *Label30;
        TLabel *Label31;
        TLabel *Label32;
        TLabel *Label33;
        TLabel *Label34;
        TDBEdit *EditOrderNo;
        TDBEdit *DBEdit1;
        TDBEdit *EditSaleDate;
        TDBEdit *EditEmpNo;
        TDBEdit *EditShipDate;
        TDBEdit *EditShipVIA;
        TDBEdit *EditPO;
        TDBEdit *EditTerms;
        TDBEdit *EditPaymentMethod;
        TDBEdit *EditItemsTotal;
        TDBEdit *EditAmountPaid;
        TDBEdit *EditFreight;
        TDBEdit *DBEdit2;
        TTabSheet *ItemsTabSheet;
        TLabel *Label35;
        TLabel *Label36;
        TLabel *Label37;
        TLabel *Label38;
        TLabel *Label39;
        TDBEdit *EditDiscount;
        TDBEdit *DBEdit3;
        TDBEdit *EditItemNo;
        TDBEdit *EditPartNo;
        TDBEdit *EditQty;
        TGroupBox *GroupBox1;
        TLabel *Label42;
        TLabel *Label40;
        TLabel *Label41;
        TLabel *Label43;
        TLabel *Label44;
        TLabel *Label45;
        TDBEdit *DBEdit6;
        TDBEdit *DBEdit4;
        TDBEdit *DBEdit5;
        TDBEdit *DBEdit7;
        TDBEdit *DBEdit8;
        TDBEdit *DBEdit9;
        TPageControl *PageControl2;
        TTabSheet *TabSheet1;
        TLabel *Label19;
        TLabel *Label20;
        TComboBox *ComboBox1;
        TComboBox *FilterCombo;
        TfcDemoRichEdit *fcDemoRichEdit1;
        TTabSheet *TabSheet2;
        TCheckBox *CheckBox1;
        TCheckBox *CheckBox2;
        TCheckBox *CheckBox3;
        TCheckBox *CheckBox4;
        TfcDemoRichEdit *fcDemoRichEdit2;
        TDataSource *CustomerDS;
        TTable *CustomersTbl;
        TFloatField *CustomersTblCustNo;
        TStringField *CustomersTblCompany;
        TStringField *CustomersTblAddr1;
        TStringField *CustomersTblAddr2;
        TStringField *CustomersTblCity;
        TStringField *CustomersTblState;
        TStringField *CustomersTblZip;
        TStringField *CustomersTblCountry;
        TStringField *CustomersTblPhone;
        TStringField *CustomersTblFAX;
        TFloatField *CustomersTblTaxRate;
        TStringField *CustomersTblContact;
        TDateTimeField *CustomersTblLastInvoiceDate;
        TIntegerField *CustomersTblLookupOrders;
        TDataSource *OrdersDS;
        TTable *OrdersTbl;
        TFloatField *OrdersTblOrderNo;
        TFloatField *OrdersTblCustNo;
        TDateTimeField *OrdersTblSaleDate;
        TDateTimeField *OrdersTblShipDate;
        TIntegerField *OrdersTblEmpNo;
        TStringField *OrdersTblShipToContact;
        TStringField *OrdersTblShipToAddr1;
        TStringField *OrdersTblShipToAddr2;
        TStringField *OrdersTblShipToCity;
        TStringField *OrdersTblShipToState;
        TStringField *OrdersTblShipToZip;
        TStringField *OrdersTblShipToCountry;
        TStringField *OrdersTblShipToPhone;
        TStringField *OrdersTblShipVIA;
        TStringField *OrdersTblPO;
        TStringField *OrdersTblTerms;
        TStringField *OrdersTblPaymentMethod;
        TCurrencyField *OrdersTblItemsTotal;
        TFloatField *OrdersTblTaxRate;
        TCurrencyField *OrdersTblFreight;
        TCurrencyField *OrdersTblAmountPaid;
        TDataSource *ItemsDS;
        TTable *ItemsTbl;
        TFloatField *ItemsTblOrderNo;
        TFloatField *ItemsTblItemNo;
        TFloatField *ItemsTblPartNo;
        TIntegerField *ItemsTblQty;
        TFloatField *ItemsTblDiscount;
        TStringField *ItemsTblLookupPartDescription;
        TFloatField *ItemsTblLookupPartPrice;
        TTable *LookupPartTbl;
        TTable *LookupOrderTbl;
        TImageList *ImageList1;
        TDataSource *PartsDS;
        TTable *PartsTbl;
        TfcDBTreeView *fcDBTreeView1;
        TfcImager *fcImager1;
        TCheckBox *CheckBox5;
        void __fastcall fcDBTreeView1CalcNodeAttributes(
          TfcDBCustomTreeView *TreeView, TfcDBTreeNode *Node);
        void __fastcall fcDBTreeView1Change(TfcDBCustomTreeView *TreeView,
          TfcDBTreeNode *Node);
        void __fastcall PageControl2Change(TObject *Sender);
        void __fastcall ComboBox1Change(TObject *Sender);
        void __fastcall FilterComboChange(TObject *Sender);
        void __fastcall CustomersTblFilterRecord(TDataSet *DataSet,
          bool &Accept);
        void __fastcall CheckBox1Click(TObject *Sender);
        void __fastcall CheckBox2Click(TObject *Sender);
        void __fastcall CheckBox3Click(TObject *Sender);
        void __fastcall CheckBox4Click(TObject *Sender);
        void __fastcall CheckBox5Click(TObject *Sender);
private:	// User declarations
public:		// User declarations
        __fastcall TDMTreeViewForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TDMTreeViewForm *DMTreeViewForm;
//---------------------------------------------------------------------------
#endif