Command with multibinding parameter about fsharp.viewmodule

[ReedCopsey]

Would it be possible to get a reproduction of this? I'm not sure how to try to figure out how to correct the problem (or point you in the right direction) without something I can debug.

[yuyoyuppe]

It seems it got nothing to do with multibinding. I think I'm doing something wrong:) Minimized sample:

Mainwindow.xaml:

<Window xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:local="clr-namespace:ViewModel;assembly=fsxamltest">
    <Window.DataContext>
        <local:MainViewModel/>
    </Window.DataContext>
    <WrapPanel>
        <Button Content="pass the grid" Command="{Binding GridReceiverCommand}" CommandParameter="{Binding ElementName=TheGrid,Mode=OneWay}"/>
        <DataGrid Name="TheGrid"/>
    </WrapPanel>
</Window>

App.xaml:

<Application
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    StartupUri="MainWindow.xaml"/>

Program.fs:

open System
type App = FsXaml.XAML< "App.xaml">
[<STAThread;EntryPoint>]
let main _ = App().Root.Run()

VM.fs:

namespace ViewModel

open FSharp.ViewModule
open System.Windows.Controls
open System

type Command() =
  let canExecuteChanged = new Event<EventHandler, EventArgs>()
  interface INotifyCommand with
    member __.CanExecute _ = true
    [<CLIEvent>]
    member __.CanExecuteChanged = canExecuteChanged.Publish
    member __.Execute p =   
      let dg = p :?> DataGrid
      printfn "executed!"
    member __.RaiseCanExecuteChanged() = failwith "not implemented"   

type MainViewModel() as me = 
  inherit ViewModelBase()    
  let cmd1 = me.Factory.CommandSyncParamChecked((fun dg -> printfn "called!"), fun _ -> true)
  let cmd2 = Command()
  member __.GridReceiverCommand = 
    cmd1
//    cmd2

Note that it works with this minimal Command interface.

EDIT: this make it work again for some reason.