Search found 51 matches: linvert

Return to advanced search

Re: Select one btnbmp into a scrollpanel

... nElemento:= val(nProduct) } Function Set_items_Active(oItem,lActive,oBTn) local oCtrl for each oCtrl in oItem:aControls oCtrl:bClrGrad = { | lInvert | If( ! lInvert,; { { 1, CLR_WHITE, CLR_WHITE } },; { { 1, RGB( 229,241,251 ), RGB( 229,241,251 ) } } ) } oCtrl:refresh() next SetGradientBtnbmp(,oBtn) ...
by Silvio.Falconi
Mon Jun 12, 2023 5:51 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Select one btnbmp into a scrollpanel
Replies: 1
Views: 104

Select one btnbmp into a scrollpanel

... action Msginfo() aBtnEle[n]:ocursor:= oHand aBtnEle[n]:nClrBorder := { |obtn| (IIF(obtn:lMOver,CLR_BLUE,CLR_HGRAY)) } aBtnEle[n]:bClrGrad = { | lInvert | If( ! lInvert,; { { 1, CLR_WHITE, CLR_WHITE } },; { { 1, RGB( 229,241,251 ), RGB( 229,241,251 ) } } ) } aBtnEle[n]:cargo:= lActive aBtnEle[n]:bAction ...
by Silvio.Falconi
Mon Jun 12, 2023 5:27 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Select one btnbmp into a scrollpanel
Replies: 1
Views: 104

Re: Brush on btnbmp with color

... @ oBrw:nBottom+1, oBrw:nWidth-44.4 BTNBMP aBtnBrow[1] SIZE 20,20 PIXEL OF oDlg NOROUND 2007 aBtnBrow[1]:bClrGrad := { |lInvert| If( lInvert, aBru[ 2 ]:hBrush, aBru[ 1 ]:hBrush ) } WITH OBJECT aBtnBrow[1] :nClrBorder := nRgb(218,214,179)// border color :bColorMap := { ...
by Silvio.Falconi
Fri Mar 03, 2023 11:13 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Brush on btnbmp with color
Replies: 8
Views: 672

Re: Brush on btnbmp with color

... @ oBrw:nBottom+1, oBrw:nWidth-44.4 BTNBMP aBtnBrow[1] SIZE 20,20 PIXEL OF oDlg NOROUND 2007 aBtnBrow[1]:bClrGrad := { |lInvert| If( lInvert, aBru[ 2 ]:hBrush, aBru[ 1 ]:hBrush ) } WITH OBJECT aBtnBrow[1] :nClrBorder := nRgb(218,214,179)// border color :bColorMap := { ...
by karinha
Fri Feb 10, 2023 2:38 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Brush on btnbmp with color
Replies: 8
Views: 672

Re: Brush on btnbmp with color

... @ oBrw:nBottom+1, oBrw:nWidth-44.4 BTNBMP aBtnBrow[1] SIZE 20,20 PIXEL OF oDlg NOROUND 2007 aBtnBrow[1]:bClrGrad := { |lInvert| If( lInvert, aBru[ 2 ]:hBrush, aBru[ 1 ]:hBrush ) } WITH OBJECT aBtnBrow[1] :nClrBorder := nRgb(218,214,179)// border color :bColorMap := { ...
by Silvio.Falconi
Fri Feb 10, 2023 10:34 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Brush on btnbmp with color
Replies: 8
Views: 672

Re: btnbmp state

... but on another mode @ oBrowse:nBottom+3, oBrowse:nWidth-44.4 BTNBMP aBtnBrow[3] SIZE 12,10.3 PIXEL OF oDlg NOROUND 2007 aBtnBrow[3]:bClrGrad := { |lInvert| If( lInvert, aBru[ 2 ]:hBrush, aBru[ 1 ]:hBrush ) } aBtnBrow[3]:nClrBorder := { || (IIF(aBtnBrow[3]:lMOver,,CLR_GRAY)) } aBtnBrow[3]:disable()
by Silvio.Falconi
Thu Feb 09, 2023 9:33 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: btnbmp state
Replies: 2
Views: 191

Re: New Password problem

... cLabTxt )  I have a gradient defined in there which is drawn from the MAIN() program file as a PUBLIC variable: PUBLIC aPubGrad := {| lInvert | If( ! lInvert, { { 0.50, 16776960, 16777215 }, ; { 0.50, 16777215, 16776960 } }, { { 0.50, 128, 16777215 }, { 0.50, 16777215, 128 } } ) } ...
by TimStone
Fri Oct 02, 2020 6:26 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: New Password problem
Replies: 23
Views: 3177

drooling

... What can I do to prevent the blue color from drooling beyond the border of the btnbmp button? :bClrGrad = { | lInvert | If( ! lInvert,; { { 1, RGB( 244, 244, 245 ), RGB( 244, 244, 245 ) } },; { { 1, RGB( 145, 201, 247 ), RGB( 145, 201, 247 ) } } ) }
by Silvio.Falconi
Fri Jun 05, 2020 5:11 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: drooling
Replies: 2
Views: 1111

Re: error on xbrowse footer

If you look into METHOD PaintFooter( nRow, nCol, nHeight, lInvert ) CLASS TXBrwColumn you see that cFooter := ::footerStr() and ::PaintBmpAndText( { nRow, nCol, nRow + nHeight, nRight }, ; cFooter, ::nFootStrAlign, ::bLeftText, oFont, aColors[ 1 ], ; ...
by Otto
Thu Apr 30, 2020 8:25 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: error on xbrowse footer - RESOLVED! -
Replies: 33
Views: 3611

Re: Selecting numbers

... DEFAULT nColorBorder := nRGB(116,165,216 ) Do case Case ntype = 2007 ... ... //2007 ocontrol:bClrGrad = { | lInvert | If( ! lInvert,; ... ocontrol:nClrBorder := { || (IIF(ocontrol:lMOver,nColorBorder,nRgb(225, 225, 225))) } :?: regards Uwe :?:
by ukoenig
Sat May 25, 2019 3:02 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Selecting numbers
Replies: 11
Views: 1090

Re: Opaque controls

... 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
by ukoenig
Tue Apr 16, 2019 11:31 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Opaque controls
Replies: 5
Views: 711

Re: Ribbon Theme

... at left to hide/show the Explorer Menu if there was then the rbtn are change at the end type For x= 1 TO 71 oBtn[x]:bClrGradNormal = { | lInvert | If( ! lInvert,; { { 1, RGB( 225, 225,225 ), RGB( 225, 225, 225 ) } },; { { 1, RGB( 229,241,251 ), RGB( 229,241,251 ) } } ) } next x I saw ...
by Silvio.Falconi
Fri Oct 05, 2018 8:35 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Ribbon Theme
Replies: 163
Views: 28029

Re: FWH 16.11 Texured Fonts

... oSBtn[1]:nClrCaption := aVal[62] oSBtn[1]:bMMoved = { | nRow, nCol, nFlags | SHOW_FRAME( oSBtn, 1, nOld ), nOld := 1 } oSBtn[1]:bClrGrad := { |lInvert| If( lInvert, 0x80FFA54A, nARGB( 54, 0, 192, 0 ) ) } ........ ........ oMetro:Show() oMetro:bPainted := {|| oMetro:SayText( cText, { 50, 180, ...
by ukoenig
Thu Dec 01, 2016 8:33 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: FWH 16.11 Texured Fonts
Replies: 8
Views: 1809

Re: ButtonBar display problems

... missing. It might be one button, or 2 to 3 buttons in a row. http://www.pflegeplus.com/IMAGES/Btnbar3.jpg ... ... aPubGrad := { | lInvert | If( ! lInvert, { { 0.50,16776960,16777215 }, ; { 0.50,16777215,16776960 } }, { { 0.50,128,16777215 }, { 0.50,16777215,128 } } ) } from CODE ...
by ukoenig
Wed Jul 20, 2016 9:01 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: ButtonBar display problems
Replies: 9
Views: 2942

Re: ButtonBar display problems

Here is the gradient. PUBLIC aPubGrad := { | lInvert | If( ! lInvert, { { 0.50,16776960,16777215 }, ; { 0.50,16777215,16776960 } }, { { 0.50,128,16777215 }, { 0.50,16777215,128 } } ) } Please note my bitmaps are in the .rc file so it's not "the ...
by TimStone
Tue Jul 19, 2016 11:37 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: ButtonBar display problems
Replies: 9
Views: 2942
Next

Return to advanced search