// Borland C++ Builder // Copyright (c) 1995, 2005 by Borland Software Corporation // All rights reserved // (DO NOT EDIT: machine generated header) 'Jvrgbtohtml.pas' rev: 10.00 #ifndef JvrgbtohtmlHPP #define JvrgbtohtmlHPP #pragma delphiheader begin #pragma option push #pragma option -w- // All warnings off #pragma option -Vx // Zero-length empty class member functions #pragma pack(push,8) #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit //-- user supplied ----------------------------------------------------------- namespace Jvrgbtohtml { //-- type declarations ------------------------------------------------------- class DELPHICLASS TJvRGBToHTML; class PASCALIMPLEMENTATION TJvRGBToHTML : public Jvcomponentbase::TJvComponent { typedef Jvcomponentbase::TJvComponent inherited; private: AnsiString FHTMLColor; Graphics::TColor FRGBColor; void __fastcall SetRGBColor(const Graphics::TColor Value); void __fastcall SetHTMLColor(const AnsiString Value); public: __fastcall virtual TJvRGBToHTML(Classes::TComponent* AOwner); __published: __property Graphics::TColor RGBColor = {read=FRGBColor, write=SetRGBColor, default=0}; __property AnsiString HTMLColor = {read=FHTMLColor, write=SetHTMLColor}; public: #pragma option push -w-inl /* TComponent.Destroy */ inline __fastcall virtual ~TJvRGBToHTML(void) { } #pragma option pop }; //-- var, const, procedure --------------------------------------------------- extern PACKAGE AnsiString __fastcall RgbToHtml(Graphics::TColor Value); } /* namespace Jvrgbtohtml */ using namespace Jvrgbtohtml; #pragma pack(pop) #pragma option pop #pragma delphiheader end. //-- end unit ---------------------------------------------------------------- #endif // Jvrgbtohtml