Функция DuplicateIcon

Declare Function DuplicateIcon Lib "shell32.dll" ( _
    ByVal hInst As Long, ByVal hIcon As Long) As Long
	

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

Возвращаемое значение

В успешном случае возвращается описатель созданного значка. В случае ошибки возвращается 0

Параметры

hInst

Данный параметр не используется. Установите равным 0

hIcon

Описатель значка, чью копию нужно создать

Пример

Dim hIcon As Long, hDuplIcon As Long
' Загрузим значок с изображением вопроса
hIcon = LoadIcon(ByVal 0&, IDI_INFORMATION)
' Duplicate the returned handle
hDuplIcon = DuplicateIcon(ByVal 0&, hIcon)
' Выводим результат на форму
DrawIcon Me.hdc, 10, 10, hDuplIcon
' Удаляем описатели
DestroyIcon hIcon
DestroyIcon hDuplIcon

Категория

Значки