Ошибка при использовании MsiEnumProducts

@Dr.Xank · Регистрация: 18.07.2010

Студворк — интернет-сервис помощи студентам

Всем Добрый вечер.

Ребята проблема такая, написал код, но при компиляции выдает ошибки

Code
1
2
3
4
5
6
7
8
[bcc32 Error] msi.h(776): E2015 Ambiguity between 'PHKEY' and 'Winapi::Windows::PHKEY'
  Full parser context
    Unit1.cpp(4): #include c:\program files (x86)\embarcadero\rad studio\11.0\include\windows\sdk\msiquery.h
    msiquery.h(23): #include c:\program files (x86)\embarcadero\rad studio\11.0\include\windows\sdk\msi.h
[bcc32 Error] msi.h(781): E2015 Ambiguity between 'PHKEY' and 'Winapi::Windows::PHKEY'
  Full parser context
    Unit1.cpp(4): #include c:\program files (x86)\embarcadero\rad studio\11.0\include\windows\sdk\msiquery.h
    msiquery.h(23): #include c:\program files (x86)\embarcadero\rad studio\11.0\include\windows\sdk\msi.h

Сам код

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
//---------------------------------------------------------------------------
 
#include <vcl.h>
#include <msiquery.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
typedef UINT (WINAPI *MyMsiEnumProducts)(DWORD iProductIndex, LPTSTR lpProductBuf);
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    HINSTANCE hUser = NULL;
    hUser =  LoadLibraryA("Msi.dll");
    if (hUser != NULL)
    {
       MyMsiEnumProducts filter = (MyMsiEnumProducts)GetProcAddress(hUser, "MsiEnumProducts");
       
       if (filter != NULL)
       {
          CHAR ProductCode[40];
          UINT nResult;
          AnsiString errResult;
               
          for (int nIndex = 0;;nIndex++)
          {
             nResult = MsiEnumProducts(nIndex,ProductCode);
             
             if (nResult != ERROR_SUCCESS)
             {
                if (nResult == 1610)
                   errResult = "ERROR_BAD_CONFIGURATION";
                if (nResult == 87)
                   errResult = "ERROR_INVALID_PARAMETER";
                if (nResult == 259)
                   errResult = "ERROR_NO_MORE_ITEMS";
                if (nResult == 8)
                   errResult ="ERROR_NOT_ENOUGH_MEMORY";
              
                break;
             }
             Memo1->Lines->Add(AnsiString(nIndex) + " " +AnsiString(ProductCode) );
          }
        }
       FreeLibrary(hUser);
    }
 
 
}
//---------------------------------------------------------------------------

Radstudio XE4

Добавлено через 2 часа 24 минуты
Это ошибка возникает когда даже просто подключаю

C++
1
#include <msiquery.h>

Убежденный · 30.08.2014, 23:40

UI, можешь привести название и точную версию хотя бы одной программы,
которая не определяется через MsiEnumProductsW/MsiGetProductInfoW ?
А также, очень желательно, версию/разрядность системы + номер SP + версию
установленного Windows Installer.

Вопрос ко всем.

Попробую воспроизвести у себя на какой-нибудь виртуалке.

Добавлено через 2 минуты

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

Убежденный, Как понимаю тестил под x64 при чем вероятно в сборке x64 под VC++, так что могу лишь предположить что недочет возникает в сборке x32 под x64.

Я тестил в обоих вариантах - Win32 и x64, оба раза результаты были одинаковые.

Добавлено через 1 минуту

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

Пряморукие, жду ответа... А то балаболить все умеют, я смотрю.

Если ты принял замечание о криворукости на свой счет - то ошибся,
ничего такого и в мыслях не было.

@Avazart · 30.08.2014, 23:41

Сообщение от Убежденный

Я тестил в обоих вариантах - Win32 и x64, оба раза результаты были одинаковые.

Тогда мое предположение отпадает.
Я собирал/тестил под x32 Win7.

Ddv122 · 31.08.2014, 01:10

Убежденный,

BCB6 UPDate 4
Установщик Windows®. Версия 5.0.9600.16384
Windows 8.1 x64 ( со всеми обоновлениями )
С++ builder 6 не отображается...

Убежденный · 31.08.2014, 01:15

Кажется, я понял, в чем дело (проверял на Windows 7 SP0, 32-bit).

MsiEnumProducts перечисляет только программы, установленные через
Windows Installer (.msi). Берем что-либо из этого списка:

- Yandex.Браузер (спасибо Dr.Xank за наводку);
- ICQ;
- Firefox;
- Google Chrome.

Все эти программы не используют данную технологию для своих сетапов (косвенно можно
определить по отсутствию в ключе Uninstall значения REG_DWORD WindowsInstaller = 1),
поэтому в списке их не будет. Не поможет ни MsiEnumProductsEx, ни запуск с
elevated-привилегиями, ни "игры" с 32-64 битами.

Так что я был не прав, когда рекомендовал использовать данную функцию,
например здесь:

Копирование списка установленных программ в текстовый файл
Как узнать установлена ли программа на компьютере?

И следует использовать рецепт UI - перечисление содержимого ключей
реестра Software\Microsoft\Windows\CurrentVersio n\Uninstall.

@Avazart · 31.08.2014, 01:28

Да действительно ничего из указанного в списка не нашел.

Ddv122 · 31.08.2014, 11:42

Убежденный,
Спасибо

С++ builder 6 не отображается...

Отображается , слилось как то вчера всё у меня

Но зато мы имеем возможность определить программы которые установлены через
Windows Installer и к примеру быстро их удалить

Code
1
msiexec / </uninstall | /x> <Product.msi | Код_продукта> Удаление продукта

@Dr.Xank · 31.08.2014, 18:30 **[ТС]**

Сообщение от Убежденный

И следует использовать рецепт UI - перечисление содержимого ключей
реестра Software\Microsoft\Windows\CurrentVersio n\Uninstall.

Но я там не нашел Yandex.Браузер)))

Убежденный · 31.08.2014, 22:46

В HKCU загляни.

Новые блоги и статьи Все статьи Все блоги /
изучаю kubernetes lagorue 13.01.2026 А пригодятся-ли мне знания kubernetes в России?	сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .	Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .

Ddv122 Почемучка) 1244 / 304 / 30 Регистрация: 23.12.2010 Сообщений: 2,001 Записей в блоге: 1
	31.08.2014, 01:10
	Убежденный, BCB6 UPDate 4 Установщик Windows®. Версия 5.0.9600.16384 Windows 8.1 x64 ( со всеми обоновлениями ) С++ builder 6 не отображается... Миниатюры 1

Убежденный Ушел с форума 16481 / 7444 / 1187 Регистрация: 02.05.2013 Сообщений: 11,616 Записей в блоге: 1
	31.08.2014, 01:15
	Кажется, я понял, в чем дело (проверял на Windows 7 SP0, 32-bit). MsiEnumProducts перечисляет только программы, установленные через Windows Installer (.msi). Берем что-либо из этого списка: - Yandex.Браузер (спасибо Dr.Xank за наводку); - ICQ; - Firefox; - Google Chrome. Все эти программы не используют данную технологию для своих сетапов (косвенно можно определить по отсутствию в ключе Uninstall значения REG_DWORD WindowsInstaller = 1), поэтому в списке их не будет. Не поможет ни MsiEnumProductsEx, ни запуск с elevated-привилегиями, ни "игры" с 32-64 битами. Так что я был не прав, когда рекомендовал использовать данную функцию, например здесь: Копирование списка установленных программ в текстовый файл Как узнать установлена ли программа на компьютере? И следует использовать рецепт UI - перечисление содержимого ключей реестра Software\Microsoft\Windows\CurrentVersio n\Uninstall. 4

@Avazart 8484 / 6151 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	31.08.2014, 01:28
	Да действительно ничего из указанного в списка не нашел. 0

Убежденный Ушел с форума 16481 / 7444 / 1187 Регистрация: 02.05.2013 Сообщений: 11,616 Записей в блоге: 1
	31.08.2014, 22:46
	В HKCU загляни. 0