Page 1 of 1
xbrowse header size
Posted: Wed Mar 05, 2008 6:12 pm
by Silvio
How I can see the size of each header with a click ?
Re: xbrowse header size
Posted: Wed Mar 05, 2008 6:51 pm
by JC
Silvio wrote:How I can see the size of each header with a click ?
Hello Silvio!
Try this implementation at method HeaderLButtonUp at the end of implementation of original code...
Code: Select all
METHOD HeaderLButtonUp( nMRow, nMCol, nFlags ) CLASS TXBrwColumn
...
nCol := ::oBrw:MouseColPos( nMCol ) // if the column header was clicked... more than 0, was clicked!
IF nCol > 0 .AND. !lDragged && if not for swapping the column
oCol := ::oBrw:colAtPos( nCol ) // returns the object columns that was clicked
alert( oCol:nWidth )
ENDIF
RETURN
Posted: Thu Mar 06, 2008 8:09 am
by Silvio
thanks
But I remember there was a xbrowse method made it
I remember of a utility of Otto made it and created the source od each column...
where i can found it ?
Posted: Thu Mar 06, 2008 8:53 am
by Otto
Posted: Thu Mar 06, 2008 10:59 am
by Silvio
thanks
but I remember there was an command to use on xbrowse :
I used it and the when I finished to set all columns size I rem this command
this commando shoed the column size when I drag each column : it shoed a message on video with the size variable and I not Know where I take it !!!
Posted: Thu Mar 06, 2008 11:03 am
by Otto
have a look into:
func f_SaveState(oBrw)
in the testxbr.prg.
Posted: Thu Mar 06, 2008 1:24 pm
by JC
Silvio wrote:thanks
But I remember there was a xbrowse method made it
I remember of a utility of Otto made it and created the source od each column...
where i can found it ?
Exists the method GetDisplayColsWidth( aSizes )... but, internally, it is the same structure... Think fine!