javascript olarak

Question

nesne, ben döngü için basit bir nesnenin her özelliğe erişebilir. Ben bir XML dosyası jeneratör üzerinde çalışıyorum
böyle şeyi yapmak istiyorum neden

type MyObj = {x:int; y:int} 
let myObj = {x=1; y=2} 
let allValues:seq<int> = allPropertyValuesIn myObj //How do I implement allPropertyValuesIn 
let sum = allValues |> Seq.fold (+) 0 

netleştirmek için girişiniz için

Edit teşekkür ederiz. Giriş, Veritabanından okunan satırlardır ve xsd önceden tanımlanmıştır.

"Ürün" Öğesinin oluşturulmasını ve iş kurallarına bağlı olarak 200 tane Çocuk öğesi gerekebilir, bazılarının isteğe bağlı olması gerekir.

1. type Product{ Price:Money; Name:Name; FactoryLocation:Address option ... } 
2. let product = {Price = Money(1.5); Name = Name ("Joe Tooth Paste"); ... } 
3. let child1 = createEl ("Price", product.Price) 
    .. 
203. let allChildren = child1 
         ::child2 
         ::child3 
         .. 
         ::[] 
404. let prodctEl = createElWithCildren ("Product", allChildren) 

Bu çok sıkıcı ve un-özlü geçerli: this excellent blog tavsiye izleyerek ben ürün kayıt için benim ilk (çok kaba) tasarımı oldu. F # içinde böyle bir şey yapmanın daha iyi bir yolu olmalı. Ben de yansıma fikrinde çok kin değilim.

Başka herhangi bir yaklaşım var mı yoksa yanlış mı yapıyorum?

Answer 1

bu deneyin: John Palmer admonishes olarak

open Microsoft.FSharp.Reflection 

type MyObj = {x:int; y:int} 
let myObj = {x=1; y=2} 
let allValues = FSharpType.GetRecordFields (myObj.GetType()) 
let sum = 
    allValues 
    |> Seq.fold 
     (fun s t -> s + int(t.GetValue(myObj).ToString())) 
     0 
printfn "%d" sum 

Ancak, böyle bir şey yapmak için çok sayıda iyi neden yoktur.