F # dispatcher.invoke i delegate method

Question

Szukałem rozwiązania tego problemu przez długi czas bez powodzenia.

Przenoszę niektóre z mojego kodu C# do F # i walczę z Dispatcher.Invoke dla elementu WPF. Ponieważ jestem totalnym noobem w F #, jedyną rzeczą, na którą jestem pewien, jest to, że problem leży między krzesłem a klawiaturą.

Oto mój kod C#:

foreach (var k in ChartList.Keys)    
     { 
      ChartList[k].Dispatcher.Invoke(
       System.Windows.Threading.DispatcherPriority.Normal, 
       new Action(
       delegate() 
       { 
        ChartList[k].Width = area.Width/totalColsForm; 
        ChartList[k].Height = area.Height/totalRowsForm; 
        ChartList[k].Left = area.X + ChartList[k].Width * currentCol; 
        ChartList[k].Top = area.Y + ChartList[k].Height * currentRow; 
        ChartList[k].doShow(); 
       } 
      )); 
     } 

Część walczę o to nowe działanie (delegat() ...). Kompilatorowi nie podobała się żadna z moich prób jego przetłumaczenia.

Jakie byłoby tłumaczenie tego fragmentu w języku F #?

Answer 1

Metoda Invoke ma kilka przeciążeń, więc jeśli coś nie jest dokładnie w środku akcji, może pojawić się kilka dziwnych błędów, ponieważ sprawdzanie typu nie będzie wiedzieć, które przeciążenie wywołać. Właśnie próbowałem tego i działało dobrze:

open System 
open System.Windows.Controls 
open System.Windows.Threading 

let b = Button() 
b.Dispatcher.Invoke(
    DispatcherPriority.Normal, 
    Action(fun() -> 
     b.Content <- "foo" 
    )) |> ignore