TextBox

Al control TextBox aplicale a la propiedad Value=0, para tomar el campo
numerico.

La captura del dato la hace de acuerdo al InputMask y seguro la tiene sin
decimales, pero como no tenes numerico el TextBox, al vos querer visualizar
el dato lo haces con Val(This.value), entonces ahi entra en funcion el Set
Decimal que por default tiene el programa cargado con 2 decimales y eso es
lo que ves.

Saludos

"Claudio Terrazas Gútemberg" wrote in message
news:ue4$

Tengo un control TextBox, cuyo InputMask = 99

Si tecleo un valor por ejemplo 1 dentro del control, después al hacer

las

validaciones me doy cuenta que su valor se convierte a 1.00

?This.Value && resulta 1.00
?This.Text && resulta 1

Necesito tomas el valor numérico 1, sin embargo si tomo This.Text, lo
convierto a número resulta igual,

? Val(This.Text) && resulta 1.00


Ojalá alguien tenga experiencia al respecto. Utilizo VFP 6.0


Claudio T. G.
Oaxaca, México

Gracias Carlos. En sí en el Init del formulario le pongo un dato numérico al
TextBox. Coloqué 0 a la Propiedad Value, tal como lo indicas pero sigue
igual. No entiendo porqué, tengo otros controles TextBox y no me causan éste
problema y haciendo la comparación tienen las mismas propiedades. La verdad
ya llevo un buen rato con ésto.


"Carlos" escribió en el mensaje
news:

Al control TextBox aplicale a la propiedad Value=0, para tomar el campo
numerico.

La captura del dato la hace de acuerdo al InputMask y seguro la tiene

sin

decimales, pero como no tenes numerico el TextBox, al vos querer

visualizar

el dato lo haces con Val(This.value), entonces ahi entra en funcion el Set
Decimal que por default tiene el programa cargado con 2 decimales y eso es
lo que ves.

Saludos

"Claudio Terrazas Gútemberg" wrote in message
news:ue4$
> Tengo un control TextBox, cuyo InputMask = 99
>
> Si tecleo un valor por ejemplo 1 dentro del control, después al hacer
las
> validaciones me doy cuenta que su valor se convierte a 1.00
>
> ?This.Value && resulta 1.00
> ?This.Text && resulta 1
>
> Necesito tomas el valor numérico 1, sin embargo si tomo This.Text, lo
> convierto a número resulta igual,
>
> ? Val(This.Text) && resulta 1.00
>
>
> Ojalá alguien tenga experiencia al respecto. Utilizo VFP 6.0
>
>
> Claudio T. G.
> Oaxaca, México
>
>

Hola Claudio:
Me explicare mejor, cuando veo que visualizas el contenido del Textbox
con ?Val(This.value), me imagino que la captura del dato la tenes caracter.
Y lo que que pienso que al ver los resultados del ?Val(This.value),
efectivamente te presenta 1.00 pero eso te lo arroja por la configuracion
del Set Decimal que por default tiene 2 decimales.

De otra forma visualiza el contenido del Texbox con solamente:

?This.Value y ahi si veras tu resultado igua a 1

Nota: Si en el Init del formulario pusistes
Thisform.textBox.value = 0 es mejor.





"Claudio Terrazas Gútemberg" wrote in message
news:

Gracias Carlos. En sí en el Init del formulario le pongo un dato

numérico al

TextBox. Coloqué 0 a la Propiedad Value, tal como lo indicas pero sigue
igual. No entiendo porqué, tengo otros controles TextBox y no me causan

éste

problema y haciendo la comparación tienen las mismas propiedades. La

verdad

ya llevo un buen rato con ésto.


"Carlos" escribió en el mensaje
news:
> Al control TextBox aplicale a la propiedad Value=0, para tomar el

campo

> numerico.
>
> La captura del dato la hace de acuerdo al InputMask y seguro la

tiene

sin
> decimales, pero como no tenes numerico el TextBox, al vos querer
visualizar
> el dato lo haces con Val(This.value), entonces ahi entra en funcion el

Set

> Decimal que por default tiene el programa cargado con 2 decimales y

eso es

> lo que ves.
>
> Saludos
>
> "Claudio Terrazas Gútemberg" wrote in

message

> news:ue4$
> > Tengo un control TextBox, cuyo InputMask = 99
> >
> > Si tecleo un valor por ejemplo 1 dentro del control, después al

hacer

> las
> > validaciones me doy cuenta que su valor se convierte a 1.00
> >
> > ?This.Value && resulta 1.00
> > ?This.Text && resulta 1
> >
> > Necesito tomas el valor numérico 1, sin embargo si tomo This.Text,

lo

> > convierto a número resulta igual,
> >
> > ? Val(This.Text) && resulta 1.00
> >
> >
> > Ojalá alguien tenga experiencia al respecto. Utilizo VFP 6.0
> >
> >
> > Claudio T. G.
> > Oaxaca, México
> >
> >
>
>
>

Claudio:
Lo ultimo que se me ocurre es que tienes en el ControlSource del objeto,
un campo numerico con 2 decimales.

Entonces el resultado siempre seria con 2 decimales, pero la captura seria
sin decimales por efecto del InputMask.



Si esto fuera asi,
"Claudio Terrazas Gútemberg" wrote in message
news:ue4$

Tengo un control TextBox, cuyo InputMask = 99

Si tecleo un valor por ejemplo 1 dentro del control, después al hacer

las

validaciones me doy cuenta que su valor se convierte a 1.00

?This.Value && resulta 1.00
?This.Text && resulta 1

Necesito tomas el valor numérico 1, sin embargo si tomo This.Text, lo
convierto a número resulta igual,

? Val(This.Text) && resulta 1.00


Ojalá alguien tenga experiencia al respecto. Utilizo VFP 6.0


Claudio T. G.
Oaxaca, México

Cierto Carlos, la verdad es que no pensaba que la función Val convierte a
enteros y decimales.
Solucioné mi problema colocándole en el Init() del formulario la
instrucción:
Set Decimals to 0

y en el Unload()

Set Decimals to 2

Lo pongo aquí por si a alguien más le sirve.


Claudio T. G.
Oaxaca, México

"Carlos" escribió en el mensaje
news:%

Hola Claudio:
Me explicare mejor, cuando veo que visualizas el contenido del Textbox
con ?Val(This.value), me imagino que la captura del dato la tenes

caracter.

Y lo que que pienso que al ver los resultados del ?Val(This.value),
efectivamente te presenta 1.00 pero eso te lo arroja por la configuracion
del Set Decimal que por default tiene 2 decimales.

De otra forma visualiza el contenido del Texbox con solamente:

?This.Value y ahi si veras tu resultado igua a 1

Nota: Si en el Init del formulario pusistes
Thisform.textBox.value = 0 es mejor.





"Claudio Terrazas Gútemberg" wrote in message
news:
> Gracias Carlos. En sí en el Init del formulario le pongo un dato
numérico al
> TextBox. Coloqué 0 a la Propiedad Value, tal como lo indicas pero

sigue

> igual. No entiendo porqué, tengo otros controles TextBox y no me

causan

éste
> problema y haciendo la comparación tienen las mismas propiedades. La
verdad
> ya llevo un buen rato con ésto.
>
>
> "Carlos" escribió en el mensaje
> news:
> > Al control TextBox aplicale a la propiedad Value=0, para tomar el
campo
> > numerico.
> >
> > La captura del dato la hace de acuerdo al InputMask y seguro la
tiene
> sin
> > decimales, pero como no tenes numerico el TextBox, al vos querer
> visualizar
> > el dato lo haces con Val(This.value), entonces ahi entra en funcion

el

Set
> > Decimal que por default tiene el programa cargado con 2 decimales y
eso es
> > lo que ves.
> >
> > Saludos
> >
> > "Claudio Terrazas Gútemberg" wrote in
message
> > news:ue4$
> > > Tengo un control TextBox, cuyo InputMask = 99
> > >
> > > Si tecleo un valor por ejemplo 1 dentro del control, después al
hacer
> > las
> > > validaciones me doy cuenta que su valor se convierte a 1.00
> > >
> > > ?This.Value && resulta 1.00
> > > ?This.Text && resulta 1
> > >
> > > Necesito tomas el valor numérico 1, sin embargo si tomo

This.Text,

lo
> > > convierto a número resulta igual,
> > >
> > > ? Val(This.Text) && resulta 1.00
> > >
> > >
> > > Ojalá alguien tenga experiencia al respecto. Utilizo VFP 6.0
> > >
> > >
> > > Claudio T. G.
> > > Oaxaca, México
> > >
> > >
> >
> >
> >
>
>