Зависает программа, хотя используется BeginInvoke, и всё должно считаться в другом потоке

 
delegate void SomeDelegateOne(int TTT, double K_pll, double K_mcc, double porositty, double Sff, double Cleftt, double Crightt,double Tempeature,double[] Rx, double[] Sx, double[] Cx, double[] Resx);
private void Solve_Click(object sender, EventArgs e)
{
            TaskInfo.Enabled = true;
            TaskInfo.Text = "Solving HydroDynamic Problem";
            TaskInfo.Refresh();//вывели информацию
 
            HDR g = new HDR();// элемент класса с нужными методами
            g.part_input = part_inputG;//определили имя нужного файла config;
            g.GetRn(out Nxr);//получили число точек по осиX
            Rx = new double[Nxr]; Sx = new double[Nxr]; Cx = new double[Nxr]; Resx = new double[Nxr]; //получаемые данные из метода g
 
            g.TypeZvnz = TypeZvnz;//параметры задачи
            g.TypeRes = TypeResa;
 
            //g.runSolver2(T, K_pl, K_mc, porosity, Sf, Cleft, Cright, Temp, Rx, Sx, Cx, Resx);-сам метод, 
 
            SomeDelegateOne sd = g.runSolver2; // создаем делегат
            IAsyncResult asyncRes = sd.BeginInvoke(T, K_pl, K_mc, porosity, Sf, Cleft, Cright, Temp, Rx, Sx, Cx, Resx, null, null); // вызываем метод -  расчет физ задачи, может считать долго!
            //Проверяем IAsyncResult.IsCompleted
            while (asyncRes.IsCompleted == false)
            {
                prog = g.Progress;//получаем текущее стояние решения задачи
                TaskInfo.Text = "task to End " + prog + "% of full calculation";
                TaskInfo.Refresh();
                Thread.Sleep(500);  // эмулируем работу метода ? 
 
            }
            sd.EndInvoke(asyncRes);
//дальше обрабатываем полученные результаты.
 
  }

       Thread.Sleep(500);  // эмулируем работу метода ?

public void runSolver2(int TTT, double K_pll, double K_mcc, double porositty, double Sff, double Cleftt, double Crightt,double Tempeature,double[] Rx, double[] Sx, double[] Cx, double[] Resx)
         {
            int T_n = (int)(TTT * 60 * 60 / dt);//740584 определяет число шагов по времени
 
            this.Invoke(new Action(() => this.progress1.Value = 0));
            this.Invoke(new Action(() => this.progress1.Minimum = 0));
            this.Invoke(new Action(() => this.progress1.Maximum = T-n));
 
            for (int t = 0; t < T_n; t++)
            {
                //решение уравнения для Y Z Col [1] на очередном шаге по времени
                
                this.Invoke(new Action(() => this.progress1.Value = i));
 
                if (t % 10000 == 0) 
                    Progress =(int)(Math.Round(( t / (TTT * 60 * 60 / dt)),2)*100);
            }
        }

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading;
 
namespace study_event_using
{
    delegate void Del(int r);
    class SLV
    {
        int Progress;
        string name;
        public event Del EventCal;
        public SLV(string m)
        {
            name = m;
        }
        public double Calculation(double q,int r)
        {
            for (int i = 0; i < 100; i++)
            {
                Thread.Sleep(50);  // sleeping
                if (i % 10==0) { if (EventCal != null)       EventCal(i); }
            }
            return  Math.Pow(q, r);
        }
    }
}

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
 
namespace study_event_using
{
    public partial class Form1 : Form
    {
        int prog;//информация о стостоянии расчета
        delegate double SomeDelegateOne(double q, int r);//делегат для запуска в отдельном потоке
        public Form1()
        {
            InitializeComponent();
        }
        static void ProcesingEvent(int r)
        {
            //l.Text = "измеиться поле"; но не видно форму!!
        }
        private void Complete(IAsyncResult ar)
        {
            //l.Text = "Completed"; Здесь тоже не видно форму!!
            System.Runtime.Remoting.Messaging.AsyncResult result = (System.Runtime.Remoting.Messaging.AsyncResult)ar;
            SomeDelegateOne sumInt = (SomeDelegateOne)result.AsyncDelegate;
            int resultSum = (int)(sumInt.EndInvoke(ar));
            MessageBox.Show(string.Format("Этот поток закончил расчет. Сумма равноа {0} и прислал {1}", resultSum, ar.AsyncState));
  
        }
 
        private void go_Click(object sender, EventArgs e)
        {
            SLV CL = new SLV("Пионер");
            CL.EventCal += new Del(ProcesingEvent);
            SomeDelegateOne hr = CL.Calculation;
            hr.BeginInvoke(4, 6, this.Complete, "<Данные>");
  
        }
        
    }
}

if (l.InvokeRequired)
 l.Invoke((new MethodInvoker(() =>
                {
 l.Text="jhjkhj";
                }));
else
l.Text="kljlkjl";