FiveTech Software tech support forums

Buenas tardes a todos:

Estoy intentando mediante una macro pasarla por on init de una ventana , la macro es el nombre de una funcion
y con un parametro dentro de la funcion, es tratado de algunas maneras pero no lo he logrado.

no se si se pueda

function BuildChild(mventana)

local oChild
mventana:= "tarjetas()"
*mventana:= "tarjetas( &(mChild) )"
DEFINE WINDOW oChild TITLE "Ingreso/Mantenimiento de Formas de Pago" MDICHILD ;
COLOR 0, GetSysColor( COLOR_BTNFACE )
mchild := oChild
ACTIVATE WINDOW oChild ;
ON INIT &(mventana) //(mchild)


*///( oChild )

return nil

Muchas gracias

Oscar,

Yo no uso Windows, normalmente todo lo hago con Dialogs.

Hay un par de opcion que podrias checar :

oWnd:bStart := { || TuFuncion() }
- bInit
- bPainted

Cuestion que probaras con tu codigo si alguno de estos te sirven.


Saludos

Raymundo,

Gracias por tu respuesta voy a probar tu sugerencia



Saludos

Saludos,

Parece que oChild:bStart := , solo funciona con dialogos, no con ventanas, voy a seguir buscandola manera, espero si alguien me puede ayudar, quiero mediante una macro pasar una funcion en el ON INIT de una ventana.

Gracias

Lo intente de esta manera

a:= &mventana.()

pero me dice que la funcion que va en mventana no esta definida y si lo esta
bueno creo que me doy, porfa si alguien me ayuda

esysoft,

el ON INIT yo lo utilizo mucho y me funciona de muerte. Lo utilizo, y lo digo por si a alguien le sirve, para depurar, y lo que hago es que en el ON INIT pongo la llamada al programa que estoy realizando/depurando y asi no tengo que estar yendo al menu para seguir probando/depurando ese programa porque cada vez que arranco el programa abre automaticamente la rutina en la que estoy trabajando. Desconectar para enviar al cliente.

Dicho esto, me da la sensacion que lo que te falla es la macro... has probado a poner:

ON INIT Alert("hola !")... no se si es asi o bien hay que pasarlo como codeblock, si fuera con codeblock habria que poner ON INIT {|| Alert("hola !") }


Espero te sirva