Page 1 of 1
Consulta sobre Get " SOLUCIONADO "
Posted:
Thu Apr 21, 2022 7:48 pmby remtec
Hola Amigos
Tengo un problema que no me había dado cuenta, es la secuencia de los GETs, al dar ENTER.
. Cuando ingresa, toma el foco el ID 110, al dar ENTER, debiera pasar al ID 120, pero inmediatamente toma el foco el Botón Id 604, que va a validar los 2 Gets.
Como puedo corregir, para que mediante el ENTER, pase de los 2 Gets y luego al botón Aceptar (Id 604)?
En el recurso el índice de los tab Index, están secuencia en los gets.
Muchos saludos
Antonio.
Codigo:
- Code: Select all Expand view
DEFINE DIALOG oDlg RESOURCE "#1007" Title " "
REDEFINE BITMAP oBmp1 ID 601 RESOURCE "#8022" TRANSPARENT OF oDlg
REDEFINE BITMAP oBmp1 ID 600 RESOURCE "#8023" TRANSPARENT OF oDlg
REDEFINE SAY oSay1 ID 603 PROMPT OemToAnsi(alltrim("INFORMES DE CAJA")) OF oDlg FONT oFont1 COLORS RGB( 56, 76, 170)
REDEFINE Get oCod_usu1 Var Cod_usu1 Id 110 Of oDlg UPDATE Picture "@!" COLORS RGB( 9, 43, 47)
REDEFINE Get oCla_usu1 Var Cla_usu1 Id 120 Of oDlg UPDATE Picture "@!" COLORS RGB( 9, 43, 47)
REDEFINE Button Id 605 Of oDlg Border ;
ACTION (Ing_1:=0,Ing_2:=0,oDlg:End()) // Boton Salida
REDEFINE Button Id 604 Of oDlg ;
ACTION IF(!Valida_usu(Cod_usu1,Cla_usu1),(MsgStop(Mensa), Ing_1:=0, Ing_2:=0,.F.), ( oDlg:End(), .T.) ) // Aqui Boton Acepta
ACTIVATE DIALOG oDlg CENTERED VALID (!GETKEYSTATE( 27 ))
FWH 22.03 Harbour Pelles C
Re: Consulta sobre Get
Posted:
Thu Apr 21, 2022 9:36 pmby karinha
¿Identificó las características <1/2> de Workshop.exe? Luego use TAB para ver si están "cayendo" en los GETS correctos. Publique el .RC que lo hace más fácil.
Regards, saludos.
Re: Consulta sobre Get
Posted:
Thu Apr 21, 2022 10:23 pmby FranciscoA
Saludos Antonio.
Como dice João, asegurate que, en el WindosStyle (en el editor de recursos), los Gets tengan definido el TabStop como YES.
Re: Consulta sobre Get
Posted:
Thu Apr 21, 2022 10:37 pmby remtec
Muchas gracias Karinha y Francisco.
Es un archivo RES, si tiene activado los TAbStop estan activados en YES.
El Enter desde el primer Get, me envía directo al botón de validación, solo con el mouse puedo ingresar el dato del segundo Get.
Saludos.
Antonio.
Re: Consulta sobre Get
Posted:
Thu Apr 21, 2022 10:53 pmby karinha
¿Qué sucede cuando usa <TAB> en los recursos? ¿"Saltar" correctamente? Es decir, directamente en el Editor de recursos. Esto es imposible con WrorkShop.exe. el mejor.
Regards, saludos.
Re: Consulta sobre Get
Posted:
Thu Apr 21, 2022 11:19 pmby remtec
Hola Karinha.
Muchas gracias por responder.
Uso Pelles C, recurso RES, si al hacer el Test, salta correctamente desde Primer Get, Segundo Get y Botón Validar.
Muchos Saludos.
Antonio.
Re: Consulta sobre Get
Posted:
Fri Apr 22, 2022 7:22 amby Garbi
Se me ocurre lo siguiente.
El campo Cod_usu1 tenga por ejemplo una longitud de 5 posiciones, al llenar las 5 posiciones pasa directamente al Cla_usu1 (segundo get) y el cliente pulsa intro para pasar al segundo get pensando que esta en el primer get pero al estar en el segundo pasa al botón.
Una solución se me ocurre que pongas más posiciones al Cod_usu1 para que el usuario tenga obligación de pulsar intro.
No recuerdo si desde el rc cambiando alguna configuración del get se espera a pulsar intro aunque se llene el campo.
Re: Consulta sobre Get
Posted:
Fri Apr 22, 2022 1:37 pmby remtec
Hola Garbi
Muchas gracias por responder.
El cliente si usa el TAB, va en secuencia correcta con los Get, hasta el boton validad.
Pero el usar el ENTER, que es su requerimiento, desde el primer Get, el Boton coma el Focus.
Quedo atento a alguna sugerencia.
Saludos
Antonio
FWH 22.03 Harbour - Pelles C
Re: Consulta sobre Get
Posted:
Fri Apr 22, 2022 1:49 pmby karinha
Holá, post el .prg y el .RES / .RC para testes en el Mega Upload que simulo en el WorkShop.exe.
Regards, saludos.
Re: Consulta sobre Get
Posted:
Fri Apr 22, 2022 8:58 pmby remtec
Hola Amigo Karinha
Muchas gracias por tu ayuda.
Ya lo solucione, al parecer era un poco compleja con recursos, asi es que cambie a coordenadas "DEFINE DIALOG oDlg2 SIZE 350,250 PIXEL TRUEPIXEL FONT oFont2 STYLE nOr( WS_POPUP, WS_VISIBLE, WS_DLGFRAME )".
Ahora funciona perfecto.
Muchas gracias por todo.
Saludos
Antonio.
karinha wrote:Holá, post el .prg y el .RES / .RC para testes en el Mega Upload que simulo en el WorkShop.exe.
Regards, saludos.
Re: Consulta sobre Get "SOLUCIONADO"
Posted:
Fri Apr 22, 2022 8:59 pmby remtec
remtec wrote:Hola Amigos
Tengo un problema que no me había dado cuenta, es la secuencia de los GETs, al dar ENTER.
. Cuando ingresa, toma el foco el ID 110, al dar ENTER, debiera pasar al ID 120, pero inmediatamente toma el foco el Botón Id 604, que va a validar los 2 Gets.
Como puedo corregir, para que mediante el ENTER, pase de los 2 Gets y luego al botón Aceptar (Id 604)?
En el recurso el índice de los tab Index, están secuencia en los gets.
Muchos saludos
Antonio.
Codigo:
- Code: Select all Expand view
DEFINE DIALOG oDlg RESOURCE "#1007" Title " "
REDEFINE BITMAP oBmp1 ID 601 RESOURCE "#8022" TRANSPARENT OF oDlg
REDEFINE BITMAP oBmp1 ID 600 RESOURCE "#8023" TRANSPARENT OF oDlg
REDEFINE SAY oSay1 ID 603 PROMPT OemToAnsi(alltrim("INFORMES DE CAJA")) OF oDlg FONT oFont1 COLORS RGB( 56, 76, 170)
REDEFINE Get oCod_usu1 Var Cod_usu1 Id 110 Of oDlg UPDATE Picture "@!" COLORS RGB( 9, 43, 47)
REDEFINE Get oCla_usu1 Var Cla_usu1 Id 120 Of oDlg UPDATE Picture "@!" COLORS RGB( 9, 43, 47)
REDEFINE Button Id 605 Of oDlg Border ;
ACTION (Ing_1:=0,Ing_2:=0,oDlg:End()) // Boton Salida
REDEFINE Button Id 604 Of oDlg ;
ACTION IF(!Valida_usu(Cod_usu1,Cla_usu1),(MsgStop(Mensa), Ing_1:=0, Ing_2:=0,.F.), ( oDlg:End(), .T.) ) // Aqui Boton Acepta
ACTIVATE DIALOG oDlg CENTERED VALID (!GETKEYSTATE( 27 ))
FWH 22.03 Harbour Pelles C
Re: Consulta sobre Get " SOLUCIONADO "
Posted:
Sat Apr 23, 2022 10:31 amby jvtecheto
Hola amigo Remtec.
Me alegro que lo has solucionado, pero yo creo que deberíamos ahondar porque no funciona con recursos, ya que creo es mucho más práctico.
Ahora que tienes tiempo, si puedes postear el prg y el. Rc lo probaríamos, Joao también se ha ofrecido.
Un saludo
Jose.
Enviado desde mi POCOPHONE F1 mediante Tapatalk
Re: Consulta sobre Get " SOLUCIONADO "
Posted:
Sat Apr 23, 2022 2:22 pmby remtec
Amigos João y José.
Muy buen día.
Muchas gracias por su ayuda y tiempo dedicado.
Anoche aun cuando había solucionado el problema, cambiando a coordenadas sin recurso, decidí seguir revisando y efectivamente la definición de tipo de botón Aceptar, tenia una diferencia.
Botón: Estaba definido en el Type como " DefaultPushbutton", lo modifique a "Pushbutton" y se soluciono el problema, ahora pasa del Get 1, Get 2 y Botón Aceptar.
Muchas gracias por todo su interés y ayuda.
Muchos saludos.
Antonio
Re: Consulta sobre Get " SOLUCIONADO "
Posted:
Sat Apr 23, 2022 2:36 pmby jvtecheto
Perfecto amigo.
Asi es como debe ser.
Saludos
Jose.
Re: Consulta sobre Get " SOLUCIONADO "
Posted:
Sat Apr 23, 2022 2:52 pmby remtec
Amigo Jose
Muchas gracias por tu ayuda.
Que tengas un buen día.
Muchos Saludos.
Antonio.