Copy_Image

Синтаксис

function Copy_Image(ByVal hBmp As HBITMAP) as HBITMAP

Описание

Позволяет копировать рисунок из другого рисунка.

Параметры

hBmp - хендл битмапа , копию которого необходимо получить

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Var hbitmap=Load_image("C:\WINDOWS\system32\oobe\images\merlin.gif")
OpenWindow("",10,10,400,400)
ImageGadget(1,10,10,100,100,hbitmap)
Var hbitmap1=COPY_image(hbitmap)
ImageGadget(2,110,10,100,100,hbitmap1)
Do
  Var ev=WaitEvent()
  If ev=EventClose Then End
Loop

Результат

Created with the Personal Edition of HelpNDoc: Free help authoring tool