f# - Fable-Elmish を使用して React.FormEvent を BodyInit に変換します

Question

Fable-Elmish と React Helpers を使用してファイルをアップロードしようとしています。ただし、ファイルが選択されたときのフォーム イベントを、Fetch を使用してサーバーに送信できるものに変換する方法がわかりません。これはビューです：

R.input [
        ClassName "input-control" 
        Type "file"
        OnChange (fun x -> FileUploaded x.target |> dispatch )
    ] []

私の更新機能の対応する部分:

 | FileUploaded file ->
    model, Cmd.ofPromise postCsv file FetchSuccess FetchFailure

そして、fetch で API を呼び出す関数:

let postData input =
    let formData = FormData.Create()
    formData.append("file.csv", input?files)
    let defaultProps =
        [ RequestProperties.Method HttpMethod.POST
        ; RequestProperties.Body (formData |> unbox)]
    promise {
        return! Fable.PowerPack.Fetch.fetch ("/api/data") defaultProps
    }

React.FormEvent をフェッチが必要とする BodyInit に変換するにはどうすればよいですか?