COPY_image

COPY_image

hBitmap1 = COPY_image(hBitmap)

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

hBitmap - готовый рисунок

hBitmap1 - новый рисунок(будующая копия)

Пример:

#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

http://mneniya.ucoz.ru/

Created with the Personal Edition of HelpNDoc: Easily create HTML Help documents