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