* modification to be more Clip*r compliant and behaviour.
* changes in the logic of the function.
before, the function only erased the character under the cursor.
now it drags the other characters.
dragging is limited by the non editable characters.
* METHOD Insert()
* modification to be more Clip*r compliant and behaviour.
* changes in the logic of the function.
now insert a character and displaces to the right the rest of
the characters until the first non editable character.
METHOD ::ParsePict() - The change is because if ::Original it is not
numeric, it would generate an error.
METHOD ::Undo() - Delete assignment to ::buffer because
::VarPut( ::Original, .t. ) makes this assignment.
METHOD ::VarPut() - Delete ::nDispLen := NIL line, because
::Picture() makes this assignment.
- Revert changes of Ignacio Ortiz because the
problem was with ::nDispLen and not with empty cPicture.
METHOD ::Block() - Delete ::nDispLen := NIL line, because
::Picture() makes this assignment.
METHOD ::Picture() - Add ::nDispLen := NIL line, reset the variable.
Only ::ParsePict() can load a value that can differ of
nMaxLen.
METHOD ::KillFocus() - Change position of lines, hasfocus should be
before the call to Putmask.
This makes that in numeric fields, points or comas are not
shown before the numbers.
* source/compiler/harbour.c
+ Added all GET Methods definitions (still need Exported Vars ) - Thanks to Luiz.
+ Added TBCOLUMN definitions - Thanks to Luiz.
* source/rtl/tget.prg
! Correted :ToDecPos to return SELF as in Clipper (after verifying there was NO Low-Level Code conflict).
* source/compiler/harbour.sly
+ Added rule to accept Get and GetA as FunCall
* source/compiler/harbour.y
+ Added support for pseudo function _GET_()
* source/compiler/harbour.l
+ Added _GET_(...) => __GET(...)/__GETA(...) logic from harbour.sly
* source/macro/macro.slx
* Corrected YY_DECL #define (Thanks John)
* source/rtl/tget.prg
* include/hbextern.ch
- Removed no longer needed _GET_()
* source/compiler/harbour.sly
+ Added support for extended parameters to __GET() and __GETA()
! Corrected 2nd parameter of __GETA() to reflect only the Base Array Name.
* source/rtl/tget.prg
! Added support for :SubScript in __GETA()
* include/hbextern.ch
- Removed _GET_
+ Added __GETA
* source/compiler/harbour.sly
! Optimized _GET_ support.
+ Added support for GET of ObjectData and ObjectData ArrayIndex.
* source/rtl/tget.prg
+ Added method ParsePict() and logic to support dynamic modification of the picture by altering :Picture as in Clipper.
* tests/testread.prg
+ Added line to demonstrate GET of ObjectData and dynamic modification of a PICTURE clause.
* source/compiler/harbour.slx
+ Added support for pseudo function _GET_(...)
* source/compiler/harbour.sly
+ Added support for pseudo function _GET_(...) to be converted into appropriate __GET(...) or __GETA(...)
* source/rtl/tget.prg
+ Added __GETA() to correctly support early binding of Array Element Index of GET
* tests/testread.prg
+ Added code to test correct (early) binding of Array Element Index of GET
