Delphi: правильное определение номера версии Windows 8.1 и Windows 10 (GetVersionEx)

Я разобрался почему ABTool отображает неверную версию Windows на вкладке «Система». Об этом я написал здесь.

Проблема в том, что для определения версии системы я использовал функцию GetVersionEx. А в ОС Win8.1 и выше эта функция возвращает версию ОС = 6.2.9200. Это чётко описано на этой странице MSDN, смотреть последнюю строку с пометкой *.

* For applications that have been manifested for Windows 8.1 or Windows 10. Applications not manifested for Windows 8.1 or Windows 10 will return the Windows 8 OS version value (6.2). To manifest your applications for Windows 8.1 or Windows 10, refer to Targeting your application for Windows.

Всё начинается с того, что необходимо создать (если не было) или изменить файл манифеста, который будет использовать или уже используется в проекте. Этим манифестом «подписывается» программа, exe-файл с целью, попросту говоря, обеспечить систему информацией о совместимости, требованиях (админ. прав, например) и пр.

RAD Studio XE6: размещение рекламы Admob в Android-приложении

green frog iphone case beside black samsung android smartphone
Photo by Denny Müller on Unsplash

Вот, первый пост в свежем 2015-ом году. Его я посвящу теме программирования, хотя его тут будет минимум. Перейду к делу.

Что имеем:

  • Google-аккаунт (с незаблокированным доступом к AdSense);
  • RAD Studio XE6 и выше (версия важна, т.к. в них разные танцы с бубном);
  • проект приложения в RAD Studio.

Что хотим: слегка монетизировать это приложение после его публикации засчёт рекламы, отображающейся в нём.

RAD Studio XE4: Работа с AbsoluteDatabase

Вот, записал скринкаст небольшой. Надеюсь продолжить серию по данной теме.

Ссылка на страницу скачивания на офиц. сайте:
http://componentace.com/download/download.php?editionid=1

Прямая ссылка на используемую в скрикасте версию 7.20 для XE4 (офиц. сайт):
http://componentace.com/data/distr/absolute_d18_720.zip