Проверка установленных версий программы

[googl]

Доброго времени суток. Я уже раньше задавал подобный вопрос, но исчерпывающий ответ так и не выяснил. Чуть изменилась суть: есть программа ANSYS. Путь к папке с этой программой можно получить из переменной окружений вида %ANSYS120_DIR%. Что делаю я, чтобы найти актуальную установленную версию программы:

беру цикл от 100 до 200
в цикле в версию подставляю version:='ANSYS'+inntostr(i)+'_DIR'
и проверяю наличие исполняющего фала. Если файл наден, в переменную versionactual:=version;
Таким образом я получаю переменную окружения для самой последней версии.
Правильный ли такой подход?
Спасибо

[BARNEY]

можно контрольную сумму (exe) считать и хранить где то

[googl]

Сообщение от BARNEY

можно контрольную сумму (exe) считать и хранить где то

я извиняюсь, для чего?

[Valio]

Ещё как вариант это осуществить поиск exe файла по всем дискам. И дальше обрабатывать результат.

Где гарантия, что %ANSYS120_DIR% будет создана?

[googl]

Сообщение от Valio

Ещё как вариант это осуществить поиск exe файла по всем дискам. И дальше обрабатывать результат.

Где гарантия, что %ANSYS120_DIR% будет создана?

ну а толку что я его найду? я ни суммы не проверю, ни работоспособность. а переменные окружения будут созданы при правильной установке. установка неправильная? значит программа неработоспособная. моя программа не будет с ней работать.

[Valio]

Сообщение от googl

ну а толку что я его найду? я ни суммы не проверю, ни работоспособность. а переменные окружения будут созданы при правильной установке. установка неправильная? значит программа неработоспособная. моя программа не будет с ней работать.

Хочешь сказать, что наличие переменной окружения даёт 100% гарантию того, что программа работоспособна?

Почему сумму нельзя проверить?

[googl]

Сообщение от Valio

Хочешь сказать, что наличие переменной окружения даёт 100% гарантию того, что программа работоспособна?

Почему сумму нельзя проверить?

я же не знаю какая версия будет установлена. я вот и ищу. не факт же, что для всех версий сумма одинаковая будет. я же в цикле перебираю возможные варианты. и потом, я буду в ANSYS отправлять расчет.

[3D Hunter]

Записывайте номер версии в реестр и считывайте оттуда. А еще, кажется, есть юнит ADAVersionInfo.pas, с помощью которого можно посмотреть версию самого себя экзешника.

[googl]

Сообщение от 3D Hunter

Записывайте номер версии в реестр и считывайте оттуда. А еще, кажется, есть юнит ADAVersionInfo.pas, с помощью которого можно посмотреть версию самого себя экзешника.

так. мы теряем суть задачи: мне нужно работать с ANSYS из делфи. для этого мне нужно сначала определить установлен ли он. для 10 версии и ниже в реестре есть ветка, где и путь можно глянуть и версию. для версий старше по-другому. решил брать путь и одновременно искать установлена ли программа путем использования переменных окружения. суть задачи найти последнюю установленную версию и вытащить путь к exe. Путь к exe уникальный. мне нужен лишь путь к установленной программе. еще раз:
суть не определить версию или что-то еще, а найти последнюю версию установленной программы (если их, допустим 2,3 и т.д. установлено) и вытащить путь к папке


я привел свое решение этой задачи и спрашиваю: правильный ли такой подход?

[Valio]

Что за бред, причём тут суммы?

Как ты можешь не знать если ты при поиске получаешь все exe файлы этой программы? Какойбы версии она не была. И потом уже имея exe узнать и сумму и версию.