一般辞書からレコードを抽出するには？

Question

いくつかのAPIを介して、Gereric.Dictionaryのシーケンスの形式でテーブルの種類にアクセスできます。テーブルにはスキーマがありますから、レコードを抽出したいのです。ここには何がありますか？私が呼び出すことができるように

open System.Collections.Generic 

let gd = Dictionary<string,obj>() 
gd.Add("name", "Frank") 
gd.Add("age", 24) 
gd.Add("born", 1999) 

type Person = { name : string 
       age : int} 

let extractPerson (gd:Dictionary<string,obj>) = 
{ name = gd.["name"] :?> string 
    age = gd.["age"] :?> int} 

は私が

let extract<'T> (gd:Dictionary<string,obj>) = 
    // ??? 

のように、機能extractPersonは、より一般的なことはできますか？

extract<Person> gd 

Answer 1

コメントに記載されているとおり、これはリフレクションを使用してのみ行うことができます。あなたの簡単な例について、以下の作品が、それは非常に限られている：

open Microsoft.FSharp.Reflection 

let extract<'T>(gd:Dictionary<string,obj>) = 
    let flds = FSharpType.GetRecordFields(typeof<'T>) 
    let vals = [| for f in flds -> gd.[f.Name] |] 
    FSharpValue.MakeRecord(typeof<'T>, vals) :?> 'T 

それはそれは辞書から値を取得し、レコードを作成するMakeRecordを呼び出して、フィールドの名前が何であるかを見つけるためにGetRecordFieldsを使用しています値。これは超効率的ではありませんが、必要なものによっては、あなたのために十分に機能するかもしれません。

let gd = Dictionary<string,obj>() 
gd.Add("name", "Frank") 
gd.Add("age", 24) 
gd.Add("born", 1999) 

type Person = { name : string; age : int}  
extract<Person> gd