Как извлечь иконки из exe-файла? - VB
Формулировка задачи:
Добрый день!
Есть программулина, в котором на кнопках используются иконки. Есть ли какая софтина, позволяющая извлечь данные иконки? Если есть - киньте ссылку.
Спасибо.
Решение задачи: «Как извлечь иконки из exe-файла?»
textual
Листинг программы
Declare Function ExtractIconEx Lib 'shell32' Alias 'ExtractIconExA' (ByVal lpszFile As String, ByVal nIconIndex As Long, phiconLarge As Long, phiconSmall As Long, ByVal nIcons As Long) As Long Declare Function DrawIcon Lib 'user32' (ByVal hDC As Long, ByVal x As Long, ByVal y As Long, ByVal hIcon As Long) As Long Dim lpszFile As String 'имя файла Dim lIcons As Object 'значек lpszFile = 'c:windowscalc.exe' lIcons = ExtractIconEx(lpszFile, -1, 1, 0, 0) DrawIcon Me.hdc, 0, 0, lIcon
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д