Question

在此代码中，EventL使用let绑定，EventM（尝试）使用成员：

type MyType() =
   let EventL = new Event<_>()
   member this.EventM = new Event<_>()

   member this.AddHandlers() =
      Event.add (fun string1 -> printfn "EventL: %s" string1) EventL.Publish
      Event.add (fun string1 -> printfn "EventM: %s" string1) this.EventM.Publish

   member this.Trigger(message) =
      EventL.Trigger(message)
      this.EventM.Trigger(message)

let myMyType = MyType()
myMyType.AddHandlers()
myMyType.Trigger("Event arg.")

运行时，此选项仅输出EventL: Event arg.，而EventM的处理程序不会被调用。

我是否犯了一个愚蠢的错误或遗漏了一些关于成员的逻辑？

Answer 1

您的EventM是一个计算属性，每次调用时都会对其进行评估。这会导致在代码的其余部分中创建不同的Event个对象（2次，AddHandlers一次，Trigger下一次）。

签出member val语法。这创造了一个支持领域，仍然提供公众可访问性。

固定版本将是：

type MyType() =
    member val EventM = new Event<_>()

如果您没有主要构造函数，则需要使用val代替并在构造函数中指定它：

type MyType =
    val EventM : Event<string>
    new () = { EventM = new Event<_>() }

请注意，在这种情况下，您必须将type参数赋予Event。

是否可以使用成员而不是让F＃事件？

1 个答案: