可通过命令调用的函数调用两次

时间:2017-12-27 18:42:51

标签: wpf f# gjallarhorn

其中一个较小的项目需要进行功能更改......所以我决定更新Gjallarhorn.Bindable.Wpf库的版本。

事实上,我只是在需要的地方添加了一个额外的参数。

但是现在应用程序无法正常工作,因为命令可调用的函数会调用两次。

最小的例子如下:

type Message = |Number of int

let rand = Random()
let mbindings _ source _ = 
    let getNumber() = 
        let number = rand.Next() 
        printfn "RAND = %A" number //print a number twice
        number |> Some
    [
        Bind.Explicit.createCommand "NewNumber" source
        |> Observable.map (fun _ -> getNumber())
        |> Observable.toMessage Number
    ]

let mcomponent : IComponent<int, obj, Message> = 
    Component.fromExplicit mbindings

let app nav = 
    let model = 42
    let update message _ =
        match message with
        |Number number -> number
    Framework.application model update mcomponent nav

...

let nav = Navigation.singleView Application MainWin
let app = app nav.Navigate
Framework.RunApplication (nav, app)

这是图书馆的错误还是我错过了什么?

1 个答案:

答案 0 :(得分:3)

这是a bug。它已在Gjallarhorn.Bindable Beta 6中得到纠正。

问题在于框架两次订阅了绑定中的observable。这通常很好,但在您的情况下,observable有副作用,它会多次运行。我重新设计了如何在框架中处理这个以防止多个订阅,所以如果你升级到最新版本它就不应再发射两次。