Page 1 of 1
***** EN PASSWORD COM WORKSHOP.EXE
Posted: Mon Sep 24, 2007 3:06 pm
by karinha
Code: Select all
//-> Maestro Antonio, Que Falta Hacer, Para Que Siempre Que Jo Tenga un
//-> GET CON PASSWORD en WORKSHOP.EXE O PELLESC.EXE, Venga Siempre un *** ??
// De Esta Forma, Sole Viene en la Entrada de la Window Principal,
// en los DIALOGOS, Vienes ||||| (chr(149)) y No ****(chr(42)) Ayuda-me!
//
METHOD DispText() CLASS TGet
if ::lPassword .and. ::oGet:Type == "C"
#ifdef __CLIPPER__
SetWindowText( ::hWnd, Replicate( "*", Len( Trim( ::oGet:buffer ) ) ) )
#else
/* //-> Modifiquei em 26/08/2007 - Para Aparecer um * no PASSWORD-WS
SetWindowText( ::hWnd, Replicate( If( IsAppThemed(), Chr( 149 ), "*" ),;
Len( Trim( ::oGet:buffer ) ) ) )
*/
SetWindowText( ::hWnd, Replicate( If( IsAppThemed(), Chr( 42 ), "*" ),;
Len( Trim( ::oGet:buffer ) ) ) )
#endif
else
SetWindowText( ::hWnd, ::oGet:buffer )
endif
return nil
Muchas Gracias,
Regards, saludos.
Posted: Mon Sep 24, 2007 3:46 pm
by surGom
Hola Karina yo utilizo un get y en el código pongo:
REDEFINE GET oGet VAR cLogin id 101 of odlg valid IIF(buscon(cItem,@cLogin,oGet),lreturn := .t.,.f.)
oGet:lpassword := .t.
Espero sea la respuest a tu consulta
Utilizó workshop y fwh26 y xharbour 9.61
Luis
Posted: Mon Sep 24, 2007 4:03 pm
by karinha
surGom wrote:Hola Karina yo utilizo un get y en el código pongo:
REDEFINE GET oGet VAR cLogin id 101 of odlg valid IIF(buscon(cItem,@cLogin,oGet),lreturn := .t.,.f.)
oGet:lpassword := .t.
Espero sea la respuest a tu consulta
Utilizó workshop y fwh26 y xharbour 9.61
Luis
Gracias Luis, Voy intentar y Reporto.
Regards, saludos.
desde recurso
Posted: Mon Sep 24, 2007 8:03 pm
by Ramon Paredes
Karina,
Desde el workshop te permite definir en tu dialogo los get como pasword asi te convierte lo que digites durante la captura en ******, en las propiedades de text style puedes definie password, con un check y listo.
y en la aplicacion no tienes mas que hacer un get normal
REDEFINE GET oPass Var mPass ID 101 of oDlg
Ojala te ayude,
Ramon Paredes
Managua, Nicaragua
Re: desde recurso
Posted: Mon Sep 24, 2007 8:11 pm
by karinha
Ramon Paredes wrote:Karina,
Desde el workshop te permite definir en tu dialogo los get como pasword asi te convierte lo que digites durante la captura en ******, en las propiedades de text style puedes definie password, con un check y listo.
y en la aplicacion no tienes mas que hacer un get normal
REDEFINE GET oPass Var mPass ID 101 of oDlg
Ojala te ayude,
Ramon Paredes
Managua, Nicaragua
Gracias Ramon...
Hago asi:
Está correcto?
DLG_SENHAS_USUARIOS DIALOG 94, 94, 288, 74
STYLE DS_ABSALIGN | DS_MODALFRAME | 0x4L | WS_OVERLAPPED | WS_VISIBLE | WS_CAPTION | WS_THICKFRAME
CAPTION "Senhas de Acessos"
FONT 8, "MS Sans Serif"
{
EDITTEXT 103, 169, 12, 100, 14, ES_CENTER | ES_PASSWORD | WS_BORDER | WS_TABSTOP
PUSHBUTTON "&Gravar Dados", 301, 67, 46, 90, 17
PUSHBUTTON "&Cancelar", 302, 160, 46, 60, 17
CTEXT "Senha do Operador:", 405, 18, 12, 148, 14, SS_CENTER | WS_BORDER | WS_GROUP
}
asi es
Posted: Mon Sep 24, 2007 8:19 pm
by Ramon Paredes
Karina,
Asi te debe funcionar bien con sus asteriscos,
Ramon Paredes
Managua, Nicaragua
Re: asi es
Posted: Mon Sep 24, 2007 8:34 pm
by karinha
Ramon Paredes wrote:Karina,
Asi te debe funcionar bien con sus asteriscos,
Ramon Paredes
Managua, Nicaragua
Ramon, en WINDOWS XP, NO!
Regards, saludos.
QUE PROBLEMAS TE DA ?
Posted: Mon Sep 24, 2007 8:50 pm
by Ramon Paredes
Karina,
Yo trabajo con XP profesional SP 2 y me funciona bien, que problemas te presenta, o que no funciona ?
Ramon Paredes
Managua, Nicaragua
Re: QUE PROBLEMAS TE DA ?
Posted: Mon Sep 24, 2007 9:08 pm
by karinha
Ramon Paredes wrote:Karina,
Yo trabajo con XP profesional SP 2 y me funciona bien, que problemas te presenta, o que no funciona ?
Ramon Paredes
Managua, Nicaragua
Ramon, si és un DIALOGO en el Window Principal, el GET devuelve asi:
****, se és en un DIALOGO normal de otra funcion, me devuelve asi: |||
Mi gusta asi: ***
Comprende?
te envie un correo
Posted: Mon Sep 24, 2007 9:26 pm
by Ramon Paredes
Karina,
Te envie un correo con un ejemplo practico, en uno de los menu, presento un dialogo con pasword, independiente de la pantalla principal y me devuelve ****** ojala te sirva, te envie el fuente y el recurso para que lo revises ok,
Saludes
Ramon Paredes
Managua, Nicaragua
Posted: Tue Sep 25, 2007 1:00 pm
by karinha
Gracias Ramon... Mas és lo que lo dice, en una VENTANA PRINCIPAL, funciona perfecto, cuando estoy en UNA DIALOG de Otra funcion, retorna: |||||, entonces, para que se tenga el efecto de WINDOWS XP, usa-se una FUENTE TAHOMA. Asi, WINDOWS XP, retorna una PELOTA, bien bonita.
Regards, saludos.
Posted: Wed Sep 26, 2007 1:11 am
by Vital
Karina, prueba cambiandole el tipo de letra al Dialogo, yo le pongo TAHOMA 10
Posted: Wed Sep 26, 2007 12:21 pm
by karinha
Vital wrote:Karina, prueba cambiandole el tipo de letra al Dialogo, yo le pongo TAHOMA 10
Gracias VITAL, és lo que hago. Creo, no és Posible retorno con: ****.
Muchas gracias.
Regards, saludos.