home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 May / VPR9705A.ISO / VPR_DATA / PROGRAM / CBTRIAL / SETUP / DATA.Z / DBCOMBO.HPP < prev    next >
C/C++ Source or Header  |  1997-02-14  |  4KB  |  119 lines
  1. //----------------------------------------------------------------------------
  2. // DBCombo.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
  3. // From: DBCombo.pas
  4. //----------------------------------------------------------------------------
  5. #ifndef DBComboHPP
  6. #define DBComboHPP
  7. //----------------------------------------------------------------------------
  8. #include <StdCtrls.hpp>
  9. #include <Controls.hpp>
  10. #include <FileCtrl.hpp>
  11. #include <Graphics.hpp>
  12. #include <Classes.hpp>
  13. #include <SysUtils.hpp>
  14. #include <Windows.hpp>
  15. #include <System.hpp>
  16. #pragma warn -par
  17. #pragma warn -hid 
  18. #pragma warn -inl
  19.  
  20. namespace Dbcombo
  21. {
  22. //-- type declarations -------------------------------------------------------
  23. class __declspec(delphiclass) TAliasDrive;
  24. class __declspec(pascalimplementation) TAliasDrive : public Filectrl::TDriveComboBox
  25. {
  26.     typedef Filectrl::TDriveComboBox inherited;
  27.     
  28. private:
  29.     Graphics::TBitmap* FAliasBitmap;
  30.     Classes::TStrings* FAliasList;
  31.     void __fastcall LoadBitmaps(void);
  32.     void __fastcall FreeBitmaps(void);
  33.     
  34. protected:
  35.     virtual void __fastcall BuildList(void);
  36.     virtual void __fastcall Click(void);
  37.     
  38. public:
  39.     __fastcall virtual TAliasDrive(Classes::TComponent* AOwner);
  40.     __fastcall virtual ~TAliasDrive(void);
  41.     void __fastcall AddAliases(Classes::TStrings* Value);
  42.     bool __fastcall SetAlias(const System::AnsiString EditText);
  43.     __property Graphics::TBitmap* AliasBitmap = {read=FAliasBitmap, nodefault};
  44.     __property Classes::TStrings* AliasList = {read=FAliasList, nodefault};
  45. public:
  46.     /* TWinControl.CreateParented */ __fastcall TAliasDrive(HWND ParentWindow) : Filectrl::TDriveComboBox(
  47.         ParentWindow) { }
  48.     
  49. };
  50.  
  51. class __declspec(delphiclass) TAliasListBox;
  52. class __declspec(pascalimplementation) TAliasListBox : public Filectrl::TDirectoryListBox
  53. {
  54.     typedef Filectrl::TDirectoryListBox inherited;
  55.     
  56. private:
  57.     bool FShowAlias;
  58.     System::AnsiString FAliasName;
  59.     Graphics::TBitmap* FAliasBitmap;
  60.     void __fastcall SetAliasBitmap(Graphics::TBitmap* Value);
  61.     
  62. protected:
  63.     virtual void __fastcall BuildList(void);
  64.     
  65. public:
  66.     __fastcall virtual TAliasListBox(Classes::TComponent* AOwner);
  67.     __fastcall virtual ~TAliasListBox(void);
  68.     __property System::AnsiString AliasName = {read=FAliasName, write=FAliasName, nodefault};
  69.     __property Graphics::TBitmap* AliasBitmap = {read=FAliasBitmap, write=SetAliasBitmap, nodefault};
  70.     __property bool ShowAlias = {read=FShowAlias, write=FShowAlias, nodefault};
  71. public:
  72.     /* TWinControl.CreateParented */ __fastcall TAliasListBox(HWND ParentWindow) : Filectrl::TDirectoryListBox(
  73.         ParentWindow) { }
  74.     
  75. };
  76.  
  77. class __declspec(delphiclass) TAliasFileListBox;
  78. class __declspec(pascalimplementation) TAliasFileListBox : public Filectrl::TFileListBox
  79. {
  80.     typedef Filectrl::TFileListBox inherited;
  81.     
  82. protected:
  83.     Classes::TStringList* FTableList;
  84.     bool FShowAlias;
  85.     System::AnsiString FAliasName;
  86.     bool FSystem;
  87.     virtual void __fastcall ReadFileNames(void);
  88.     virtual void __fastcall ReadBitmaps(void);
  89.     
  90. public:
  91.     __fastcall virtual TAliasFileListBox(Classes::TComponent* AOwner);
  92.     __fastcall virtual ~TAliasFileListBox(void);
  93.     __property Classes::TStringList* TableList = {read=FTableList, nodefault};
  94.     __property bool ShowAlias = {read=FShowAlias, write=FShowAlias, nodefault};
  95.     __property System::AnsiString AliasName = {read=FAliasName, write=FAliasName, nodefault};
  96.     __property bool System = {read=FSystem, write=FSystem, nodefault};
  97. public:
  98.     /* TWinControl.CreateParented */ __fastcall TAliasFileListBox(HWND ParentWindow) : Filectrl::TFileListBox(
  99.         ParentWindow) { }
  100.     
  101. };
  102.  
  103. //-- var, const, procedure ---------------------------------------------------
  104. extern void __fastcall ProcessAlias( System::AnsiString EditText,  System::AnsiString &Alias,  System::AnsiString &
  105.     DirPart,  System::AnsiString &FilePart);
  106. extern void __fastcall DBCombo_Register(void);
  107.  
  108. }    /* namespace Dbcombo */
  109.  
  110. #pragma warn .par
  111. #pragma warn .hid 
  112. #pragma warn .inl
  113.  
  114. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  115. using namespace Dbcombo;
  116. #endif
  117. //-- end unit ----------------------------------------------------------------
  118. #endif    // DBCombo
  119.