Yes, it's a known bug, also related to the one
Edmer has sent not long ago. I don't know when
I'll have free time to look at this and fix it,
so I'd welcome if someone would do some fixing
work on this remaining untested part of
TGet(): ::unTransform(), ::PutMask() and ::Picture().
I highly recommend using /tests/rto_get.prg to
verify and compare results with Clipper while
fiddling with them.
There are BTW quite some more incompatibilities
and other uncovered side-cases in these three
functions. Most of them aren't critical though.
Brgds,
Viktor
On 2008.06.04., at 20:29, Enrico Maria Giordano wrote:
In the following sample press a numeric key and you will see that
the decimal separator become the dot:
FUNCTION MAIN()
LOCAL GetList := {}
LOCAL nVar := 0
@ 10, 10 GET nVar;
PICTURE "@EZ 999,999.99"
READ
RETURN NIL
EMG
--
EMAG Software Homepage: http://www.emagsoftware.it
The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum
The Best of Spectrum Games: http://www.emagsoftware.it/tbosg
The EMG Music page: http://www.emagsoftware.it/emgmusic
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
