GET cuando esta como PASSWORD no funciona del todo el change

GET cuando esta como PASSWORD no funciona del todo el change

Postby goosfancito » Sat Nov 25, 2023 7:51 am

Hola.

Code: Select all  Expand view
METHOD setGets() CLASS TUsuarios

   ::oGets := Array( 5 )
   ::vGets := Array( 5 )

   REDEFINE GET ::oGets[ 1 ] VAR ::vGets[ 1 ] ID 100 PICTURE "@!" OF ::oDlg
   REDEFINE GET ::oGets[ 2 ] VAR ::vGets[ 2 ] ID 102 PICTURE "@!" OF ::oDlg
   REDEFINE GET ::oGets[ 3 ] VAR ::vGets[ 3 ] ID 104 OF ::oDlg                                 <--------- EN EL RECURSO ESTA COMO PASSWORD

   REDEFINE checkbox ::oGets[ 4 ] VAR ::vGets[ 4 ] ID 106 OF ::oDlg
   REDEFINE checkbox ::oGets[ 5 ] VAR ::vGets[ 5 ] ID 108 OF ::oDlg

   RETURN ( NIL )

method pantalla()

   DEFINE DIALOG oDlg resource "BRWUSUARIOS"

   ::setGets()
   ::setBrw()
   ::setBtns()

   //----------( )----------

   ::oGets[ 1 ]:bchange := { | | ::oGets[ 1 ]:assign(), ::controlBtn() }
   ::oGets[ 2 ]:bchange := { | | ::oGets[ 2 ]:assign(), ::controlBtn() }
   ::oGets[ 3 ]:bchange := { | | ::oGets[ 3 ]:assign(), ::controlBtn() }      <-------------- Cuando escribo el método funciona, PERO cuando empiezo a borrar no funciona

   ::oGets[ 4 ]:bchange := { || IIf( ::vGets[ 4 ], MsgInfo( "si" ), MsgInfo( "no" ) ) }

   ACTIVATE DIALOG oDlg CENTERED ON INIT ( this:inicializar(), this:leerUsuarios() )
 
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: GET cuando esta como PASSWORD no funciona del todo el change

Postby jll-fwh » Wed Nov 29, 2023 8:24 pm

Hola goosfancito:

El problema que veo que no tienes inicializados los elementos del ARRAY ::vGets := Array( 5 ), la forma más fácil es la de toda la vida y veras como funciona. Sería mejor inicializar las variables en el método CREATE() pero cada uno tiene su metodología de trabajo.

::vGets := Array( 5 )

// Cada elemento puede inicializarse como sea necesario, en este caso, puede ser así:
::vGets[1] := Space( 50 )
::vGets[2] := Space( 50 )
::vGets[3] := Space( 50 )
::vGets[4] := Space( 50 )
::vGets[5] := Space( 50 )

Javier Lloris
javierllorisprogramador@gmail.com
Blogs personales:
Programación: https://javierlloris.blogspot.com/
Japonés: https://bitacorajaponesa.blogspot.com/
Cubos de Rubik: https://www.instagram.com/jllorisperson ... 2ybz0gmvul
Tengo una colección de unos 100 cubos de todo tipo de formas geométricas, todos resueltos, en instagram solo hay unos cuentos cubos.
Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
User avatar
jll-fwh
 
Posts: 408
Joined: Fri Jan 29, 2010 8:14 pm
Location: Meliana - Valencia

Re: GET cuando esta como PASSWORD no funciona del todo el change

Postby goosfancito » Thu Nov 30, 2023 4:33 pm

hola
no lo puse pero si, tengo inicializado los valores.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Re: GET cuando esta como PASSWORD no funciona del todo el change

Postby jll-fwh » Thu Nov 30, 2023 9:03 pm

Hola goosfancito:

Muestra el código fuente real, método del constructor y el método que te da problemas sino complicado saber donde esta el fallo. Yo tengo programas con campos Password y nunca he tenido problemas con ninguna versión. Alguna linea que ahora no ves, no esta bien, siempre son chorradas que no vemos porque nos enzecamos y no leemos bien el código.

Un abrazo compi y buena noche.
Javier Lloris
javierllorisprogramador@gmail.com

Blogs personales:
Programación: https://javierlloris.blogspot.com/
Japonés: https://bitacorajaponesa.blogspot.com/
Cubos de Rubik: https://www.instagram.com/jllorisperson ... 2ybz0gmvul
Tengo una colección de unos 100 cubos de todo tipo de formas geométricas, todos resueltos, en instagram solo hay unos cuentos cubos.
Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
User avatar
jll-fwh
 
Posts: 408
Joined: Fri Jan 29, 2010 8:14 pm
Location: Meliana - Valencia


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 36 guests