2004-07-17 04:14 UTC-0500 David Arturo Macias Corona <dmacias@mail.udg.mx>

* source/rtl/tget.prg
    + Added DATA CapRow and DATA CapCol values

harbour/ChangeLog

@@ -8,6 +8,11 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2004-07-17 04:14 UTC-0500 David Arturo Macias Corona <dmacias@mail.udg.mx>
+  * 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 <alex@belacy.belgorod.su>
   * source/rdd/dbfntx/dbfntx1.c
     ! Bug fixed in soft seek

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