home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 81 / IOPROG_81.ISO / soft / Codice / SymmeticEncryption / SpuntoLedComponent.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2004-04-28  |  2.1 KB  |  71 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'SpuntoLedComponent.pas' rev: 4.00
  6.  
  7. #ifndef SpuntoLedComponentHPP
  8. #define SpuntoLedComponentHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #include <Graphics.hpp>    // Pascal unit
  13. #include <ExtCtrls.hpp>    // Pascal unit
  14. #include <Controls.hpp>    // Pascal unit
  15. #include <Classes.hpp>    // Pascal unit
  16. #include <SysUtils.hpp>    // Pascal unit
  17. #include <Messages.hpp>    // Pascal unit
  18. #include <Windows.hpp>    // Pascal unit
  19. #include <SysInit.hpp>    // Pascal unit
  20. #include <System.hpp>    // Pascal unit
  21.  
  22. //-- user supplied -----------------------------------------------------------
  23.  
  24. namespace Spuntoledcomponent
  25. {
  26. //-- type declarations -------------------------------------------------------
  27. class DELPHICLASS TSpuntoLed;
  28. #pragma pack(push, 4)
  29. class PASCALIMPLEMENTATION TSpuntoLed : public Extctrls::TShape 
  30. {
  31.     typedef Extctrls::TShape inherited;
  32.     
  33. private:
  34.     Graphics::TColor SpuntoONColor;
  35.     Graphics::TColor SpuntoOFFColor;
  36.     bool SpuntoLedOn;
  37.     void __fastcall SetLedParameters(void);
  38.     
  39. public:
  40.     __fastcall virtual TSpuntoLed(Classes::TComponent* AOwner);
  41.     void __fastcall LedOn(void);
  42.     void __fastcall LedOff(void);
  43.     
  44. __published:
  45.     __property Graphics::TColor SpuntoLedOnColor = {read=SpuntoONColor, write=SpuntoONColor, default=255
  46.         };
  47.     __property Graphics::TColor SpuntoLedOffColor = {read=SpuntoOFFColor, write=SpuntoOFFColor, default=128
  48.         };
  49.     __property bool SpuntoLedIsON = {read=SpuntoLedOn, nodefault};
  50. public:
  51.     #pragma option push -w-inl
  52.     /* TShape.Destroy */ inline __fastcall virtual ~TSpuntoLed(void) { }
  53.     #pragma option pop
  54.     
  55. };
  56.  
  57. #pragma pack(pop)
  58.  
  59. //-- var, const, procedure ---------------------------------------------------
  60. extern PACKAGE void __fastcall Register(void);
  61.  
  62. }    /* namespace Spuntoledcomponent */
  63. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  64. using namespace Spuntoledcomponent;
  65. #endif
  66. #pragma option pop    // -w-
  67.  
  68. #pragma delphiheader end.
  69. //-- end unit ----------------------------------------------------------------
  70. #endif    // SpuntoLedComponent
  71.