Hi Ella,
If you change from:
for n := ::nHeaderHeight to 1 step -1
::SetPos( nRow + n - 1, nCol )
DispOut( PadR( __StrToken( @cS, n, ";" ), nPadLen ), cColor )
next
to
for n := ::nHeaderHeight to 1 step -1
::SetPos( nRow + n - 1, nCol )
DispOut( PadR( __StrToken( @cS, n + 1, ";" ), nPadLen ), cColor )
next
resolves the problem too (METHOD WriteMLineText).
FabioNery
"Ella Stern" <ella.st...@xharbour.com> escreveu na mensagem
news:cabcrpzbbc4pahp3hb3l2jn8ykfmhlgsr0asxg8aalth0srx...@mail.gmail.com...
Hello,
I suggest the following solution:
in /source/rtl/tbcolumn.prg in the NEW method of TBColumn class
I suggest changing this code line
::Heading := if( valtype( cHeading ) == 'C', cHeading, ' ' )
with this code:
::Heading := if( valtype( cHeading ) == 'C', ;
cHeading + if( rat(cHeading,";")>0.and.cHeading[-1]<>";",
";", "" ), ;
' ' )
Ella
On Wed, Sep 7, 2011 at 2:35 PM, Ella Stern <ella.st...@xharbour.com> wrote:
Hello,
The issue has been tested with xHarbour as of September 6 ( 2011 ).
When a TBColumn caption string contains semicolon character(s), for
wrapping the string on multiple lines, the text, which follows the last
semicolon is not displayed.
In /source/rtl/tbrowse.prg in the WriteMLineText method there is a comment,
which suggests the solution of adding the semicolon to the end of the caption
text.
This workaround is working, but it enforces the users to review all their
source codes.
Ella
------------------------------------------------------------------------------
------------------------------------------------------------------------------
Doing More with Less: The Next Generation Virtual Desktop
What are the key obstacles that have prevented many mid-market businesses
from deploying virtual desktops? How do next-generation virtual desktops
provide companies an easier-to-deploy, easier-to-manage and more affordable
virtual desktop model.http://www.accelacomm.com/jaw/sfnl/114/51426474/
------------------------------------------------------------------------------
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
------------------------------------------------------------------------------
BlackBerry® DevCon Americas, Oct. 18-20, San Francisco, CA
Learn about the latest advances in developing for the
BlackBerry® mobile platform with sessions, labs & more.
See new tools and technologies. Register for BlackBerry® DevCon today!
http://p.sf.net/sfu/rim-devcon-copy1
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
