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
