ENTER me saca del Dialogo (FWH 11.12)

[Enrrique Vertiz]

Estimados, no se si alguien mas haya tenido este problema, entro a diferentes dialogos donde tengo varios GETs un par de BUTTOMs, Etc. al llegar al 4to get via ENTER (via TAB funciona Ok), que es un Get de 8 caracteres con un VALID simplemente me saca del dialogo, lo he probado en 3 dialogos diferentes y pasa lo mismo en la misma opcion, y en otra mas, pero como menciono si llego al GET via TAB trabaja bien, debo mencionar que en los otros 3 entornos de trabajo que tengo anteriores a este (FWH 11.12, xH121_9411 y Bcc63) funcionaba todo Ok, estos anteriores son :

FWH 10.02, xHb121_6406, Bcc55
FWH 10.08, xHb121_6717, Bcc58
FWH 10.09, xHb121_9336, Bcc63

Gracias por su ayuda

[carlos vargas]

estimado, puedes compartirl el codigo de un dialogo donde ocurra el problema, asi como el rc de ese dialogo.

salu2
carlos vargas

[Enrrique Vertiz]

Saludos Carlos

He estado haciendo mas pruebas y lo que menciono sucede siempre despues de un control RADIO, osea el GET funciona bien en cualquier caso, pero justo el GET que esta despues de un RADIO es el que tiene ese comportamiento anormal, es mas en caso inverso si tengo un GET y despues cualqueir control, con el ENTER pasa el control tal cual como lo hacia en las versiones anteriores, pero si despues del GET viene un RADIO al darle ENTER no avanza, se queda en el mismo campo, claro como indique anteriormente con TAB si avanza, muy raro, seguire revisando, si alguien tiene idea de que pueda ser ??????

[Antonio Linares]

Enrique,

Este ejemplo funciona bien. Por favor pruébalo y verifica si te funciona bien, gracias

Code: Select all  Expand view

#include "FiveWin.ch"

function Main()

   local oDlg, nValue := 1, cTest := "Test"

   DEFINE DIALOG oDlg
   
   @ 1, 1 RADIO nValue ;
      ITEMS "&One", "&Two", "T&hree"

   @ 2, 10 GET cTest SIZE 70, 10
   
   @ 3, 10 BUTTON "Ok" ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED

return nil

[Enrrique Vertiz]

Saludos Antonio

Gracias por contestar, el codigo que pones funciona bien, al igual que otras partes de mi programa que tienen BUTTOM y GET juntos, he tratado de buscar una caracteristica que diferencie los que SI funcionan con el ENTER sin problemas y los que NO funcionan y me botan del dialogo y no la encuentro .....
Lo raro es que si funciona en el entorno anterior (Fwh 10.02 y 10.09), alguna idea por favor, por donde puedo buscar, gracias

[carlos vargas]

por favor ten la caridad de postear al meno el rc, y el codigo del rc
para no dar giros, un ejemplo funcional de un dialogo con un rc para estos casos
es lo adecuado.

salu2

[Enrrique Vertiz]

Saludos Carlos, voy a tratar de sacar una opcion con su dialogo a fin de que se pueda compilar por separado y poder postearla

[carlos vargas]

se agradece,

te pido el rc ya que no hace mucho me sucedio algo similar, y esta relacionado a
como estaban enumerados los controles, y sobre un group al cual le caia foco, y dialogo se cerraba.
normalmente los goup no debe tener el ws_tabstop.

no recuerdo exactamente como era el asunto, el caso es que era similar a lo que te pasa,
salida del dialogo de forma no normal.

[Enrrique Vertiz]

Carlos

En este LINK esta solo 3 lineas del PRG y el Dialogo completo, he probado quitando el WS_TABSTOP, el GROUP, en fin, creo que ya me perdi, lo que si tengo claro es que en los dialogos que no hay GRUPO en el RADIO BUTTOM (osea un cuadrado que los agrupe) no pasa el error, pero si borro el GRUPO en este dialogo donde si sucede, igual me bota, creo que estoy perdiendo el hilo, mejor lo veo manana con mas calma, adjunto el link del .PRG donde esta incluido el .RC
www.consorcioinformatico.net/prueba.prg
Gracias

[Enrrique Vertiz]

Yo uso PellesC y pase el RES a RC para revisarlo, y he notado que estan definidos los botones de 2 formas diferentes, en algunos dialogos, que es donde da el error, estan asi :

CONTROL "Nac.", 104, "BUTTON", BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP, 460, 7, 25, 12
CONTROL "Ext.", 105, "BUTTON", BS_AUTORADIOBUTTON | WS_TABSTOP, 488, 7, 23, 12

Y en otros donde si funciona correctamente estan definidos asi :

RADIOBUTTON "Completo", 103, 6, 46, 57, 12, BS_AUTORADIOBUTTON | WS_GROUP | WS_TABSTOP
RADIOBUTTON "Parcial", 104, 6, 64, 58, 12, BS_AUTORADIOBUTTON | WS_TABSTOP

Probare borrando el Control y definiendolo de nuevo como RADIO BUTTOM, vere si con eso se soluciona.

[Enrrique Vertiz]

Sigue sin funcionar ....., en PellesC ya todos son Control, la forma anterior es como se veia en un .RC, ahora si estoy perdido, no tengo ni idea, alguna ayuda .....
OJO mencionar que si quito el RADIO BUTTOM antes del GET a este llego con ENTER y TAB sin problemas, pero si dejo el RADIO BUTTOM ahi me bota en del GET (cierra el Dialogo) sin mensaje alguno

[Patricio Avalos Aguirre]

Hola

solo para ir descartando, reemplaza el BtnGet

Code: Select all  Expand view

REDEFINE TBTNGET oFte VAR cFte ID 104 OF oDlg RESOURCE "buscar16" PICTURE "!" VALID chkfte(cFte,.t.,cMes,nSas,oFte,oDlg) ;
        ACTION (zoomlbx(oFte,600,300,"1"))
 

por este

Code: Select all  Expand view

REDEFINE GET oFte VAR cFte ID 104 OF oDlg PICTURE "!" VALID chkfte(cFte,.t.,cMes,nSas,oFte,oDlg) ;
         ACTION (zoomlbx(oFte,600,300,"1"))
 

[Enrrique Vertiz]

Saludos Patricio, gracias por contestar, el problema persiste, OJO que hice una prueba en la tarde y si quito el RADIO BUTTOM si funciona, he revisado el codigo y el dialogo en recurso, le quite y le puse el ws_tabstop y nada ...., la linea exacta del problema es la que esta en ROJO, la saco (obviamente del programa y del dialogo) y el TBTNGET de la variable "cVou" funciona sin problemas, tambien mencionar que el problema es solo con ENTER, con TAB y Click de mouse no se sale ..... :

REDEFINE GET oFte VAR cFte ID 600 OF oDlg VALID chkft5(cFte,.f.,cMes,nSas,oFte,oDlg,cFt1) READONLY

REDEFINE RADIO oRb1 VAR nRb1 ID 104,105 OF oDlg VALID chkft5(cFte,.f.,cMes,nSas,oFte,oDlg,cFt1)

REDEFINE TBTNGET oVou VAR cVou ID 106 OF oDlg RESOURCE "busca116" PICTURE "@!K" VALID chkre5(cMes,cVou,cVo1,oFte,cFte,oDlg,oSas,oSad)

[Ariel]

hola,
proba poniendo una bandera en la funcion chkft5(), a ver si te pasa antes o despues, he notado q a partir de la version 11.09 creo q era, se modifico el control.prg, el metodo _SetFocus(), y te pasa al proximo control... solo es una pista...
saludos.

[Antonio Linares]

Enrique,

Cuando dices que te saca del diálogo entiendo que el diálogo se cierra pero la ejecución del programa continua normalmente, si ?

Tiene el diálogo un VALID ?

Prueba a usar este VALID:

ACTIVATE DIALOG oDlg VALID If( oDlg:nLastKey == VK_RETURN, "Aqui", .T. )