FiveTech Software tech support forums

... := .F. :nStretchCol := STRETCHCOL_WIDEST :bClrSel := { || { CLR_BLACK, CLR_HGRAY } } :bClrStd := {|| IIf( oBrw:KeyNo() % 2 == 0, { CLR_BLACK, RGB( 198, 255, 198 ) }, { CLR_BLACK, RGB( 232, 255, 232 ) } ) } END AEval( oBrw:aCols, {|o| o:nHeadStrAlign := AL_CENTER, o:oDataFont := aFont[1]} ) ...

... the color of the text to create the internal box when it has focus for a sample I set the nClrText :nClrText := { |lOver,o| If( o:HasFocus(), RGB( 219, 230, 244), If( lOver, RGB( 219, 230, 244), RGB( 207, 221, 239) ) ) } and I have this result https://i.postimg.cc/2jVKcWLj/jjj.gif ...

... oFontreturn nil https://imagizer.imageshack.com/img923/8479/urcbDK.gif Nages I understood but I need the border extern of color RGB(195,195,185) as this picture https://i.postimg.cc/JnCGfM6p/hhhhh.jpg

... por favor. // C:\FWH/SAMPLES\SILVBTN3.PRG#include "FiveWin.ch"/*#Define aPubGrad {| lInvert | If( lInvert, ;                 { { 1 / 3, nRGB( 255, 253, 222 ), nRGB( 255, 231, 151 ) }, ;                 { 2 / 3, nRGB( 255, 215,  84 ), nRGB( 255, 233, 162 ) }    ;                 },     ...

... Box https://i.postimg.cc/Z5y5F83c/llll.png I tried also with For n= 1 to len(oBtn) obtn[n]:bClrGrad := < |u,oBtn| local clr := RGB( 245,245,235) if oBtn:lActive if oBtn:lMOver clr := {{ 1, RGB( 250,250,245),RGB( 250,250,245) }} elseif oBtn:lPressed clr := RGB( 180,136,85 ) else ...

Antonio Linares wrote:Silvio,

Have you tried to remove this line ?

obtn[n]:nClrBorder := RGB(195,195,185)

I remeber it wanted a codeblock with lMover but I 'm searching on forum now

Silvio,

Have you tried to remove this line ?

obtn[n]:nClrBorder := RGB(195,195,185)

... a dialog TRansparent DEFINE DIALOG oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon @ nRow, 0 TITLE oTitle OF oDlg ...

... a dialog TRansparent DEFINE DIALOG oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon @ nRow, 0 TITLE oTitle OF oDlg ...

... ....this is exactly the problem DEFINE DIALOG oDlg SIZE nWd , nHt PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, RGB( 245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) @ nRow, 0 TITLE oTitle OF oDlg SIZE 1025, ...

No puede ser asi? // C:\FWH\SAMPLES\SILVTIT.PRG#include "fivewin.ch"#include "ttitle.ch"#define CLR_MSPURPLE RGB( 128,  57, 123 )#define CLR_MSRED    RGB( 232,  17,  35 )#define CLR_MSGRAY   RGB( 229, 229, 229 )FUNCTION Main()   LOCAL ...

... a dialog TRansparent DEFINE DIALOG oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon @ nRow, 0 TITLE oTitle OF oDlg ...

... + '<tr>' for i = 1 to 13 nMaat = 36 + i cTabel = cTabel + '<th scope="col" style="text-align: center; background-color: rgb(255, 0, 0);"><strong><span style="color:#FFFFFF;">'+str(nMaat,2)+'</span></strong></th>' next cTabel ...

... of Windows 11, 23H2, it contains all the new features introduced by Microsoft, including Copilot, native RAR support, redesigned volume slider, RGB controls in the Settings app, and more . Compared to the previous tiny11 version, version 2311 is 20% smaller and allows you to recover even more ...

... DE PRODUCTOS" Redefine BtnGet oCampo Var cCampo Id 1002 Of oDlg Resource "BTO_ZOOM" Font oFont2 PICTURE "@!" COLOR RGB(128,0,0) ; Action (FiltrarProducto(oBrw,cCampo,cTab_Art)) Redefine BtnBmp oBtn2[1] Id 101 Resource "BTO_NUEVO" Of oDlg 2007; // BTO_NUEVO ...