WINDOWTYPE .., CONDICIONAR

[SALINETAS24]

Hola a todos.

¿ Hay alguna forma de condicionar el formato de una ventana al valor de una variable ..?

Sería hacer algo como esto.

Code: Select all

	nTipo:=1
	
	DEFINE WINDOW Win_MACU		;
		AT 15,15			;
		WIDTH 800				;
		HEIGHT 690				;
		TITLE IF(nIdioma=1,"Plan Contable","Maintenance Conctable Plan")+ " -- "+xEmp  ;		
		ICON 'EDITAR'  ;
		NOMAXIMIZE ;
		WINDOWTYPE IF(ntipo=1,MODAL,CHILD) ;  // --> esto es lo que quiero hacer
		ON INIT    IF(!Empty(Ini),Activa_Gets(aField,.T.,,Ini,_aItem,_aPosi,"Cuentas",_aVer), nil) ;
		ON RELEASE IF(IsWindowDefined ( Win_MaAgen ),DoMethod( "Win_MaAgen", "release"),NIL);
		BACKCOLOR  COLOR_P

Gracias de antemano.

[SALINETAS24]

Hola, finalmente lo hago con una condición y con 2 DEFINE WINDOW.., de todas formas le daré un vistazo al INCLUDE para ver si es posible modificarlo para que el tipo WINDOW puede ser asignado por una variable.

Pero tengo otra cuestión...

¿Sería posible definir una ventana "STANDARD" que a su vez esta activase unas "CHILD", pero que cuando se cerrase la "STANDARD" las ventanas "CHILD" que son dependientes de la anterior se cerrasen también.

El tema es que estoy modificando una aplicación para hacerla multiventana y me encuentro con lo siguiente...
MAIN --> Para la ventana principal o MENU
CHILD --> Para los subprogramas
MODAL --> Para petición de datos obligatorios.
Despues tengo una serie de herramientas, AGENDA, EMAIL, CALCULADORA, ETC, que llamo desde cualquier parte de programa con las teclas de función, y va correctamente
HERRAMIENTAS --> CHILD
El problema surge cuando quiero llamar desde una ventana MODAL (OBLIGATORIA) a cualquier herramienta, no me deja al llevar la definición de la ventana el TOPMOST...
¿Entonces como debo trabajar en multiventanas ..? , ¿ es posible activar y mostrar en pantalla una herramienta como la calculadora por encima de todas las pantallas y que se pueda minimizar y seguir trabajando con el programa...?
He estado viendo los ejemplos, y ninguno soluciona esta paradoja.
Me da a mi que la solución para por definir todas las herramientas como MODAL.., Y NO ME GUSTA

Gracias

[SALINETAS24]

SUGERENCIA PARA LA NUEVA VERSION DE HMG ... si es que se produce. (lo tendría que haber pedido para Reyes.., se me escapo..)

Tener la posibilidad (se que es muy dificil) de definir una ventana CHILD que no este obligada a regresar al punto que la creo cuando a esta ventana se le haga un RELEASE. Sería como aplicar algo como el Disable/Enable Events , (pero no se como), ya que desde mi punto de vista crea problemas de recursividad y hace que las ventanas CHILD solo valgan para mostrar información y no para operar.

Lo que se persigue es ejecutar en una ventana CHILD algo como un programa independiente, como la calculadora, agenda, email., que puedan ser llamados desde cualquier parte de programa, (hasta ahora lo hago con MODAL, pero era por darle un ambiente más BILL GATES.., asi con multiventanas .., a lo loco... ), y sin quedarse en la pila de su memoria que WINDOW PADRE la llamó para evitar el error de haber cerrado la WINDOW que la creo y que diga que no existe.

Por cierto, también molaría que cuando se cerrase una ventana PADRE tener la posibilidad de cerrar automáticamente todas sus CHILD.

Igual no me explico bien.., será por la cerveza

Un abrazo a tod@s...

[apais]

Soluci'on: Haz que tu .exe sea reentrante y que se llame a si mismo con las rutinas que tu habilites.
De esta forma ser'a un proceso independiente.

[SALINETAS24]

Hola Apais..., muchas gracias por contestar.
No termino de entender eso de que mi EXE sea reentrante.¿?
¿ Te refieres a crear otro EXE para la calculadora u otra herramienta y que sea llamado con un EXECUTE FILE "_CALCULO.EXE". ?
Sl2

[apais]

Otro exe o el mismo si a la entrada tiene un ruteador segun los prámetros que recibe

[apais]

Nada impide que un programa pueda lanzar otra instancia de si mismo.