diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 33503fd67b..efbcad1378 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,11 @@ 2002-12-01 23:12 UTC+0100 Foo Bar */ +2004-07-17 04:14 UTC-0500 David Arturo Macias Corona + * source/rtl/tget.prg + + Added DATA CapRow and DATA CapCol values + For Clipper 5.3x compatibility + 2004-07-16 13:40 UTC+0300 Alexander Kresin * source/rdd/dbfntx/dbfntx1.c ! Bug fixed in soft seek diff --git a/harbour/source/rtl/tget.prg b/harbour/source/rtl/tget.prg index d33f096f41..c7201b912f 100644 --- a/harbour/source/rtl/tget.prg +++ b/harbour/source/rtl/tget.prg @@ -102,6 +102,8 @@ CLASS Get DATA Message DATA Caption DATA nLastExitState + DATA CapRow + DATA CapCol #endif DATA cColorSpec HIDDEN // Used only for METHOD ColorSpec @@ -212,6 +214,8 @@ METHOD New( nRow, nCol, bVarBlock, cVarName, cPicture, cColorSpec ) CLASS Get ::cPicture := cPicture #ifdef HB_COMPAT_C53 ::Caption := "" + ::CapRow := 0 + ::CapCol := 0 #endif return Self