FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Xbrowse celltext-centered using < EDIT_GET_LISTBOX > ?
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Xbrowse celltext-centered using < EDIT_GET_LISTBOX > ?
Posted: Mon Aug 22, 2016 02:25 PM
Hello,

is it possible to use the full cellwidth using xBrowse < EDIT_GET_LISTBOX > ?
It means to display the arrow on TOP of the celltext and NOT using a
extra space.
Maybe the celltext can be adjusted ( centerd ) to the FULL cellwidth after leaving the row with no visible arrow.
The celltext needed to shown centered.

:aCols[I]:nWidth := 100
:aCols[I]:nDataStrAlign := AL_CENTER // doesn' t work
:aCols[I]:nHeadStrAlign := AL_CENTER
:aCols[I]:nEditType := EDIT_GET_LISTBOX
:aCols[I]:aEditListBound := ;
:aCols[I]:aEditListTxt := { "F", "M", "S", "F-M-S", "Frei", "Urlaub", "Krank" }




regards
Uwe :-)
Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
Posts: 474
Joined: Sun Oct 30, 2005 06:37 AM
Re: Xbrowse celltext-centered using &lt; EDIT_GET_LISTBOX &gt; ?
Posted: Mon Sep 05, 2016 08:44 AM

method paintdata() class txcolumn
if nType > 1
if ! Empty( aBitmap := ::aBitmap( ::nBtnBmp ) )
nBtnWidth := aBitMap[ BITMAP_WIDTH ] + 1
aBitmap := nil
else
nBtnWidth := 10
endif
nButtonRow := nRow
nButtonCol := nCol + nWidth - nBtnWidth
// nWidth -= ( nBtnWidth + 5 )
// remove this line
endif

Shuming Wang

http://www.xtech2.top
Mobile:(86)13802729058
Email:100200651@qq.com
QQ:100200651
Weixin: qq100200651

Continue the discussion