Question

窗口上有几个按钮，我试图找到处理命令的好方法。

例如：

我必须采取一些行动：

type Action = 
    |Show
    |Open
    |Input
    |Change
    |Statistic

将其翻译为xaml将是：

<Button Command="{Binding ShowCommand}" />
<Button Command="{Binding OpenCommand}" />
<Button Command="{Binding InputCommand}" />
<Button Command="{Binding ChangeCommand}" />
<Button Command="{Binding StatisticCommand}" />

有点玩图书馆我找到了两种方法来做到这一点而没有烦人的详细

1。使用 Observable.merge

Binding.createMessage "StatisticCommand" Statistic source
|> Observable.merge (Binding.createMessage "InputCommand" Input source)
//|> Observable.merge ... and so on
|> Observable.subscribe (performAction model.Value)
|> source.AddDisposable

2。创建概括消息

type GeneralMessage = 
    |Perform of Action
    |Update of Message

并将操作消息提升到高级别

let mainComponent source (model : ISignal<Info>) = 

    let info = Binding.componentToView source "Info" infoComponent model
    //...

    let stat = Binding.createMessage "StatCommand" (Perform Statistic) source
    let input = Binding.createMessage "InputCommand" (Perform Input) source
    //let ...

    [info; stat; input; ...]

let appComponent = 
    let model = initInfo
    let update message model = 
        match message with
        |Update message -> 
            match message with
            |...
        |Perform action -> 
            performAction model action
            model

    Framework.basicApplication model update mainComponent

（好吧，我喜欢第一个选项，因为这个动作不会改变模型）

执行这些操作或库包含更多拟合函数是否正确（第一，显而易见）？

P.S。我找了Observable.concat [info; stat; input; ...]，但没有抓到幸运。

Answer 1

所以这两种选择都没关系。我认为适当的方法取决于如何使用它，以及需要什么数据：

如果“Action”是整个组件应该处理的内容，则第一个选项完全有效。这将该组件的工作封装在该函数中以设置绑定，并将其完全保留在模型之外。
如果“动作”需要模型之外的任何内容（或模型的可用部分），那么像选项2那样向上传播最有意义。这允许模型使用操作，并适当地处理它。

使用Gjallarhorn

1 个答案: