fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Antonio Linares
1999-08-07 17:27:52 +00:00
parent c00bc733a2
commit 0f954ce607
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
harbour/source/rtl/tbcolumn.prg
View File

@@ -51,7 +51,7 @@ function TBColumnNew( cHeading, bBlock )
oCol:Heading = cHeading
oCol:block = bBlock
oCol:Width = If( cHeading != nil, Len( cHeading ), 10 )
oCol:Width = If( cHeading != nil, Len( cHeading ), Len( Eval( bBlock ) ) )
return oCol