Function CreateIconOrCursorFromGpBitmap(ByVal GpBitmap As Any Ptr) As HICON
Создает иконку или курсор в памяти из GDI+ битмапа и возвращает ее(его) хендл
GpBitmap - хендл bitmap GDI+
Windows
#Include "window9.bi"
Var GpBitmap=Load_imageA("1.png")
Var HICON=CreateIconOrCursorFromGpBitmap(GpBitmap)
SaveIconOrCursor(HICON,"44.ico")
FreeGpBitmap(GpBitmap):DestroyIcon(HICON)
Created with the Personal Edition of HelpNDoc: Create HTML Help, DOC, PDF and print manuals from 1 single source