FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour xBrowse - lUseBtnWidthEditOfCol (NEW)
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
xBrowse - lUseBtnWidthEditOfCol (NEW)
Posted: Fri Jan 05, 2018 02:02 PM

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
...

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: xBrowse - lUseBtnWidthEditOfCol (NEW)
Posted: Fri Jan 05, 2018 04:07 PM
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
Regards



G. N. Rao.

Hyderabad, India
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
Re: xBrowse - lUseBtnWidthEditOfCol (NEW)
Posted: Fri Jan 05, 2018 05:18 PM

Yes, thanks

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin

Continue the discussion