Ustaw obiekt na ViewBag dynamicznego obiektu w F #

Question

mam tę metodę działania w C#:

public ActionResult Index() { 
     ViewBag.Message = "Hello"; 
     return View(); 
    } 

i ten pogląd (Index.cshtml):

<h2>@ViewBag.Message</h2> 

I ta produkuje oczekiwane "Hello" na stronie.

Chcę wykonać kontroler w F #. Próbowałem już próbować:

type MainController() = 
    inherit Controller() 
    member x.Index() = 
    x.ViewBag?Message <- "Hello" 
    x.View() 

I to generuje komunikat o błędzie "Nie znaleziono konstruktora obiektu lub obiektu" op_DynamicAssignment ".

Przyjrzałem się niektórym próbkom kodu F # dla operatora dynamicznego i nie widzę niczego, co jest krótsze niż kilka stron opisu i wiele linii kodu. Wydaje się, że są zbyt ogólni dla tego "setera" nieruchomości.

Answer 1

Obiekt ViewBag tylko wrapper który eksponuje kolekcję ViewData jako właściwość typu dynamic, tak aby mogła ona być dostępne dynamicznie z C# (używając składni zestawu właściwości). Można użyć realizację ? podstawie DLR to zrobić (patrz this discussion at SO), ale łatwiej jest określić ? operatora, który dodaje dane bezpośrednio do ViewDataDictionary (który jest wystawiony przez właściwość ViewData):

let (?<-) (viewData:ViewDataDictionary) (name:string) (value:'T) = 
    viewData.Add(name, box value) 

wtedy powinien być w stanie napisać:

Answer 2

Zamiast

x?ViewBag <- "Hello" 

Spróbuj:

x.ViewBag?Message <- "Hello"