FoxPro/Visual FoxPro - textbox

Hola
Lo que quiero hacer es rellena con ceros a la izquierda a medida que voy escribiendo en un textbox
El textobox des de longitud 12 caracteres pero solo puedo ingresar numero entonces a mediada que voy escribiendo quiero que aparezcan los ceros delante de los numeros que voy tipiando.
para ver esto
Otra conuslta es : Tambien lo que me pasa es que el cursor no aparece a la derecha cuando en la propiedad aligmnet le pongo la opcion right, esto me sucede cuando pongo una mascara en el textbox
la mascara que utilizo es '99.999.999.X'

'000014013420'

Con esta funcion lo reemplazas el contenido del textbox en el campo de tu tabla
NUMERO=14013420
LARGO=12 && Longitud del campo a rellenar con "0"
? padl(ltrim(str(Numero)),largo,'0')

REVISA La propiedad DynamicInputMask