Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Input Mask Only Numeric and Decimal Point
Message
De
25/03/2011 09:26:08
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
MS SQL Server
Divers
Thread ID:
01504500
Message ID:
01504969
Vues:
154
Would you try this trick?

Don't bound textbox to any table/cursor field, just give real value to the textbox when cursor movement
And leave InputMask property as blank
*!*
*!* your cusor movement or controlsource assigned
*!*
thisform.text1.Value = yourcursor.field_name  && this is char type field
thisform.text2.ControlSource = "yourcursor.another_field_name" 


*!*
*!* text1.gotfocus event
*!*
this.Value = VAL(this.Value)
this.InputMask = [99999.99]

*!*
*!* text1.lostfocus event
*!*
IF this.Value > 0
  this.Value = TRANSFORM(this.Value)
ELSE
  this.Value = ""
ENDIF
this.InputMask = ""
*!* you can update the change to table/cursor here
REPLACE yourcursor.field_name WITH this.Value
Regards,
Ony
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform