topic-30719

Board index FiveWin for Harbour/xHarbour Left Justify xBrowse Footer

Posts: 2706

Joined: Fri Oct 07, 2005 01:50 PM

Left Justify xBrowse Footer

Posted: Tue May 19, 2015 09:12 PM

To All

I have a Footer for a KeyNo on column 1 which is numeric .. I can justify the header and the data, but How would I left Justify the footer as in this code :

Code (fw): Select all Collapse

oLbxA:aCols[1]:nDataStrAlign := AL_LEFT  // repair number
oLbxA:aCols[1]:nHeadStrAlign := AL_LEFT

oLbxA:lFooter   := .t.
oCol           := oLbxA:aCols[ 1 ]
oCol:bFooter   := { || Ltrim( Str( oLbxA:KeyNo() ) ) + " / " + LTrim( Str( oLbxA:KeyCount() ) ) }
oLbxA:bChange   := { || oCol:RefreshFooter() }