我如何在 Elmish 中应用硬编码和方法类？

Question

我正在格式化使用 F# 和 SAFE 堆栈制作的 Web 应用程序。我正在使用一个变量来确定 CSS class 来更改标签的格式，但我还需要两个硬编码的 CSS classes，我不确定如何兼得。

我有这个：

let statusTag (state:Appointment.State) =
    span [ Class (state.ToString()) ] [ str (sprintf "%A" state) ]

我需要它更像这样工作：

let statusTag (state:Appointment.State) =
    span [ Class "status text" + (state.ToString()) ] [ str (sprintf "%A" state) ]

但我不知道如何在 F# 中执行此操作

如有任何帮助，我们将不胜感激

Answer 1

您的尝试似乎唯一错误的是，您需要在表达式周围加上额外的括号，该表达式用类的名称构造字符串（另一方面，您不需要在类周围加上括号state.ToString() 调用）。以下应该可以解决问题：

let statusTag (state:Appointment.State) =
    span [ Class("status text" + state.ToString()) ] [ str (sprintf "%A" state) ]

How do i apply both hard-coded and method classes in Elmish?