In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Edit

Foro público de Xailer en español
Responder
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

Edit

Mensaje por carlosijc »

Hola nuevamente
Resulta que tengo los datos de las claves de los usuarios en un campo
llamado Clave y rClave
al hacer los siguiente:
WITH OBJECT ::oDS2 // es la tabla de usuarios
::oEdClvUser:cPassWordChar := "*"
::oEdClvUser:lPassWord := .T.
::oEdClvUser:Value := :Clave
::oEdRClvUser:Value := :rClave
o lo que es lo mismo
::oEdClvUser:Value := :FieldGetByName("Clave")
::oEdRClvUser:Value := :FieldGetByName("rClave")
END OBJECT
No visualizo la clave,, con el MaskEdit si me lo visualiza, pero no se como
hacer para que no se muestre la clave
Gracias
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

Edit

Mensaje por carlosijc »

Esto pasa solo cuando la propiedad
lPassWord es .T., pero el objetivo sin duda alguna es ocultar las claves
Gracias
"Carlos Cedeño Vera" <carlosijc@gmail.com> escribió en el mensaje
news:[email=425d54e0@ozsrvnegro.ozlan.local...]425d54e0@ozsrvnegro.ozlan.local...[/email]
> Hola nuevamente
> Resulta que tengo los datos de las claves de los usuarios en un campo
> llamado Clave y rClave
>
> al hacer los siguiente:
>
> WITH OBJECT ::oDS2 // es la tabla de usuarios
> ::oEdClvUser:cPassWordChar := "*"
> ::oEdClvUser:lPassWord := .T.
> ::oEdClvUser:Value := :Clave
> ::oEdRClvUser:Value := :rClave
> o lo que es lo mismo
> ::oEdClvUser:Value := :FieldGetByName("Clave")
> ::oEdRClvUser:Value := :FieldGetByName("rClave")
> END OBJECT
>
> No visualizo la clave,, con el MaskEdit si me lo visualiza, pero no se
como
> hacer para que no se muestre la clave
>
> Gracias
>
>
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Edit

Mensaje por jfgimenez »

Carlos,
no entiendo exactamente cual es el problema.
Si lPassWord = .T., entonces no se muestran los caracteres cuando escribes,
sino que aparecen unos asteriscos o unos bolos. Eso es lo correcto.
--
Un saludo,
José F. Giménez
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

Edit

Mensaje por carlosijc »

Si mira francisco, ya lo he probado
Por ejemplo, yo he hecho lo siguiente
WITH OBJECT ::oEDClvUser
:lPassWord := .T.
:Value := ::oDS2:Clave // este caso me funciona con :lPassword == .F.
pero el objetivo es que no se muestre la clave
END
y no lo hace,, tambi'en me he dado cuenta que cuando deshabilita el
::oEDClvUser o sea lEnabled es .F. por el ID, en tiempo de ejecucion no
logro habilitarlo.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:425e289e$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Carlos,
>
> no entiendo exactamente cual es el problema.
>
> Si lPassWord = .T., entonces no se muestran los caracteres cuando
escribes,
> sino que aparecen unos asteriscos o unos bolos. Eso es lo correcto.
>
> --
> Un saludo,
>
> José F. Giménez
>
>
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

Edit

Mensaje por carlosijc »

Otra cosa que se me olvidaba,, en caso de que lo edite, si me trabaja sin
problemas, yo solo quiero mostrar los bolos o los asterisco en el Edit.
Gracias
"Carlos Cedeño Vera" <carlosijc@gmail.com> escribió en el mensaje
news:[email=425e9fb1@ozsrvnegro.ozlan.local...]425e9fb1@ozsrvnegro.ozlan.local...[/email]
> Si mira francisco, ya lo he probado
>
> Por ejemplo, yo he hecho lo siguiente
>
> WITH OBJECT ::oEDClvUser
> :lPassWord := .T.
> :Value := ::oDS2:Clave // este caso me funciona con :lPassword ==
..F.
> pero el objetivo es que no se muestre la clave
> END
>
> y no lo hace,, tambi'en me he dado cuenta que cuando deshabilita el
> ::oEDClvUser o sea lEnabled es .F. por el ID, en tiempo de ejecucion no
> logro habilitarlo.
>
>
>
>
>
> "Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
> news:425e289e$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > Carlos,
> >
> > no entiendo exactamente cual es el problema.
> >
> > Si lPassWord = .T., entonces no se muestran los caracteres cuando
> escribes,
> > sino que aparecen unos asteriscos o unos bolos. Eso es lo correcto.
> >
> > --
> > Un saludo,
> >
> > José F. Giménez
> >
> >
>
>
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Edit

Mensaje por jfgimenez »

Carlos,
lo he estado revisando, y he comprobado que lPassword no se puede cambiar
una vez que se ha creado el control. Por lo tanto, deberás ponerlo desde el
IDE.
Si te es absolutamente necesario cambiarlo a posteriori, la única forma de
hacerlo es así:
::oEDClvUser:SendMsg( EM_SETPASSWORDCHAR, Asc( "*" ) )
De todos modos, lo seguiré revisando por si se puede resolver mejor.
--
Un saludo,
José F. Giménez
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
carlosijc
Mensajes: 66
Registrado: Lun Mar 07, 2005 8:07 am

Edit

Mensaje por carlosijc »

Ok,, muchas gracias francisco
Saludos
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:[email=425eba7a@ozsrvnegro.ozlan.local...]425eba7a@ozsrvnegro.ozlan.local...[/email]
> Carlos,
>
> lo he estado revisando, y he comprobado que lPassword no se puede cambiar
> una vez que se ha creado el control. Por lo tanto, deberás ponerlo desde
el
> IDE.
>
> Si te es absolutamente necesario cambiarlo a posteriori, la única forma de
> hacerlo es así:
>
> ::oEDClvUser:SendMsg( EM_SETPASSWORDCHAR, Asc( "*" ) )
>
> De todos modos, lo seguiré revisando por si se puede resolver mejor.
>
> --
> Un saludo,
>
> José F. Giménez
>
>
Responder