Hello
I start using xbrowse and i see a little problem:
http://img143.imageshack.us/my.php?image=xbrwmv3.jpg
Is it normal?
Fwh 8.01
Thanks.
Wanderson
Maurizio wrote:Hello Wanderson
I add this in xBrowse.prg
// nAdjColumn is the colums to expand
DATA nAdjColumn AS NUMERIC
METHOD Adjust() CLASS TXBrowse
local nFor, nLen, nHeight, nStyle
Local nTot := 0
LOcal nMaxWidth := ::nWidth() - 5
nLen := len( ::aCols )
nHeight := 0
::GetDC()
for nFor := 1 to nLen
::aCols[ nFor ]:Adjust()
IIF( ::nAdjColumn > 0 , nTot += ::aCols[ nFor ]:nWidth ,)
next
IIF( ::nAdjColumn > 0 , ::aCols[::nAdjColumn ]:nWidth += nMaxWidth - nTot,)
::ReleaseDC()
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 60 guests