[Implemented] imagegadget with a raised flag

Got an idea for enhancing PureBasic? New command(s) you'd like to see?
BillNee
User
User
Posts: 93
Joined: Thu Jan 29, 2004 6:01 am
Location: Homosassa, FL

[Implemented] imagegadget with a raised flag

Post by BillNee »

Hi - I'd really like to see an imagegadget have the raised capability like the containergadget has. Right now to get a 3d appearance I have to use a containergadget with the raised flag(thanks to Sparkie). Also tried using #ws_ex_dlgmodalframe as the imagegadget flag but that doesn't go all the way to the right or to the bottom of the picture. Have to add a resizegadget command to get it right.
I like using the imagegadget in my art slideshow because it seems to be the only gadget that redraws right away with a new image. Could leave it a flat gadget but raised sure looks a lot better.
Appreciate any help
Bill Nee
User avatar
netmaestro
PureBasic Bullfrog
PureBasic Bullfrog
Posts: 8451
Joined: Wed Jul 06, 2005 5:42 am
Location: Fort Nelson, BC, Canada

Post by netmaestro »

I think it's a good request. You can also accomplish it like this on Windows but I think Sparkie's container idea is simpler:

Code: Select all

OpenWindow(0,0,0,320,240,"",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)

ImageGadget(0,10,10,100,100,0)
SetRect_(qrc.RECT,8,8,112,112)

Repeat
  ev=WaitWindowEvent()
  Select ev
    Case #PB_Event_Repaint
      hdc=StartDrawing(WindowOutput(0))
        DrawEdge_(hdc,qrc,#EDGE_RAISED,#BF_RECT)
      StopDrawing()
  EndSelect
Until ev=#PB_Event_CloseWindow
BERESHEIT
Post Reply