oRep:aFont[ 1 ] is Tahoma size 0,-8
oRep:aFont[ 2 ] is Tahoma size 0,-8 bold
I need to have another font
I made
oFontCopy := TFont():New("TAHOMA",0,-108,.F.,,180,,,,,,,,,,oRep:oDevice) //to print a text nscapment
aadd(oRep:aFont, oFontCopy)
then
oRep:bStartPage := { || oRep:Say(10, cTextCopy, 3,2,1450) }
why not run ?
the error
- Code: Select all Expand view
- Error description: Error BASE/1132 Bound error: array access
Args:
[ 1] = A {0,0} length: 2
[ 2] = N 3
Stack Calls
===========
Called from: Lib\report.prg => TREPORT:SAY( 528 )
let say me there are only two element of array aFont but I need N 3
but on aFont there are 3 element ( xbrowse(oRep:afont) )
How I can resolve ?