FiveTech Software tech support forums

... I saw that it can not do them automatically I do not understand why if I associate a button with the function Mostra_Form(aCicloSmall,aColors,oBrw) then it create the form but then there is the erro U see on snapshot In the class I'm going to memorize the graph points where the numbers ...

... := { || HTMLPOP( GetActiveWindow(), nil, 0x000E, RTrim( oMensagem:getValueByPos( 13 ) ) ) } :bPaintText := <|oCol, hDC, cText, aRect, aColors| FW_SayTextHilite( hDC, cText, aRect, oFonte_Browse, aColors[ 1 ], aColors[ 2 ], ; aHilite, oCol ) Return NIL > END :nMarqueeStyle := MARQSTYLE_HIGHLROW ...

Thank you mister nages, 1) how would this refresh occur? WITH OBJECT :aCols[ 3 ] :bPaintText := <|oCol, hDC, cText, aRect, aColors| FW_SayTextHilite( hDC, cText, aRect, oFonte_Browse, aColors[ 1 ], aColors[ 2 ], ; { aHilite } ) Return NIL > END There are two browsers when the first ...

... see that cFooter := ::footerStr() and ::PaintBmpAndText( { nRow, nCol, nRow + nHeight, nRight }, ; cFooter, ::nFootStrAlign, ::bLeftText, oFont, aColors[ 1 ], ; nBmpNo, ::nFootBmpAlign, .t., ::nAlphaLevelFooter, .f. ) paints your footer. If you trace ::footerStr() you have to check if cEditPicture ...

Can you try making this change in XBrowse.prg? Please locate the method METHOD PaintCellBtn( hDC, oRect, aColors ) CLASS TXBrwColumn The method looks like this: METHOD PaintCellBtn( hDC, oRect, aColors ) CLASS TXBrwColumn   local oBtn, oBrush   if ...

... another solution instead of using :SaveToBmp ? I tested : hBmp := FW_MakeYourBitmap( 64, 64, { |hDC,w,h| GradientFill( hDC, 0, 0, h, w, ; {{ 1, aColors[2] , aColors[4] }} ) } ) FW_SaveImage( hBmp, AllTrim( c_path2 + "Img64_" + ALLTRIM(STR(nCount[1])) + ".bmp" ) ) but the ...

... otro control, sin crear realmente un control de medidor, utilizando esta función: PaintCircularMeter( oWnd, aRect, nInnerDia, nActual, nTotal, aColors, aPen ) viewtopic.php?f=3&t=37806 Ejemplos: \fwh\samples\meter01.prg, meter02.prg, meter03.prg * TBrush: - Nuevo método GdipBrush() --> ...

... any other control, without actually creating a meter contol, by using this function: PaintCircularMeter( oWnd, aRect, nInnerDia, nActual, nTotal, aColors, aPen ) http://forums.fivetechsupport.com/viewtopic.php?f=3&t=37806 \fwh\samples\meter01.prg, meter02.prg, meter03.prg * TBrush: - New method ...

... "CM", "MM" or "PIXEL". If omitted, defaults to PIXEL. New methods: METHOD PieChart( aRect, aValues, [aColors], [aPen], [nStartAngle], [cUnits] )  For quickly diplaying a Piechart of values given in aValues array. aColors: ...

//------------- BMP-Brush ----------- FUNCTION DRAW_BMP( hDC, oBitmap, aColors, nColorSel ) LOCAL oBMPBrush, aGrad LOCAL aRect := GETCLIENTRECT( oBitmap:hWnd ) IF nColorSel = 1 aGrad := { { .5, CLR_WHITE, aColors[2] }, { .5, aColors[2], CLR_BLACK } } ELSE aGrad ...

... (15) Setting a higher value produces a increase in item height - Added parameter lPop to METHOD AddEdit, for use as MENU POPUP AddEdit( aColors, cFile, cRes, lPop ) Sample: Function MyEditMnu( nR, nC, nF, oDlg ) local oMnu MENU oMnu POPUP oMnu:AddEdit(,,,.T.) ENDMENU ACTIVATE MENU oMnu ...

... bitmaps in items of menu principal and popups * Enhancement: CLASS TMENU, allow resource of file image to menuitems in methods METHOD AddEdit( aColors, cFile, cRes ) METHOD AddFile( aColors, cFile, cRes ) METHOD AddHelp( cAbout, cCopyRight, aColors, cFile, cRes ) METHOD AddMdi( aColors, cFile, ...

... bitmap oBmpLogo filename _cBmpLogo ID 180 of oDlg on right click fChangeLogo(@oBmpLogo) oBmpLogo:lTransparent:=.t. fDefineSays(@oDlg,aSays,aColors[3],aColors[1],oFontDlg) Redefine get oGet00 Var cNombreEmpresa Id 100 of oDlg READONLY oGet00:SetColor( _nCd_Black,_nCd_LBlue) Redefine get ...

... an array of Headers to be shown in xbrowse. oTree:Cargo contains an array of grand aggregates. * New function ADORollupTreeBrowse( oRs, [bSetup], [aColors], [aFonts], [aPictures] ) Prepares a tree from a Rs with result of GROUP BY .. WITH ROLLUP and browses the tree. The above two functions work ...

... Please locate METHOD CreateBarGet() CLASS TXBrwColumn ( Line 12450 ) METHOD CreateBarGet() CLASS  TXBrwColumn   local aColors  := Eval( ::bClrEdit )   local lRight   := .f.   if ::uBarGetVal != nil .and. ::oBarGet == nil    ...