Sub ImageDraw(ByVal hBmp As HBITMAP,ByVal x As Long, ByVal y As Long, ByVal alphaparam As Long=255)
Используется для рисования(наложения) изображений
hBmp - хендл битмапа
x,y - расположение рисунка по осям X и Y
alphaparam - Степень прозрачности при рисовании (от 0 до 255)
Windows , Linux
#Include "window9.bi"
Var hwnd=OpenWindow("",100,100,300,300)
UpdateInfoXServer()
WindowStartDraw(hwnd,100,100,100,100,1)
ImageDraw(Load_image("E:\WINDOWS\system32\oobe\images\merlin.gif"),0,0)
StopDraw
Do : Loop until WaitEvent = EventClose
Created with the Personal Edition of HelpNDoc: Free help authoring environment