home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 9 / CDACTUAL9.iso / progs / CB / DATA.Z / GDSDATA.H < prev    next >
Encoding:
C/C++ Source or Header  |  1996-08-16  |  2.8 KB  |  75 lines
  1. //---------------------------------------------------------------------------
  2. #ifndef GdsDataH
  3. #define GdsDataH
  4. //---------------------------------------------------------------------------
  5. #include <Forms.hpp>
  6. #include <ExtCtrls.hpp>
  7. #include <Controls.hpp>
  8. #include <Classes.hpp>
  9. #include <StdCtrls.hpp>
  10. #include <DB.hpp>
  11. #include <DBTables.hpp>
  12. #include <Gdsstd.h>
  13. //---------------------------------------------------------------------------
  14. class TStdDataForm : public TGDSStdForm
  15. {
  16. __published:
  17.     TPanel *StdCtrlPanel;
  18.     TRadioGroup *FilterOnRadioGroup;
  19.     TGroupBox *GroupBox1;
  20.     TLabel *FilterOnLabel;
  21.     TEdit *FilterCriteria;
  22.     TCheckBox *FilterCheckBox;
  23.     TButton *NextBtn;
  24.     TButton *PriorBtn;
  25.     TTable *Cust;
  26.     TTable *Orders;
  27.     TFloatField *OrdersOrderNo;
  28.     TFloatField *OrdersCustNo;
  29.     TStringField *OrdersCustName;
  30.     TDateTimeField *OrdersSaleDate;
  31.     TCurrencyField *OrdersAmountDue;
  32.     TDateTimeField *OrdersShipDate;
  33.     TIntegerField *OrdersEmpNo;
  34.     TStringField *OrdersShipToContact;
  35.     TStringField *OrdersShipToAddr1;
  36.     TStringField *OrdersShipToAddr2;
  37.     TStringField *OrdersShipToCity;
  38.     TStringField *OrdersShipToState;
  39.     TStringField *OrdersShipToZip;
  40.     TStringField *OrdersShipToCountry;
  41.     TStringField *OrdersShipToPhone;
  42.     TStringField *OrdersShipVIA;
  43.     TStringField *OrdersPO;
  44.     TStringField *OrdersTerms;
  45.     TStringField *OrdersPaymentMethod;
  46.     TCurrencyField *OrdersItemsTotal;
  47.     TFloatField *OrdersTaxRate;
  48.     TCurrencyField *OrdersFreight;
  49.     TCurrencyField *OrdersAmountPaid;
  50.     TCurrencyField *OrdersTaxAmount;
  51.     TDataSource *OrdersSource;
  52.     void __fastcall FilterOnRadioGroupClick(TObject *Sender);
  53.     void __fastcall FilterCriteriaExit(TObject *Sender);
  54.     void __fastcall FilterCriteriaKeyPress(TObject *Sender, Char &Key);   
  55.     void __fastcall OrdersFilterOnDate(TDataSet * DataSet, Boolean & Accept);
  56.     void __fastcall OrdersFilterOnAmount(TDataSet * DataSet, Boolean & Accept);
  57.      void __fastcall OrdersCalcFields(TDataSet * DataSet);
  58.     void __fastcall FilterCheckBoxClick(TObject *Sender);
  59.     void __fastcall NextBtnClick(TObject *Sender);
  60.     void __fastcall PriorBtnClick(TObject *Sender);
  61.     void __fastcall FormCreate(TObject *Sender);
  62. private:        // private user declarations
  63. protected:        // protected user declarations
  64.     double FLastAmount;
  65.     TDateTime FLastDate;
  66.     double __fastcall CalcAmountDue(void);
  67.     void __fastcall ConvertFilterCriteria(void);
  68. public:         // public user declarations
  69.     virtual __fastcall TStdDataForm(TComponent* Owner);
  70. };
  71. //---------------------------------------------------------------------------
  72. extern TStdDataForm *DSStdDataForm;
  73. //---------------------------------------------------------------------------
  74. #endif
  75.