diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 64ec05ded0..80035a50fb 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -7,6 +7,9 @@
    For example:
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
+2002-10-17 14:40 UTC-0300 Luiz Rafael Culik <culikr@uol.com.br>
+   * source/rtl/tbrowse.prg
+     ! Fixed SetColumnMethod() that was not using all Display Area(The nWidthMax variable was substraced by 2)
 2002-10-17 15:00 UTC+0700 Andi Jahja <andijahja@cbn.net.id>
    * source/compiler/harbour.sly
    * source/compiler/harbour.y
diff --git a/harbour/source/rtl/tbrowse.prg b/harbour/source/rtl/tbrowse.prg
index c8bbd47a94..e19b6deccf 100644
--- a/harbour/source/rtl/tbrowse.prg
+++ b/harbour/source/rtl/tbrowse.prg
@@ -495,7 +495,7 @@ METHOD SetColumnWidth( oCol ) CLASS TBrowse
 
    // if oCol has :Width property set I use it
    if oCol:Width <> nil
-      nWidth := Min(oCol:Width, nWidthMax - 2)
+      nWidth := Min(oCol:Width, nWidthMax)
 
    else
       if ISBLOCK( oCol:block )
@@ -526,7 +526,7 @@ METHOD SetColumnWidth( oCol ) CLASS TBrowse
          enddo
       endif
 
-      nWidth:= Min(iif(nColwidth > nLen, nColwidth, nLen), nWidthMax - 2)
+      nWidth:= Min(iif(nColwidth > nLen, nColwidth, nLen), nWidthMax )
 
    endif