// Borland C++ Builder // Copyright (c) 1995, 2005 by Borland Software Corporation // All rights reserved // (DO NOT EDIT: machine generated header) 'Jvstringlisttohtml.pas' rev: 10.00 #ifndef JvstringlisttohtmlHPP #define JvstringlisttohtmlHPP #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 //-- user supplied ----------------------------------------------------------- namespace Jvstringlisttohtml { //-- type declarations ------------------------------------------------------- class DELPHICLASS TJvStringListToHtml; class PASCALIMPLEMENTATION TJvStringListToHtml : public Jvcomponentbase::TJvComponent { typedef Jvcomponentbase::TJvComponent inherited; private: Classes::TStringList* FStrings; Classes::TStringList* FHTML; AnsiString FHTMLTitle; AnsiString FHTMLLineBreak; bool FIncludeHeader; Classes::TStrings* __fastcall GetHTML(void); Classes::TStrings* __fastcall GetStrings(void); void __fastcall SetStrings(const Classes::TStrings* Value); void __fastcall DoStringsChange(System::TObject* Sender); void __fastcall SetHTML(const Classes::TStrings* Value); public: __fastcall virtual TJvStringListToHtml(Classes::TComponent* AOwner); __fastcall virtual ~TJvStringListToHtml(void); void __fastcall ConvertToHTML(Classes::TStrings* Source, const AnsiString FileName); void __fastcall ConvertToHTMLStrings(Classes::TStrings* Source, Classes::TStrings* Destination); __published: __property Classes::TStrings* HTML = {read=GetHTML, write=SetHTML, stored=false}; __property Classes::TStrings* Strings = {read=GetStrings, write=SetStrings}; __property AnsiString HTMLLineBreak = {read=FHTMLLineBreak, write=FHTMLLineBreak}; __property AnsiString HTMLTitle = {read=FHTMLTitle, write=FHTMLTitle}; __property bool IncludeHeader = {read=FIncludeHeader, write=FIncludeHeader, default=1}; }; //-- var, const, procedure --------------------------------------------------- } /* namespace Jvstringlisttohtml */ using namespace Jvstringlisttohtml; #pragma pack(pop) #pragma option pop #pragma delphiheader end. //-- end unit ---------------------------------------------------------------- #endif // Jvstringlisttohtml