Function Catch_Image(array As UByte Ptr, byval color As COLORREF=&hf0f0f0) As HBITMAP
Позволяет из массива с байтами , получить битмап. Функция используется в связке с IncludeBinary. Функция IncludeBinary бинарно вкладывает изображение в текущий модуль, а функция CatchImage извлекает из него и преобразует в битмап.
Поддерживаемые форматы в Windows: Jpeg, Png, Gif, Bmp, Tiff, Ico
Поддерживаемые форматы в Linux: jpeg, png, tiff, ico , bmp . (На самом деле кол-во форматов может быть больше. Это зависит от того, с какой конфигурацией собрана библиотека GTK)
array - указатель на массив байт
color - цвет фона, на котором будет отрисовано изображение. Используется для изображений поддерживающих прозрачность (PNG,TIFF,GIF). В Linux , если данный параметр равен &hFF000000, то изображения поддерживающие прозрачность загружаются с прозрачностью; если параметр равен &hFFFFFF и меньше , то функция ведет себя также как в Windows.
Windows , Linux
#Include "window9.bi"
Dim As Integer event
Dim As HWND hwnd
Includebinary("1.png",hgMem)
hwnd=OpenWindow("",10,10,200,200) : CenterWindow(hwnd)
ImageGadget(1,50,30,170,170,Catch_Image(hgmem))
Do
event=WaitEvent()
If Event=EventClose Then End
Loop
Created with the Personal Edition of HelpNDoc: Easily create HTML Help documents