Page 1 of 1
Get con PASSWORD.
Posted: Fri Mar 20, 2015 12:29 am
by Yessica
Maestros del Fivewin, necesito de su ayuda.
Tengo un control GET en un Dialogo.
Local cPass:= Space(10)
REDEFINE GET oGet VAR cPass ID 100 Of oDgl --> Aqui por el momento no lo tengo en PASSWORD.
La pregunta es, ¿es posible qu después que capturan el dato en el Get, que éste se oculte con asteriscos?
Ojo, cuando capturan se debe visualizar lo que se esta capturando no los asteriscos, sólo hasta que salen del Control GET es cuando deseo que se pongan los asteriscos.
Espero me puedan ayudar.
Gracias
Re: Get con PASSWORD.
Posted: Fri Mar 20, 2015 1:56 am
by Willi Quintana
Hola,,, este ejemplo de un GET que permite ver el password te ayudara.
Code: Select all
REDEFINE GET oPass ;
VAR cPass ;
ID 102 OF oDlg; //
BITMAP "VERPASS" ACTION (oPass:lPassword := .f., oPass:Refresh(), SysWait(0.5), oPass:lPassword := .t., oPass:Refresh() ) ;
CUEBANNER "Contraseña"
oPass:lPassword := .t.
oPass:bGotFocus() := { || lOk := .f. }
oPass:SetPos(nPos)
Re: Get con PASSWORD.
Posted: Fri Mar 20, 2015 2:24 am
by Yessica
Willi Quintana wrote:Hola,,, este ejemplo de un GET que permite ver el password te ayudara.
Code: Select all
REDEFINE GET oPass ;
VAR cPass ;
ID 102 OF oDlg; //
BITMAP "VERPASS" ACTION (oPass:lPassword := .f., oPass:Refresh(), SysWait(0.5), oPass:lPassword := .t., oPass:Refresh() ) ;
CUEBANNER "Contraseña"
oPass:lPassword := .t.
oPass:bGotFocus() := { || lOk := .f. }
oPass:SetPos(nPos)
Willi, gracias por contestarme, permiteme una pregunta:
Cuando el usuario digite el dato en el Get, lo tiene que ver asi tal cual, como si no fuera para PASSWORD, despues cuando pase a otro control, el contenido del Get debe ahora verse como si fuera un PASSWORD, osea con asteriscos (*************)
Es así tu ejemplo?
Re: Get con PASSWORD.
Posted: Fri Mar 20, 2015 3:20 am
by D.Fernandez
Yessica así me funcionó:
LOCAL oGetpass,cPass:=Space(10)
Redefine Get oGetpas VAR cPass ID 110 OF oDlg FONT oFontArial UPDATE
oGetpass:bValid := {||CambioGet(oGetpass) }
FUNCTION CAMBIOGET(oGetpass)
oGetpass:lPassword:=.t.
oGetpass:Refresh()
Return(.T.)
Saudos
Ruben Dario Fernandez
Re: Get con PASSWORD.
Posted: Fri Mar 20, 2015 4:29 pm
by Willi Quintana
Hola Yessica,,, D:Fernandez lo hizo bien,,, creo que es como lo que requieres....
Re: Get con PASSWORD.
Posted: Fri Mar 20, 2015 6:32 pm
by VitalJavier
Yesica, yo lo ucupe para la recarga electrónica de Telcel.
asi :
REDEFINE GET oRec[2,1] VAR oRec[2,2] ID 201 OF oDlg_Rec PICTURE "9999999999" FONT aLetras[21]
oRec[2,1]:bLostFocus := {|| oRec[2,1]:lPassword := .T.}
oRec[2,1]:bSetfocuss := {|| oRec[2,1]:lPassword := .F.}
Espero y te sirva.
Re: Get con PASSWORD.
Posted: Fri Mar 20, 2015 6:45 pm
by Yessica
D.Fernandez wrote:Yessica así me funcionó:
LOCAL oGetpass,cPass:=Space(10)
Redefine Get oGetpas VAR cPass ID 110 OF oDlg FONT oFontArial UPDATE
oGetpass:bValid := {||CambioGet(oGetpass) }
FUNCTION CAMBIOGET(oGetpass)
oGetpass:lPassword:=.t.
oGetpass:Refresh()
Return(.T.)
Saudos
Ruben Dario Fernandez
Maestros: Willi y Fernandez, muuchasss gracias, lo probé y quedó. Son buenos colegas!!!
Re: Get con PASSWORD. (Solucionado)
Posted: Fri Mar 20, 2015 6:46 pm
by Yessica
Compañeros Gracias son realmente muy buenos.
Exactamente esto quería Fernández.
Willi gracias por tu apoyo.
