home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 May / VPR9705A.ISO / VPR_DATA / PROGRAM / CBTRIAL / SETUP / DATA.Z / QBINDDLG.HPP < prev    next >
C/C++ Source or Header  |  1997-02-14  |  3KB  |  88 lines
  1. //----------------------------------------------------------------------------
  2. // Qbinddlg.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
  3. // From: Qbinddlg.pas
  4. //----------------------------------------------------------------------------
  5. #ifndef QbinddlgHPP
  6. #define QbinddlgHPP
  7. //----------------------------------------------------------------------------
  8. #include <DBTables.hpp>
  9. #include <DB.hpp>
  10. #include <Buttons.hpp>
  11. #include <StdCtrls.hpp>
  12. #include <Dialogs.hpp>
  13. #include <Forms.hpp>
  14. #include <Controls.hpp>
  15. #include <Graphics.hpp>
  16. #include <Classes.hpp>
  17. #include <Messages.hpp>
  18. #include <Windows.hpp>
  19. #include <SysUtils.hpp>
  20. #include <System.hpp>
  21. #pragma warn -par
  22. #pragma warn -hid 
  23. #pragma warn -inl
  24.  
  25. namespace Qbinddlg
  26. {
  27. //-- type declarations -------------------------------------------------------
  28. class __declspec(delphiclass) TQueryParams;
  29. class __declspec(pascalimplementation) TQueryParams : public Forms::TForm
  30. {
  31.     typedef Forms::TForm inherited;
  32.     
  33. __published:
  34.     Stdctrls::TGroupBox* GroupBox1;
  35.     Stdctrls::TLabel* Label1;
  36.     Stdctrls::TEdit* ParamValue;
  37.     Stdctrls::TLabel* Label2;
  38.     Stdctrls::TCheckBox* NullValue;
  39.     Stdctrls::TLabel* Label3;
  40.     Stdctrls::TComboBox* TypeList;
  41.     Stdctrls::TListBox* ParamList;
  42.     Stdctrls::TButton* OkBtn;
  43.     Stdctrls::TButton* CancelBtn;
  44.     Stdctrls::TButton* HelpBtn;
  45.     void __fastcall ParamListChange(System::TObject* Sender);
  46.     void __fastcall TypeListChange(System::TObject* Sender);
  47.     void __fastcall ParamValueExit(System::TObject* Sender);
  48.     void __fastcall NullValueClick(System::TObject* Sender);
  49.     void __fastcall FormCreate(System::TObject* Sender);
  50.     void __fastcall OkBtnClick(System::TObject* Sender);
  51.     void __fastcall HelpBtnClick(System::TObject* Sender);
  52.     
  53. private:
  54.     Dbtables::TParams* InitList;
  55.     bool InValueExit;
  56.     bool InParamChange;
  57.     bool __fastcall AcceptFieldClass(System::TMetaClass* Value);
  58.     void __fastcall CheckValue(void);
  59.     bool __fastcall Edit(void);
  60.     void __fastcall Unbind(void);
  61. public:
  62.     /* TForm.Create */ __fastcall virtual TQueryParams(Classes::TComponent* AOwner) : Forms::TForm(AOwner
  63.         ) { }
  64.     /* TForm.CreateNew */ __fastcall TQueryParams(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(
  65.         AOwner, Dummy) { }
  66.     /* TForm.Destroy */ __fastcall virtual ~TQueryParams(void) { }
  67.     
  68. public:
  69.     /* TWinControl.CreateParented */ __fastcall TQueryParams(HWND ParentWindow) : Forms::TForm(ParentWindow
  70.         ) { }
  71.     
  72. };
  73.  
  74. //-- var, const, procedure ---------------------------------------------------
  75. extern bool __fastcall EditQueryParams(Db::TDataSet* DataSet, Dbtables::TParams* List);
  76.  
  77. }    /* namespace Qbinddlg */
  78.  
  79. #pragma warn .par
  80. #pragma warn .hid 
  81. #pragma warn .inl
  82.  
  83. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  84. using namespace Qbinddlg;
  85. #endif
  86. //-- end unit ----------------------------------------------------------------
  87. #endif    // Qbinddlg
  88.