Page 1 of 1

xBrowse - lUseBtnWidthEditOfCol (NEW)

Posted: Fri Jan 05, 2018 2:02 pm
by MGA
Hello, Mr. Rao / Antonio,
In some cases I have to increase the width of the button size of the GET. However, when editing, the button disappears. I made this change in class xbrowse, evaluate the interest in putting in the next versions of fivewin.

oBrowse:aCols[1]:nBtnWidth := 30
oBrowse:aCols[1]:nWidth := 160
oBrowse:aCols[1]:cEditPicture := '@!'
oBrowse:aCols[1]:nEditType := EDIT_GET_BUTTON
oBrowse:aCols[1]:lUseBtnWidthEditOfCol := .t.

xbrowse.prg:

CLASS TXBrwColumn
DATA lUseBtnWidthEditOfCol AS LOGICAL INIT .F.

METHOD Edit( nKey ) CLASS TXBrwColumn
...
if ::lUseBtnWidthEditOfCol
nBtnWidth := ::nBtnWidth
else
if ::nBtnBmp > 0 .and. len( ::aBitmaps ) >= ::nBtnBmp // ButtonGet
nBtnWidth := ::aBitMaps[ ::nBtnBmp, BITMAP_WIDTH ] // ButtonGet
else
nBtnWidth := 4
endif
endif
...

Re: xBrowse - lUseBtnWidthEditOfCol (NEW)

Posted: Fri Jan 05, 2018 4:07 pm
by nageswaragunupudi
However, when editing, the button disappears.

Thanks for pointing out the issue. We notice the problem.
We shall resolve this issue, without even adding new DATA.
You can expect the modification in FWH18.01

Re: xBrowse - lUseBtnWidthEditOfCol (NEW)

Posted: Fri Jan 05, 2018 5:18 pm
by MGA
Yes, thanks