Hi, Sorry, I'm not the right person to commit changes to the SVN - my intention was to ask somebody familiar with the code to do it.
The issue is a side effect of changes in hb_atokens, and of course there are multiple solutions. Ella On Tue, Sep 13, 2011 at 9:50 PM, FabioNery <des...@s2info.com.br> wrote: > ** > 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-5nwgofrqmnerv+lv9mx5uipxlwaov...@public.gmane.org > > 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 > >
------------------------------------------------------------------------------ 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
