Необходимо знать, содержит ли exe-файл хотя бы значок

Question

Мне нужно знать, содержит ли exe-файл хотя бы один значок.Быстрый способ, если это возможно.Я пробовал с PrivateExtractIcons, и он работает, но только для 32-битных exe-файлов.
Он не работает для 64-битных exe-файлов.
Мне нужно это для работы с любым exe-файлом в любой Windows> = XP (x86и x64).

Я использую Delphi 2009.

Answer 1

1. Вызов LoadLibraryEx прохождение LOAD_LIBRARY_AS_DATAFILE or LOAD_LIBRARY_AS_IMAGE_RESOURCE.
2. Вызов EnumResourceTypes для проверки наличия у модуля каких-либо ресурсов значков.

Обратите внимание, что это не является исчерпывающим, поскольку некоторые приложения (например, современный Office) хранят свои графические ресурсы в пользовательской форме, а не в виде значков.