如何将任何记录转换为F#中的地图/字典?

时间:2015-06-17 15:13:33

标签: dictionary f# converter record

我需要将任意记录序列化为地图/字典。

我想我的结束类型看起来像这样:

type TabularData= array<Map<string, obj>>

但是我在构建一个接受任何记录并将它们变成Map的泛型函数时遇到了问题。

2 个答案:

答案 0 :(得分:6)

实际上,最好的建议可能是使用一些现有的序列化库,如FsPickler。但是,如果您真的想为记录编写自己的序列化,那么GetRecordFields(如评论中所述)是可行的方法。

以下内容记录并创建从string字段名称到字段obj值的映射。请注意,它不处理嵌套记录,并且速度不是特别快:

open Microsoft.FSharp.Reflection

let asMap (recd:'T) = 
  [ for p in FSharpType.GetRecordFields(typeof<'T>) ->
      p.Name, p.GetValue(recd) ]
  |> Map.ofSeq

这是一个用简单记录调用它的小例子:

type Person =
  { Name : string 
    Age : int }

asMap { Name = "Tomas"; Age = -1 }

答案 1 :(得分:0)

使用Tomas提到的相同想法,您可以从以下记录创建IDictionary<K,V>

let asDictionary (entity: 'T) =
    seq {
        for prop in FSharpType.GetRecordFields(typeof<'T>) -> 
        prop.Name, prop.GetValue(entity)
    } |> dict