+ Add two protected methods. FirstEditable() and LastEditable().
Several change for use this methods.
! Fix in ParsePict method
* @D function, overwrite the mask for SET DATE FORMAT
* @S without lenght parameter or @S0, they don't have effect.
! Fix in Untransform method
* if ::lEdit is false, return ::VarGet() without evaluate
the buffer contained.
* Better detection of a negative, minimizing false detections.
* Improvement in the handling of mask.
* More compliant in @D, @E, @X, @C, @(, @) functions.
* In compliant with Clipper, the lenght of number (internal lenght)
corresponds to the applied picture.
! Bug in conversion with date types and with @E function.
! Fix in Overstrike and Insert method
* First it is evaluated if the input character is valid, before
cleaning the var.
! Fix in Input method
* The minus sign can be writed in any place.
* Now work with '$' and '*' templates in numeric gets.
! Fix in PutMask method
* More compliant in the handling of some get functions.
* When edit a get with @B, the number is editing right-justified.
! Fix in Backspace method
* Permit delete a '(' symbol in a non-editable position, when
this symbol represent a negative number.
! Fix in Delete method
! When delete a negative symbol '(' or '-', turn the ::minus tu false
! Fix in IsBadDate function
! Evaluate crrectly a date with @E function.
* 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.
