can you cut a guipic?

[cryton2707]

Hi

quick question..

Is it possible to say load a picture in one gui. then copy a section (x,y and x,y) of the picture to another gui?

Ta

[JBeef]

maybe gdi32.dll - bitblt()

- crazy ~Jap

edit- BitBlt() do paint. need SetDIBits. too foogly - ~Jap

edit- no say so

expandcollapse popup

Global Const $SRCCOPY = 0xcc0020
Global $WM_PAINT = 0x000F

$gui = GUICreate("test",300,200,0,0)
$pic = GUICtrlCreatePic(@WindowsDir & "\winnt256.bmp",0,0,275,174)

$guicousin = GUICreate("test_tickle",300,200,0,300)
$piccousin = GUICtrlCreatePic("",0,0,275,174)

GUISetState(@SW_SHOW,$gui)
GUISetState(@SW_SHOW,$guicousin)

$hwnd = ControlGetHandle($gui,"",$pic)
$hdc = DLLCall("user32.dll","int","GetDC","hwnd",$hwnd)

$hwndcousin = ControlGetHandle($guicousin,"",$piccousin)
$hdccousin = DLLCall("user32.dll","int","GetDC","hwnd",$hwndcousin)

DLLCall("gdi32.dll","int","BitBlt","int",$hdccousin[0] _
                    ,"int",0,"int",0,"int",100,"int",100 _
                    ,"int",$hdc[0],"int",40,"int",20,"int",$SRCCOPY)

GUIRegisterMsg($WM_PAINT, "paintcousin")

While 1
    GUISwitch($gui)
    If GUIGetMsg() = -3 Then ExitLoop
    GUISwitch($guicousin)
    If GUIGetMsg() = -3 Then ExitLoop
WEnd

DLLCall("user32.dll","int","ReleaseDC","hwnd",$gui,"int",$hdc[0])
DLLCall("user32.dll","int","ReleaseDC","hwnd",$guicousin,"int",$hdccousin[0])

Func paintcousin($hwnd, $msg, $wparam, $lparam)
    If Not ($hwnd=$guicousin) Then Return
    DLLCall("gdi32.dll","int","BitBlt","int",$hdccousin[0] _
            ,"int",0,"int",0,"int",100,"int",100 _
            ,"int",$hdc[0],"int",40,"int",20,"int",$SRCCOPY)
EndFunc

maybe put BitBlt in paint func. ~Jap Edited October 1, 2007 by JBeef

[cryton2707]

maybe gdi32.dll - bitblt()

- crazy ~Jap

maybe put BitBlt in paint func. ~Jap

Looks intresting.. I need to play with the code a little to

A. completely understand it.. and

B. see if I can make it do what I want

Thanks for a pointer though