home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmstanc / _setup.1 / AHMTFolderLookup.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-05  |  4.6 KB  |  127 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) 'AHMTFolderLookup.pas' rev: 3.00
  6.  
  7. #ifndef AHMTFolderLookupHPP
  8. #define AHMTFolderLookupHPP
  9. #include <StdCtrls.hpp>
  10. #include <Mask.hpp>
  11. #include <AHMSControls.hpp>
  12. #include <AHMTLookupEdit.hpp>
  13. #include <ShellAPI.hpp>
  14. #include <Graphics.hpp>
  15. #include <Controls.hpp>
  16. #include <ShlObj.hpp>
  17. #include <SysUtils.hpp>
  18. #include <Dialogs.hpp>
  19. #include <Forms.hpp>
  20. #include <Classes.hpp>
  21. #include <Messages.hpp>
  22. #include <Windows.hpp>
  23. #include <SysInit.hpp>
  24. #include <System.hpp>
  25.  
  26. //-- user supplied -----------------------------------------------------------
  27.  
  28. namespace Ahmtfolderlookup
  29. {
  30. //-- type declarations -------------------------------------------------------
  31. typedef void __fastcall (__closure *TAHMPathChange)(System::TObject* Sender, System::AnsiString OldPath
  32.     , System::AnsiString NewPath);
  33.  
  34. enum TAHMRoots { csidlDesktop, csidlDesktopExpanded, csidlPrograms, csidlControlPanel, csidlPrinters, 
  35.     csidlPersonal, csidlFavorites, csidlStartup, csidlRecent, csidlSendto, csidlRecycleBin, csidlStartMenu, 
  36.     csidlDesktopDirectory, csidlMyComputer, csidlNetwork, csidlNetworkNeighborhood, csidlFonts, csidlTemplates 
  37.     };
  38.  
  39. enum TAHMInfoFlags { FileSystemDirsOnly, DontGoBelowDomain, StatusText, FileSystemAncestors, LookupForComputer, 
  40.     LookupForPrinter, DisplayPath };
  41.  
  42. typedef Set<TAHMInfoFlags, FileSystemDirsOnly, DisplayPath>  TAHMInfoFlagSet;
  43.  
  44. class DELPHICLASS TAHMFolderLookup;
  45. class PASCALIMPLEMENTATION TAHMFolderLookup : public Ahmtlookupedit::TAHMCustomLookupEdit 
  46. {
  47.     typedef Ahmtlookupedit::TAHMCustomLookupEdit inherited;
  48.     
  49. private:
  50.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  51.     HWND FDialogHandle;
  52.     System::AnsiString FTitle;
  53.     HWND FParentHandle;
  54.     System::AnsiString FDisplayName;
  55.     TAHMInfoFlagSet FLookupFlags;
  56.     TAHMRoots FLookupRoot;
  57.     Classes::TNotifyEvent FBeforeLookup;
  58.     Classes::TNotifyEvent FAfterLookup;
  59.     TAHMPathChange FOnPathChanged;
  60.     
  61. protected:
  62.     bool __fastcall Execute(void);
  63.     void __fastcall OnLookupPress(System::TObject* Sender);
  64.     
  65. public:
  66.     __fastcall virtual TAHMFolderLookup(Classes::TComponent* AOwner);
  67.     void __fastcall SetStatusText(const HWND Hwnd, const System::AnsiString StatusText);
  68.     void __fastcall SetSelectionPIDL(const HWND Hwnd, const Shlobj::PItemIDList ItemIDList);
  69.     void __fastcall SetSelectionPath(const HWND Hwnd, const System::AnsiString Path);
  70.     void __fastcall EnableOK(const HWND Hwnd, const bool Value);
  71.     __property System::AnsiString DisplayName = {read=FDisplayName};
  72.     __property HWND ParentHandle = {read=FParentHandle, write=FParentHandle, nodefault};
  73.     __property HWND DialogHandle = {read=FDialogHandle, write=FDialogHandle, nodefault};
  74.     
  75. __published:
  76.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  77.     __property System::AnsiString LookupCaption = {read=FTitle, write=FTitle};
  78.     __property TAHMInfoFlagSet LookupFlags = {read=FLookupFlags, write=FLookupFlags, nodefault};
  79.     __property TAHMRoots LookupRoot = {read=FLookupRoot, write=FLookupRoot, default=1};
  80.     __property Classes::TNotifyEvent BeforeLookup = {read=FBeforeLookup, write=FBeforeLookup};
  81.     __property Classes::TNotifyEvent AfterLookup = {read=FAfterLookup, write=FAfterLookup};
  82.     __property TAHMPathChange OnPathChanged = {read=FOnPathChanged, write=FOnPathChanged};
  83.     __property EditButton1 ;
  84.     __property Enabled ;
  85.     __property Alignment ;
  86.     __property EditMask ;
  87.     __property MaxLength ;
  88.     __property Text ;
  89.     __property AutoSize ;
  90.     __property CharCase ;
  91.     __property PasswordChar ;
  92.     __property ReadOnly ;
  93.     __property Font ;
  94.     __property OnEnter ;
  95.     __property OnExit ;
  96.     __property OnKeyDown ;
  97.     __property OnKeyPress ;
  98.     __property OnKeyUp ;
  99.     __property OnClick ;
  100.     __property OnDblClick ;
  101.     __property OnDragDrop ;
  102.     __property OnDragOver ;
  103.     __property OnEndDrag ;
  104.     __property OnMouseDown ;
  105.     __property OnMouseMove ;
  106.     __property OnMouseUp ;
  107.     __property OnStartDrag ;
  108. public:
  109.     /* TAHMCustomLookupEdit.Destroy */ __fastcall virtual ~TAHMFolderLookup(void) { }
  110.     
  111. public:
  112.     /* TWinControl.CreateParented */ __fastcall TAHMFolderLookup(HWND ParentWindow) : Ahmtlookupedit::TAHMCustomLookupEdit(
  113.         ParentWindow) { }
  114.     
  115. };
  116.  
  117. //-- var, const, procedure ---------------------------------------------------
  118. extern PACKAGE void __stdcall AHMLookuprCallbackProc(HWND HWindow, int uMsg, int lParameter, int lpLookupFolder
  119.     );
  120.  
  121. }    /* namespace Ahmtfolderlookup */
  122. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  123. using namespace Ahmtfolderlookup;
  124. #endif
  125. //-- end unit ----------------------------------------------------------------
  126. #endif    // AHMTFolderLookup
  127.