Xailer & OZ Software

Gracias Ignacio por tu anterior respuesta. Ahora me está pasando algo
'extraño' si luego del procedure main pongo una llamada a la funcion
abreperma(), ni bien comienzo a compilar esto se me cambia automáticamente
en el editor y pone Tform1():New(Application):Show() , y se me queda así,
la duda es si puedo hacer la llamada en este lugar o lo primero que se debe
hacer es una llamada a un Formulario.
Saludos.
Antonio F. Ortega

Antonio,
> Gracias Ignacio por tu anterior respuesta. Ahora me está pasando algo
> 'extraño' si luego del procedure main pongo una llamada a la funcion
> abreperma(), ni bien comienzo a compilar esto se me cambia automáticamente
> en el editor y pone Tform1():New(Application):Show() , y se me queda así,
> la duda es si puedo hacer la llamada en este lugar o lo primero que se
> debe
> hacer es una llamada a un Formulario.
El procedure main lo mantiene automáticamente Xailer, en función de lo que
se ponga en el módulo principal del proyecto. La lógica que sigue es esta:
1) Si es módulo principal no es el mismo módulo de entrada (es decir, si no
es el .prg que contiene el procedure main), busca la primera ocurrencia de
CLASS, PROCEDURE o FUNCTION
2) Si es CLASS, genera una llamada a ?????():New( Application ):Show()
3) Si es PROCEDURE o FUNCTION, simplemente genera una llamada a ese
PROCEDURE o FUNCTION
4) Si el módulo principal es el mismo módulo de entrada, busca la primera
ocurrencia de PROCEDURE o FUNCTION, saltándose el PROCEDURE Main(), y genera
una llamada a esa rutina.
En tu caso, lo único que tienes que hacer es poner el procedure abreperma()
justo después del procedure main() en el mismo módulo de entrada, o bien en
algún otro .prg, y poner en las propiedades del proyecto que el módulo
principal es el que contenga esa función.
--
Un saludo,
José F. Giménez