home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmstanc / _setup.1 / AHMTFileCtrls.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-05  |  5.6 KB  |  169 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTFileCtrls.pas' rev: 3.00
  6.  
  7. #ifndef AHMTFileCtrlsHPP
  8. #define AHMTFileCtrlsHPP
  9. #include <Menus.hpp>
  10. #include <AHMSControls.hpp>
  11. #include <FileCtrl.hpp>
  12. #include <StdCtrls.hpp>
  13. #include <Forms.hpp>
  14. #include <Controls.hpp>
  15. #include <Graphics.hpp>
  16. #include <Classes.hpp>
  17. #include <SysUtils.hpp>
  18. #include <Messages.hpp>
  19. #include <Windows.hpp>
  20. #include <SysInit.hpp>
  21. #include <System.hpp>
  22.  
  23. //-- user supplied -----------------------------------------------------------
  24.  
  25. namespace Ahmtfilectrls
  26. {
  27. //-- type declarations -------------------------------------------------------
  28. class DELPHICLASS TAHMFileCombo;
  29. class PASCALIMPLEMENTATION TAHMFileCombo : public Stdctrls::TCustomComboBox 
  30. {
  31.     typedef Stdctrls::TCustomComboBox inherited;
  32.     
  33. private:
  34.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  35.     System::AnsiString FDirectory;
  36.     System::AnsiString FMask;
  37.     Filectrl::TFileType FFileType;
  38.     Stdctrls::TCustomEdit* FFileEdit;
  39.     Filectrl::TFilterComboBox* FFilterCombo;
  40.     Classes::TNotifyEvent FOnChange;
  41.     int FLastSel;
  42.     char __fastcall GetDrive(void);
  43.     System::AnsiString __fastcall GetFileName(void);
  44.     bool __fastcall IsMaskStored(void);
  45.     void __fastcall SetDrive(char Value);
  46.     void __fastcall SetFileEdit(Stdctrls::TCustomEdit* Value);
  47.     void __fastcall SetDirectory(const System::AnsiString NewDirectory);
  48.     void __fastcall SetFileType(Filectrl::TFileType NewFileType);
  49.     void __fastcall SetMask(const System::AnsiString NewMask);
  50.     void __fastcall SetFileName(const System::AnsiString NewFile);
  51.     
  52. protected:
  53.     virtual void __fastcall CreateWnd(void);
  54.     DYNAMIC void __fastcall Click(void);
  55.     DYNAMIC void __fastcall Change(void);
  56.     virtual void __fastcall ReadFileNames(void);
  57.     virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation
  58.         );
  59.     virtual System::AnsiString __fastcall GetFilePath(void);
  60.     
  61. public:
  62.     __fastcall virtual TAHMFileCombo(Classes::TComponent* AOwner);
  63.     virtual void __fastcall Loaded(void);
  64.     __fastcall virtual ~TAHMFileCombo(void);
  65.     virtual void __fastcall DrawItem(int Index, const Windows::TRect &Rect, Stdctrls::TOwnerDrawState State
  66.         );
  67.     virtual void __fastcall SetFilePath(const System::AnsiString EditText);
  68.     __property char Drive = {read=GetDrive, write=SetDrive, nodefault};
  69.     __property System::AnsiString FileName = {read=GetFilePath, write=SetFilePath};
  70.     
  71. __published:
  72.     __property Align ;
  73.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  74.     __property Color ;
  75.     __property Ctl3D ;
  76.     __property DragCursor ;
  77.     __property DragMode ;
  78.     __property Enabled ;
  79.     __property System::AnsiString Directory = {read=FDirectory, write=SetFilePath};
  80.     __property Stdctrls::TCustomEdit* FileEdit = {read=FFileEdit, write=SetFileEdit};
  81.     __property Filectrl::TFileType FileType = {read=FFileType, write=SetFileType, default=64};
  82.     __property Font ;
  83.     __property ItemHeight ;
  84.     __property System::AnsiString Mask = {read=FMask, write=SetMask, stored=IsMaskStored};
  85.     __property ParentColor ;
  86.     __property ParentCtl3D ;
  87.     __property ParentFont ;
  88.     __property ParentShowHint ;
  89.     __property PopupMenu ;
  90.     __property ShowHint ;
  91.     __property TabOrder ;
  92.     __property TabStop ;
  93.     __property Visible ;
  94.     __property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
  95.     __property OnClick ;
  96.     __property OnDblClick ;
  97.     __property OnDragDrop ;
  98.     __property OnDragOver ;
  99.     __property OnEndDrag ;
  100.     __property OnEnter ;
  101.     __property OnExit ;
  102.     __property OnKeyDown ;
  103.     __property OnKeyPress ;
  104.     __property OnKeyUp ;
  105.     __property OnMouseDown ;
  106.     __property OnMouseMove ;
  107.     __property OnMouseUp ;
  108.     __property OnStartDrag ;
  109. public:
  110.     /* TWinControl.CreateParented */ __fastcall TAHMFileCombo(HWND ParentWindow) : Stdctrls::TCustomComboBox(
  111.         ParentWindow) { }
  112.     
  113. };
  114.  
  115. class DELPHICLASS TAHMFolderListbox;
  116. class PASCALIMPLEMENTATION TAHMFolderListbox : public Filectrl::TDirectoryListBox 
  117. {
  118.     typedef Filectrl::TDirectoryListBox inherited;
  119.     
  120. private:
  121.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  122.     
  123. protected:
  124.     virtual void __fastcall ReadBitmaps(void);
  125.     
  126. __published:
  127.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  128. public:
  129.     /* TDirectoryListBox.Create */ __fastcall virtual TAHMFolderListbox(Classes::TComponent* AOwner) : 
  130.         Filectrl::TDirectoryListBox(AOwner) { }
  131.     /* TDirectoryListBox.Destroy */ __fastcall virtual ~TAHMFolderListbox(void) { }
  132.     
  133. public:
  134.     /* TWinControl.CreateParented */ __fastcall TAHMFolderListbox(HWND ParentWindow) : Filectrl::TDirectoryListBox(
  135.         ParentWindow) { }
  136.     
  137. };
  138.  
  139. class DELPHICLASS TAHMDriveCombo;
  140. class PASCALIMPLEMENTATION TAHMDriveCombo : public Filectrl::TDriveComboBox 
  141. {
  142.     typedef Filectrl::TDriveComboBox inherited;
  143.     
  144. private:
  145.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  146.     
  147. public:
  148.     __fastcall virtual TAHMDriveCombo(Classes::TComponent* AOwner);
  149.     
  150. __published:
  151.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  152. public:
  153.     /* TDriveComboBox.Destroy */ __fastcall virtual ~TAHMDriveCombo(void) { }
  154.     
  155. public:
  156.     /* TWinControl.CreateParented */ __fastcall TAHMDriveCombo(HWND ParentWindow) : Filectrl::TDriveComboBox(
  157.         ParentWindow) { }
  158.     
  159. };
  160.  
  161. //-- var, const, procedure ---------------------------------------------------
  162.  
  163. }    /* namespace Ahmtfilectrls */
  164. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  165. using namespace Ahmtfilectrls;
  166. #endif
  167. //-- end unit ----------------------------------------------------------------
  168. #endif    // AHMTFileCtrls
  169.