FiveTech Software tech support forums

Thanks Antonio. This works!
Anything similar for images created using TITLEIMG?

Antonio Linares wrote:Try this:

oTitle:aText[ 3 ] = "new text"
oTitle:Refresh()

Try this:

oTitle:aText[ 3 ] = "new text"
oTitle:Refresh()

... := { |lInvert| aGradH }  Nages, with local aGradH := ; { { 0.20, aBack[k], aGradient[k] } ; , { 0.30, aGradient[k], atext[k] } ; , { 0.30, atext[k], aGradient[k] } ; , { 0.20, aGradient[k], aBack[k] } ; , .f. ; } I have this https://i.postimg.cc/cJY4ZTBQ/1.png ...

... Regards, saludos. I tried and it crash out with btnbmp local aGradH := ; { { 0.20, aBack[k], aGradient[k] } ; , { 0.30, aGradient[k], atext[k] } ; , { 0.30, atext[k], aGradient[k] } ; , { 0.20, aGradient[k], aBack[k] } ; , .F. ; } oBtnNum[k,t]:bClrGrad := aGradH

... does all calculations and print. Eg: Line( nTop, nLeft, nBottom, nRight, oPen, cUnits ) METHOD Box( nRow, nCol, nBottom, nRight, anoPen, noBrush, aText, cUnits ) METHOD AngleArc( x, y, r, angle, sweep, uPen, uBrush, cUnits ) METHOD Ellipse( nRow, nCol, nBottom, nRight, oPen, nFillClr, aText, cUnits ...

... from HTML https://mybergland.com/fwforum/izipizi/htmleditor_clip3.jpg and replace the placeholder <hr> FOR I: = 1 to len (aText) cHtml: = STRTRAN (cHtml, aText [I, 1], aText [I, 2]) next <hr> aText [I, 2] is your data https://mybergland.com/fwforum/invoicedata.jpg ...

and what are the possible values to [cAlign] in aText ?

Is possible align the text to LEFT(Horizontal) and TOP(Vertical) ?

... not working correctly. Fixed and enhanced. Methods Box and Ellipse are also enhanced. METHOD Box( nTop, nLeft, nBottom, nRight, [uPen], [uBrush], [aText], ; [cUnits] ) METHOD RoundBox( nRow, nCol, nBottom, nRight, nWidth, nHeight, [uPen], ; [uBrush], [aText], [cUnits] ) METHOD Ellipse( nTop, nLeft, ...

... and control too. Sorry, I got confused looking for the right function/method! oWnd/oDlg/oCtrl:Box( nTop, nLeft, nBottom, nRight, uBorder, uBrush, aText ) uBorder can be Color constant, or oPen or hPen. Test with Box() Method of TGet Class but don't function.... https://i.ibb.co/XtT0RwL/2021-01-24-16h16-01.png ...

Why are you looking in tcalex.prg and tgraph.prg for drawing boxes?
TWindow class has a method Box and is available for every dialog and control too.

oWnd/oDlg/oCtrl:Box( nTop, nLeft, nBottom, nRight, uBorder, uBrush, aText )
uBorder can be Color constant, or oPen or hPen.

This works from FWH2007 onwards. Nages, I make a check on fwh April on function TxtInRct( hDC, aRect, aText ) there is a "" ( school office version) on fwh May and June 2020 on function TxtInRct( hDC, aRect, aText ) there is a aRect[4] ( home version) how do you ...

Nages,
Method box ...parametri atext
I can set text font color
How se can add Also the align ?

METHOD Box( nTop, nLeft, nBottom, nRight, ; [Pen], ; // oPen/hPen/nColor/{nColor,nThickness} [Brush], ; // nColor / oBrush [aText], ; // { cText, oFont, nColor } Painted in center cUnits ; // "CM", "MM", "INCHES" ) I tried to use aText array but I can set ...

METHOD Box( nTop, nLeft, nBottom, nRight, ; [Pen], ; // oPen/hPen/nColor/{nColor,nThickness} [Brush], ; // nColor / oBrush [aText], ; // { cText, oFont, nColor } Painted in center cUnits ; // "CM", "MM", "INCHES" ) I tried to use aText array but I can set ...

oTitle:aText[1,3] := ''test"
oTitle:Refresh()