home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmsyscm / _setup.1 / AHMTCDTriggers.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-11-12  |  2.0 KB  |  67 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) 'AHMTCDTriggers.pas' rev: 3.00
  6.  
  7. #ifndef AHMTCDTriggersHPP
  8. #define AHMTCDTriggersHPP
  9. #include <AHMSystem.hpp>
  10. #include <AHMTFormHook.hpp>
  11. #include <Classes.hpp>
  12. #include <Messages.hpp>
  13. #include <Windows.hpp>
  14. #include <SysInit.hpp>
  15. #include <System.hpp>
  16.  
  17. //-- user supplied -----------------------------------------------------------
  18.  
  19. namespace Ahmtcdtriggers
  20. {
  21. //-- type declarations -------------------------------------------------------
  22. struct TAHMWMDeviceChange
  23. {
  24.     Cardinal Msg;
  25.     int Event;
  26.     void *dwData;
  27.     int Result;
  28. } ;
  29.  
  30. typedef void __fastcall (__closure *TAHMDeviceChangeEvent)(System::TObject* Sender, char FirstDriveLetter
  31.     );
  32.  
  33. class DELPHICLASS TAHMCDTriggers;
  34. class PASCALIMPLEMENTATION TAHMCDTriggers : public Ahmtformhook::TAHMHookComponent 
  35. {
  36.     typedef Ahmtformhook::TAHMHookComponent inherited;
  37.     
  38. private:
  39.     TAHMDeviceChangeEvent fAfterInsert;
  40.     TAHMDeviceChangeEvent fAfterRemove;
  41.     
  42. protected:
  43.     char __fastcall GetFirstDriveLetter(int unitmask);
  44.     DYNAMIC void __fastcall WMDeviceChange(TAHMWMDeviceChange &Msg);
  45.     
  46. public:
  47.     virtual void __fastcall Hooked(Messages::TMessage &AMsg);
  48.     
  49. __published:
  50.     __property TAHMDeviceChangeEvent AfterInsert = {read=fAfterInsert, write=fAfterInsert};
  51.     __property TAHMDeviceChangeEvent AfterRemove = {read=fAfterRemove, write=fAfterRemove};
  52. public:
  53.     /* TAHMHookComponent.Create */ __fastcall virtual TAHMCDTriggers(Classes::TComponent* AOwner) : Ahmtformhook::
  54.         TAHMHookComponent(AOwner) { }
  55.     /* TAHMHookComponent.Destroy */ __fastcall virtual ~TAHMCDTriggers(void) { }
  56.     
  57. };
  58.  
  59. //-- var, const, procedure ---------------------------------------------------
  60.  
  61. }    /* namespace Ahmtcdtriggers */
  62. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  63. using namespace Ahmtcdtriggers;
  64. #endif
  65. //-- end unit ----------------------------------------------------------------
  66. #endif    // AHMTCDTriggers
  67.