Footers do not appear, as expected, if we write
oBrw:lFooter := .t.
oBrw:aCols[n]:bFooter := {|| "footertext" }
unless we specify cFooter, that too not empty, atleast for one column.
To make bFooters work, without having to specify non empty cfooter to atleast one column, following changes are to be made. The changes are also necessary to allocate correct width for bfooters
column object's FooterHeight method
column object's FooterWidth method
oBrw:lFooter := .t.
oBrw:aCols[n]:bFooter := {|| "footertext" }
unless we specify cFooter, that too not empty, atleast for one column.
To make bFooters work, without having to specify non empty cfooter to atleast one column, following changes are to be made. The changes are also necessary to allocate correct width for bfooters
column object's FooterHeight method
// if !Empty( ::cFooter ) .and. ::oFooterFont != nil // existing code
if ( iif( ::bFooter == nil, ::cFooter, Eval( ::bFooter ) ) ) != nil .and. ::oFooterFont != nil // new codecolumn object's FooterWidth method
// cText := ::cFooter // existing code
cText := If( ::bFooter == nil, ::cFooter, Eval( ::bFooter ) ) // new code
...
...
// if !Empty( cText ) // old code
if cText != nil // new codeRegards
G. N. Rao.
Hyderabad, India
G. N. Rao.
Hyderabad, India