Dear Detlef,
Please modify this line in tget.prg this way:
FW_SayText( ::hDC, If( Empty( Eval( ::bSetGet ) ), "", Transform( Eval( ::bSetGet ), ::cPicture ) ), aRect, "R", ::oFont, ::nClrText )
now it works as you need
Silvio.Falconi wrote:the user can digit only number and "." on a get