[Gambas-user] Problem with lcdnumber - don't show decimal point

[jj at ...1636...]

Hi All!

I've created a display for a Point of sale, but when I
press the point decimal, the display with lcd number not show the
decimal.

This is the code for the display button (click event).

--------
PUBLIC SUB botones_display_Click()

 SELECT CASE LAST.get_action()
  CASE "C"
   TPV.display.Value = 0

  CASE "0" TO "9"

   IF Len(CString(TPV.display.Value)) < 10 THEN
    TPV.display.Value = TPV.display.value & CFloat(LAST.tag)
   END IF

  CASE "."

   IF (InStr(CString(TPV.display.Value), ".") = 0) THEN
    TPV.display.Value = TPV.display.Value & "." --> DONT WORK!
   END IF
....

it's possible show "1.0" in the lcdnumber?? and "1."??  I can do this?
how?

thank you!!