draw a group on window

draw a group on window

Postby Silvio.Falconi » Sat Mar 16, 2013 10:34 pm

I wish draw an image over the wallImage of a window main , a roundbox , an other text

Now I use this command to draw an image inton a window and write a test into a window :

::oWndMain:bPainted := {|hDC| (PalBmpDraw( hDC, 0, 0, ::oImagen:hBitmap,, ::oWndMain:nWidth, ::oWndMain:nHeight,, .T.),;
Scrivitesto(hDC)) }


FUNCTION Scrivitesto (hDC)
Local aRect2:= {oApp:oWndMain:nHeight-120,;
oApp:oWndmain:nWidth-420,;
oApp:oWndMain:nHeight-10,;
oApp:oWndMain:nWidth-10}
SetBkMode(hDC,1)
SetTextColor(hDC,CLR_RED)

DrawTextEx( hDC, oApp:cBuild+" - "+oApp:cUrl, aRect2, 1 )
return nil
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7056
Joined: Thu Oct 18, 2012 7:17 pm

Re: draw a group on window

Postby ukoenig » Sun Mar 17, 2013 12:30 pm

Silvio,

This is the most extrem situation :
painting a text on top of a painted alphablended imgage
of the main-window image.

Text can be 3D or with shadow

Image

Best Regards
Uwe :!:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: draw a group on window

Postby Silvio.Falconi » Sun Mar 17, 2013 1:56 pm

Uwe,
I saw a Prg of Minigui
and I wish remake it on fwh ...and so I saw it can be too hard on fwh

I have a Main Window maximized Nosize

I have a image wall paper into this window

I have a frame ( on minigui is called group ) at the right of this window
it is transparent and on this group there some says

on bottom on right I have some text with a bmp

If I rem nosize all run ok and everything remains the same coordinates if I need to resize the window
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7056
Joined: Thu Oct 18, 2012 7:17 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 79 guests