//--------------------------------------------------------------------------- #ifndef ExeVerH #define ExeVerH //--------------------------------------------------------------------------- #include #include #include #include #include //--------------------------------------------------------------------------- class PACKAGE TExeVersion : public TComponent { private: AnsiString __fastcall GetCompanyName(); AnsiString __fastcall GetFileDescription(); AnsiString __fastcall GetFileVersion(); AnsiString __fastcall GetInternalName(); AnsiString __fastcall GetLegalCopyright(); AnsiString __fastcall GetLegalTrademarks(); AnsiString __fastcall GetOriginalFilename(); AnsiString __fastcall GetProductName(); AnsiString __fastcall GetProductVersion(); AnsiString __fastcall GetComments(); AnsiString __fastcall GetMajorVersion(); AnsiString __fastcall GetMinorVersion(); AnsiString __fastcall GetRelease(); AnsiString __fastcall GetBuild(); int __fastcall TExeVersion::GetFileVersionField(char*, char*, char*, int, DWORD*); protected: public: __fastcall TExeVersion(TComponent* Owner); __published: __property AnsiString CompanyName = {read=GetCompanyName}; __property AnsiString FileDescription = {read=GetFileDescription}; __property AnsiString FileVersion = {read=GetFileVersion}; __property AnsiString InternalName = {read=GetInternalName}; __property AnsiString LegalCopyright = {read=GetLegalCopyright}; __property AnsiString LegalTrademarks = {read=GetLegalTrademarks}; __property AnsiString OriginalFilename = {read=GetOriginalFilename}; __property AnsiString ProductName = {read=GetProductName}; __property AnsiString ProductVersion = {read=GetProductVersion}; __property AnsiString Comments = {read=GetComments}; __property AnsiString MajorVersion = {read=GetMajorVersion}; __property AnsiString MinorVersion = {read=GetMinorVersion}; __property AnsiString Release = {read=GetRelease}; __property AnsiString Build = {read=GetBuild}; }; //--------------------------------------------------------------------------- #endif