访问修改后的闭包（2）

这是从Access到Modified Closure的扩展问题。我只想验证以下内容是否真的足够安全用于生产。

List<string> lists = new List<string>();
//Code to retrieve lists from DB    
foreach (string list in lists)
{
    Button btn = new Button();
    btn.Click += new EventHandler(delegate { MessageBox.Show(list); });
}

每次启动我只会执行一次以上操作。目前看来，它工作正常。正如乔恩（Jon）在某些情况下提到的违反直觉的结果。那么，我需要在这里注意什么？如果列表多次运行，可以吗？

在C＃5之前，您需要在foreach 内部重新声明一个变量-否则它将被共享，并且所有处理程序都将使用最后一个字符串：

foreach (string list in lists)
{
    string tmp = list;
    Button btn = new Button();
    btn.Click += new EventHandler(delegate { MessageBox.Show(tmp); });
}

值得注意的是，从C＃5开始，这种情况已经改变，特别是在的情况下foreach，您不再需要这样做：问题中的代码将按预期工作。

若要显示此更改不起作用，请考虑以下事项：

string[] names = { "Fred", "Barney", "Betty", "Wilma" };
using (Form form = new Form())
{
    foreach (string name in names)
    {
        Button btn = new Button();
        btn.Text = name;
        btn.Click += delegate
        {
            MessageBox.Show(form, name);
        };
        btn.Dock = DockStyle.Top;
        form.Controls.Add(btn);
    }
    Application.Run(form);
}

在C＃5之前运行上述命令，尽管每个按钮都显示不同的名称，但是单击按钮将显示“ Wilma”四次。

这是因为语言规范（ECMA 334 v4，15.8.4）（在C＃5之前）定义了：

foreach (V v in x) embedded-statement 然后扩展为：

{
    E e = ((C)(x)).GetEnumerator();
    try {
        V v;
         while (e.MoveNext()) {
            v = (V)(T)e.Current;
             embedded-statement
        }
    }
    finally {
        … // Dispose e
    }
}

请注意，变量v（是your list）是在循环外部声明的。因此，根据捕获变量的规则，列表的所有迭代将共享捕获变量的持有者。

从C＃5开始，这已更改：迭代变量（v）的作用域是循环内部。我没有规范参考，但是它基本上变成了：

{
    E e = ((C)(x)).GetEnumerator();
    try {
        while (e.MoveNext()) {
            V v = (V)(T)e.Current;
            embedded-statement
        }
    }
    finally {
        … // Dispose e
    }
}

重新订阅；如果您主动希望退订匿名处理程序，则诀窍是捕获处理程序本身：

EventHandler foo = delegate {...code...};
obj.SomeEvent += foo;
...
obj.SomeEvent -= foo;

同样，如果您想要一个一次性事件处理程序（例如Load等）：

EventHandler bar = null; // necessary for "definite assignment"
bar = delegate {
  // ... code
  obj.SomeEvent -= bar;
};
obj.SomeEvent += bar;

现在这是自我取消订阅；-p