oBrw:report() ... control fonts

oBrw:report() ... control fonts

Postby Silvio.Falconi » Wed Dec 13, 2023 11:57 am

oRep:aFont already has two fonts built by the browse object

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  RUN
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) )

Image

How I can resolve ?
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7070
Joined: Thu Oct 18, 2012 7:17 pm

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 41 guests