Saludos, probare lo mencionado
Antonio, si me saca del Dialogo, pero no del programa, como si ubiera presionado ESC, el programa sigue funcionando normalmente ....
Ariel, puso la bandera en el VALID y mostro el mensaje ya con el dialogo cerrado, asumo que el problema esta antes de llegar al VALID
Antonio, si tenia un VALID la activacion del dialogo, se lo quite y puse lo que sugeriste (If( oDlg:nLastKey == VK_RETURN, "Aqui", .T. )), pero no me mostro cambio alguno, el problema continuo ......
Gracias por la atencion
Antonio, en este link hay un video donde se muestra como en mi compilacion anterior (FWH 10.09) el ENTER trabaja sin problemas en el dialogo, pero en el FWH 11.12 me cierra el dialogo y me regresa a la pantalla principal, es lo unico que me detiene para poder pasar a esta ultima version de FWH, gracias por la atencion.
Enrique,
Prueba en el VALID del diálogo a generar un error para que asi sepamos cuando sale, por que métodos ha pasado:
ACTIVATE DIALOG oDlg VALID x++ // aqui generará un error
sal con Enter y veamos que llamadas se han efectuado en el error log, gracias
Antonio, encontre el tema, quitando el termino NOMODAL del ACTIVATE en el dialogo se soluciono, ahora asi no reportaba problemas hasta el 10.09, pero lo importante es que ya funciona !!!
Activacion del dialogo que me sacaba despues de ENTER en un radio buttom :
ACTIVATE DIALOG oDlg NOMODAL ON INIT iif(wfcua # "S" .and. wfempt # "1",(oAu4:hide(), oDe4:hide(), oAs4:hide(), oAz4:hide()), NIL) ON CLICK oDlg:update() VALID CloseDlg( nOpc, nAre, nReg )
Activacion que ya no me saco del dialogo despues del enter
ACTIVATE DIALOG oDlg ON INIT iif(wfcua # "S" .and. wfempt # "1",(oAu4:hide(), oDe4:hide(), oAs4:hide(), oAz4:hide()), NIL) ON CLICK oDlg:update() VALID CloseDlg( nOpc, nAre, nReg )
Gracias por el apoyo !!!
Saludos Antonio, el exceso de entusiasmo me hizo contestar demasiado rapido, ahora como indico para que el dialogo sea NOMODAL ???
Gracias
Enrique,
Si necesitas usar un diálogo no modal ahí no hay otra que usar NOMODAL 
Que acciones realizas en CloseDlg( nOpc, nAre, nReg ) ? Puedes mostrar el código ?
Antonio, probando en el ACTIVATE quito todo y solo dejo la indicacion de NOMODAL y permanece el error
ACTIVATE DIALOG oDlg NOMODAL
Entonces el problema esta unicamente cuando pongo NOMODAL !!! y claro siempre despues del ENTER al pasar de un RADIO BUTTOM a un GET, ahi esta el asunto ...
if nID == IDOK
::GoNextCtrl( GetFocus() )
if ! ::lModal
return 0
endif
#include "FiveWin.ch"
function Main()
local oWnd
DEFINE WINDOW oWnd
ACTIVATE WINDOW oWnd ON INIT NonModal()
return nil
function NonModal()
local oDlg, oRad, nValue := 1
DEFINE DIALOG oDlg
@ 1, 1 RADIO oRad VAR nValue ;
ITEMS "&One", "&Two", "T&hree" SIZE 80, 12
@ 3, 10 BUTTON "Ok" ACTION MsgInfo( "ok" )
ACTIVATE DIALOG oDlg NOMODAL CENTER
return nilAntonio, gracias a Ti, funciono ahora si correctamente .....
Seguimos probando
Buen dia Foro
he notado que tambien hay problemas con los DIALOG CON FOLDER, aparecen en la esquina y luego los centra un efecto raro y se ve feo
saludos..
Javier..
Javier,
Puedes proporcionar un pequeño ejemplo que reproduzca lo que comentas ? gracias
#define PAGE1 oFolder:aDialogs[1]
DEFINE BRUSH oBrush RESOURCE "confetti"
DEFINE DIALOG oDlg NAME "FOLDERX" BRUSH oBrush
REDEFINE FOLDER oFolder ;
ID 102 OF oDlg ;
ITEMS "Opcion 1" ;
DIALOGS "DIALOG_1"
REDEFINE GET oGet1 ;
VAR cVar1 ;
ID 201 OF PAGE1 ;
PICTURE "9999999999"
//20 get mas
ACTIVATE DIALOG oDlg ;//CENTERED ;
ON INIT ( oDlg:nHeight+= 50,;
oFolder:nHeight+= 100,;
SetImages( oDlg, { "venta.bmp" }, oFolder ) ) ;
NOMODAL