Program.cs

using System;
using System.Collections.Generic;
using System.Windows;
using System.Windows.Forms;
using System.ComponentModel;
using System.Diagnostics;
using sage.ew.global;
using sage.ew.netvfp;
using sage.ew.ewbase;
using sage.ew.functions;
using System.Threading;
using System.Reflection;

namespace sage.ew
{
    static class Program
    {

        #region Private constants
        
        public static char SEPARADOR = '|';
        
        #endregion Private constants

        [STAThread]
        static void Main(string[] tcArgs)
        {
            if (tcArgs == null)
            {
                // No se han pasado parametros al EXE                
            }
            else
            {
                // Obtenemos cadena con los parámetros
                string lcParametros = tcArgs[0];

                // Obtenemos el identificador de VFP (primer parámetro)
                int lnPos = lcParametros.IndexOf(SEPARADOR);
                long lnHandle = Convert.ToInt32(lcParametros.Substring(0, lnPos));

                if (lnHandle <= 0)
                    return;

                // Definimos en el objeto global el identificador de la ventana de VFP con la que nos comunicamos
                EW_GLOBAL._nHandleVfp = lnHandle;


                // Quitamos el primer parámetro(identificador) para estandarizar la cadena de parámetros a la utilizada en los mensajes
                lcParametros = lcParametros.Substring(lnPos + 1);

                try
                {
                    //PE-87300 Cargamos la libreria para que no de errores al exportar a Excel (licencia SyncFucion)
                    Assembly.Load("Sage.Reporting.Engine, Version=1.0.0.5, Culture=neutral, PublicKeyToken=0a4a2ad97614f98d");

                    // Cargamos los parámetros en el diccionario _Parametros
                    if (NETVFP._ObtenerParametros(lcParametros))
                    {
                        // Inicio temas visuales
                        Application.EnableVisualStyles();
                        Application.SetCompatibleTextRenderingDefault(false);

                        // Definimos objeto para capturar mensajes de Windows
                        ew_MessageFilters lst = new ew_MessageFilters();
                        Application.AddMessageFilter(lst);

                        // Obtener nombre del formulario a cargar
                        string lcLibreria = EW_GLOBAL._GetVariable("libreria").ToString().Trim();
                        string lcForm = EW_GLOBAL._GetVariable("formulario").ToString().Trim();
                        string lcOpcion = EW_GLOBAL._GetVariable("opcion").ToString().Trim();
                        string lcPropiedad = EW_GLOBAL._GetVariable("propiedad").ToString().Trim();  // PE-86711

                        // PE-80961. Verificamos si queremos debugar
                        string lcPathIni = EW_GLOBAL._GetVariable("wc_pathinicio").ToString().Trim();
                        if (!string.IsNullOrWhiteSpace(lcPathIni))
                        {
                            string lcDebug = FUNCTIONS.LeerConfigIni("[DEBUG_SAGETPV]", lcPathIni).Trim().ToUpper();
                            if (lcDebug == "SI")
                                MessageBox.Show("Asocie el proceso 'sage.ew.exe' desde el depurador de Visual Studio", "Depurar", MessageBoxButtons.OK, MessageBoxIcon.Information);
                        }
                        // FI PE-80961

                        // PE-93758. Obtención del formulario de net a ejecutar.
                        dynamic loForm = FUNCTIONS._Obtener_Formulario_Net(lcLibreria, lcForm, lcPropiedad, lcOpcion, null, lnHandle);
                        if (loForm != null)
                            Application.Run(loForm);
                    }
                }
                catch (Exception toEx)
                {
                    MessageBox.Show(toEx.Message);
                }

            }

        }
    }

}