home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / cb / setup / cbuilder / data.z / DM.H < prev    next >
C/C++ Source or Header  |  1997-02-28  |  2KB  |  87 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1997 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //----------------------------------------------------------------------------
  6. #ifndef DMHPP
  7. #define DMHPP
  8. //----------------------------------------------------------------------------
  9. #ifndef DBTablesHPP
  10. #include <DBTables.hpp>
  11. #include <vcl\DB.hpp>
  12. #include <vcl\Classes.hpp>
  13. #endif
  14.  
  15. #ifndef DBHPP
  16. #include <DB.hpp>
  17. #endif
  18.  
  19. #ifndef DialogsHPP
  20. #include <Dialogs.hpp>
  21. #endif
  22.  
  23. #ifndef FormsHPP
  24. #include <Forms.hpp>
  25. #endif
  26.  
  27. #ifndef ControlsHPP
  28. #include <Controls.hpp>
  29. #endif
  30.  
  31. #ifndef GraphicsHPP
  32. #include <Graphics.hpp>
  33. #endif
  34.  
  35. #ifndef ClassesHPP
  36. #include <Classes.hpp>
  37. #endif
  38.  
  39. #ifndef SysUtilsHPP
  40. #include <SysUtils.hpp>
  41. #endif
  42.  
  43. #ifndef MessagesHPP
  44. #include <Messages.hpp>
  45. #endif
  46.  
  47. #ifndef WindowsHPP
  48. #include <Windows.hpp>
  49. #endif
  50.  
  51. #ifndef SystemHPP
  52. #include <System.hpp>
  53. #endif
  54.  
  55. //-- type declarations -------------------------------------------------------
  56. class __declspec(delphiclass) TDM1;
  57. class TDM1 : public TDataModule
  58. {
  59.     typedef TDM1 ThisClass;
  60.     typedef TDataModule inherited;
  61.     
  62. __published:
  63.     TTable *Customer;
  64.     TDataSource *CustomerSource;
  65.     TQuery *SQLCustomer;
  66.     TQuery *SQLOrders;
  67.     TDataSource *OrdersSource;
  68.     TFloatField *SQLOrdersOrderNo;
  69.     TFloatField *SQLOrdersCustno;
  70.     TDateTimeField *SQLOrdersSaleDate;
  71.     TDateTimeField *SQLOrdersShipDate;
  72.     TIntegerField *SQLOrdersEmpNo;
  73.     TCurrencyField *SQLOrdersAmountPaid;
  74.     void __fastcall DM1Create(TObject *Sender);
  75.     void __fastcall SQLOrdersFilterRecord(TDataSet *DataSet, bool &Accept);
  76.     
  77. public:
  78.     Extended OrdersFilterAmount;
  79.  
  80.     __fastcall virtual TDM1(TComponent *);
  81. };
  82.  
  83. //-- var, const, procedure ---------------------------------------------------
  84. extern TDM1 *DM1;
  85. //-- end unit ----------------------------------------------------------------
  86. #endif    // DM
  87.