Hi, all !
How can I make opaque controls on a transparent window ?
Board index FiveWin for Harbour/xHarbour Opaque controls
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.
i work with FW.
If you have any questions about special functions, maybe i can help.
Uwe, thanks for your help. However, I need to change the transparency of the window controls transparency on it does not change.
I will have a look at the different controls if bAlphaLevel
is supported like for images.
A defined transparent-level of windows or dialog doesn't include the controls as well.
from the buttonbar-test ( have a look at -> bartrnsl.prg. )
The buttonbar-transparentlevel changes but not the buttons.
DEFINE BUTTONBAR oBar OF oWnd SIZE 80, 80 2007
oBar:SetFont( oFont )
oBar:SetColor( { |l,o| If( l, CLR_BLACK, CLR_WHITE ) }, oWnd:nClrPane )
oBar:bClrGrad := { |lInvert| If( lInvert, nArgb( 96, CLR_WHITE ), nArgb( nAlpha % 256, nBarClr ) ) }
regards
Uwe
is supported like for images.
I need to change the transparency of the window controls transparency
A defined transparent-level of windows or dialog doesn't include the controls as well.
from the buttonbar-test ( have a look at -> bartrnsl.prg. )
The buttonbar-transparentlevel changes but not the buttons.
DEFINE BUTTONBAR oBar OF oWnd SIZE 80, 80 2007
oBar:SetFont( oFont )
oBar:SetColor( { |l,o| If( l, CLR_BLACK, CLR_WHITE ) }, oWnd:nClrPane )
oBar:bClrGrad := { |lInvert| If( lInvert, nArgb( 96, CLR_WHITE ), nArgb( nAlpha % 256, nBarClr ) ) }
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.
i work with FW.
If you have any questions about special functions, maybe i can help.
perhaps...
oGRid is a xbrowse allready open
Local hBmp,hBlur
oApp:oGrid:GetDC()
hBmp := MakeBkBmp( oApp:oGrid:hWnd, oApp:oGrid:hDC )
hBlur := Blur( hBmp, 3 )
PalBmpDraw( oApp:oGrid:hDC, 0, 0, hBlur )
DEFINE DIALOG oDlg
DEFINE DIALOG oDlg
DeleteObject( hBmp )
DeleteObject( hBlur )
oApp:oGrid:ReleaseDC()
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour March-April 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
I use : FiveWin for Harbour March-April 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
Thanks !