使用委托的BeginInvoke方法来完成复杂任务的操作

现在假设我有这样一个窗体(包含一个进度条和一个按钮与两个文本框),在第一个文本框中输入一个数字进行阶乘运算,在此过程中进度条与运算进度保持一致,同时可以在第二个文本框中进行其它工作(比如输入)。对付这样的题目,除了使用BackGroundWorker之外还可以使用异步Invoke来完成:
首先让我们看看界面以及对应的代码:
【界面】

【代码】

[C#]
namespace CSharp
{
    public partial class Form1 : Form
    {
        long result = 1;

         long PGo(int endnum)
        {
            while(progressBar1.Value<=endnum)
            {
                result *= endnum;
                progressBar1.Value += 1;
                Thread.Sleep(1000);
                endnum--;
            }
            return result;
        }

        public Form1()
        {
            InitializeComponent();
        }
        private void Form1_Load(object sender, EventArgs e)
        {
           
        }

        private void button1_Click(object sender, EventArgs e)
        {
            progressBar1.Maximum = Convert.ToInt32(textBox1.Text);
            Func<int,long> a = new Func<int,long>(PGo);

            //BeginInvoke先启动后台线程做循环
            var result = a.BeginInvoke
                (
                Convert.ToInt32(textBox1.Text),
                //如果完成了循环,那么执行此委托
                    delegate(IAsyncResult r)
                    {
                        if (r.IsCompleted)
                        {
                            MessageBox.Show("Finished!");
                            textBox1.Text = (r.AsyncState as Func<int, long>).EndInvoke(r).ToString();
                        }
                    },a
                );

            //不能使用result.EndInvoke,此方法将导致当前进程宕住,直到后台线程完毕为止。因为WinForm主线程不会自动关闭,所以
            //无需此线程,但是控制台程序必须要!因为控制台进程“瞬间即逝”。
        }
    }
}
[VB.NET]
Namespace CSharp
    Public Partial Class Form1
        Inherits Form
        Private result As Long = 1

        Private Function PGo(endnum As Integer) As Long
            While progressBar1.Value <= endnum
                result *= endnum
                progressBar1.Value += 1
                Thread.Sleep(1000)
                endnum -= 1
            End While
            Return result
        End Function

        Public Sub New()
            InitializeComponent()
        End Sub
        Private Sub Form1_Load(sender As Object, e As EventArgs)

        End Sub

        Private Sub button1_Click(sender As Object, e As EventArgs)
            progressBar1.Maximum = Convert.ToInt32(textBox1.Text)
            Dim a As New Func(Of Integer, Long)(AddressOf PGo)

            'BeginInvoke先启动后台线程做循环
            '如果完成了循环,那么执行此委托 www.2cto.com
            Dim result = a.BeginInvoke(Convert.ToInt32(textBox1.Text), Function(r As IAsyncResult) Do
                If r.IsCompleted Then
                    MessageBox.Show("Finished!")
                    textBox1.Text = TryCast(r.AsyncState, Func(Of Integer, Long)).EndInvoke(r).ToString()
                End If
            End Function, a)
            '不能使用result.EndInvoke,此方法将导致当前进程宕住,直到后台线程完毕为止。因为WinForm主线程不会自动关闭,所以
            '无需此线程,但是控制台程序必须要!因为控制台进程“瞬间即逝”。
        End Sub
    End Class
End Namespace
解释一些关键部分:
1)BeginInvoke:此方法将“异步”执行委托所指向的那个方法。所谓“异步”,就是结果并不是像调用“Invoke”方法一样直接就出现结果,BeginInvoke将在内部开辟一个新线程(注意:是后台线程!)去执行这个委托方法。因为是后台线程,因此如果主程序一旦关闭或者停止,无论后台线程的任务是否执行完毕,都将自动终止。本示例因为是WinForm,一旦运行主线程不会自动结束,但是对于诸如控制台一类的程序则不然,因此控制台程序如果使用BeginInvoke方法,必须要在其后面调用对应的EndInvoke。EndInvoke方法会阻塞当前进程,直至BeginInvoke执行完毕所有的委托方法后直接返回一个结果。如:
[C#]
namespace CSharp
{
    public class Program
    {
        int Fun()
        {
            Console.WriteLine("This is a fun function with a return value……");
            return 1;
        }

        static void Main(string[] args)
        {
            Func<int> fun = new Program().Fun;
            //此处创建了一个新线程,都是后台线程运行
            var r =fun.BeginInvoke(null, null);
            //此处Thread.Sleep(10)不可以省略,否则后台线程没有机会得到执行
            while (!r.IsCompleted) { Thread.Sleep(10); }
            //此处不可以省略,因为任何后台线程依附于主线程。一旦主线程停止以后后台线程自动关闭。
            Console.WriteLine(fun.EndInvoke(r));
        }
    }
}
[VB.NET]
Namespace CSharp
    Public Class Program
        Private Function Fun() As Integer
            Console.WriteLine("This is a fun function with a return value……")
            Return 1
        End Function

        Private Shared Sub Main(args As String())
            Dim fun As Func(Of Integer) = AddressOf New Program().Fun
            '此处创建了一个新线程,都是后台线程运行
            Dim r = fun.BeginInvoke(Nothing, Nothing)
            '此处Thread.Sleep(10)不可以省略,否则后台线程没有机会得到执行
            While Not r.IsCompleted
                Thread.Sleep(10)
            End While
            '此处不可以省略,因为任何后台线程依附于主线程。一旦主线程停止以后后台线程自动关闭。
            Console.WriteLine(fun.EndInvoke(r))
        End Sub
    End Class
End Namespace
注意以上多了“While……”的判断部分——因为BeginInvoke返回一个IAsyncResult的接口,其中包含了一个IsCompleted布尔属性:该属性指示新开辟的线程是否已经把委托的全部代码执行完毕了。由于是异步(要检测新线程的完成情况),我们无法直接从主线程获取此情况,自然只能在主线程中对IsCompleted做类似“死循环”的判断,并且在其中增加Sleep代码(此不能省略,否则BeginInvoke子线程没有机会被执行,都被主线程卡死了)。当IsCompleted=True之后,立即执行EndInvoke输出结果。
当然,其实while这一段完全可以省略,不过这样看上去更为正式一些;即便没有while去显示判断IsCompleted属性,EndInvoke也会阻塞主线程继续进行——直到执行完毕输出结果为止。
另外:While……这一段和EndInvoke不可以都省略,否则无法输出任何结果!(因为在控制台中,不调用EndInvoke主线程不会被阻塞,一旦执行完毕自然终止程序,后台线程也完蛋了)。
同时,在WinForm那个示例中你还注意到了使用IAsyncResult接口参数和一个object的用法——BeginInvoke通常是自动根据委托生成的,大致如下:
BeginInvoke(参数1,……参数N,IAsyncResult,objectvalue)
1)参数1……参数N:都是可选参数,取决于你原先委托定义时是否有参数,以及多少参数(如果委托只需要一个参数,那么自生成的BeginInvoke也只有一个参数)。
2)IAsyncResult,当BeginInvoke方法执行完毕之后,内部会发出一个信号通知IAsyncResult已经执行完毕了(IAsyncResult的IsCompleted也同步设置为True)。
3)objectvalue:可选参数。
因为前面说过——BeginInvoke执行完毕之后(当IsCompleted=True时),EndInvoke就被自动执行生成结果。因此我们通过把objectvalue设置成委托实例传入BeginInvoke,然后在IAsyncResult中执行EndInvoke就可以完成任务。
因为WinForm主线程不会自动终止,所以不能像控制台一样在外面调用EndInvoke,否则主界面会宕机(直到异步方法全部执行完毕),应该在IAsyncResult中执行)。

posted @ 2015-01-15 08:57  r163  阅读(2200)  评论(0编辑  收藏  举报