TApplicationVersion::Получение версии файла его автора и т.д.

Содержание
  1. Подключение
  2. Использование
  3. Автор

1) Подключение
1.1) Распаковать архив в желаемое место
1.2) Для использования в вашем проекте подключите к проекту (Shift + F11) файл "GetApplicationVersion.cpp" и впишите строку вида #include "GetApplicationVersion.h" в тот файл который будет использовать функции этого класса.
Файлы GetApplicationVersion.cpp и GetApplicationVersion.h должны находится в одной папке!


2) Использование

CompanyName;
FileDescription;
FileVersion;
InternalName;
LegalCopyright;
LegalTrademarks;
OriginalFilename;
ProductName;
ProductVersion;
Comments;
Language.hexLanguage;
Language.strLanguage
Тип данных вышеперечисленых свойств - AnsiString, т.е. можно сразу выводить в TLabel, TEdit или добавлять в TMemo (TRichEdit) и тд. Это удобно для формы "О программе". Language.lngHex; - выводит код языка т.е. строку вида 0x0000419, а Language.lngStr - имя самого языка на языке конечного пользователя.
Пример:
void __fastcall TForm1::btn1Click(TObject *Sender)
{
if (dlgOpen->Execute())
    {
    //  create object of class "TApplicationVersion"
    TApplicationVersion *app = new TApplicationVersion(dlgOpen->FileName);

    //  main information
    ListBox->Items->Add(app->Comments);
    ListBox->Items->Add(app->CompanyName);
    ListBox->Items->Add(app->FileDescription);
    ListBox->Items->Add(app->FileVersion);
    ListBox->Items->Add(app->InternalName);
    ListBox->Items->Add(app->LegalCopyright);
    ListBox->Items->Add(app->LegalTrademarks);
    ListBox->Items->Add(app->OriginalFilename);
    ListBox->Items->Add(app->ProductName);
    ListBox->Items->Add(app->ProductVersion);

    //  addition information
    ListBox->Items->Add(DateTimeToStr(app->Create));
    ListBox->Items->Add(DateTimeToStr(app->LastAccess));
    ListBox->Items->Add(DateTimeToStr(app->Modified));

    //  getting languade of file
    ListBox->Items->Add(app->Language.lngHex);
    ListBox->Items->Add(app->Language.lngStr);

    //  delete object of class
    delete app;
    }
}

3) Автор
Ильяшенко Геннадий Юрьевич, aka Evil_Smile
sigismund.freud@gmail.com
www.devil-smile.narod.ru