Bir ayırıcıyı virgülle ayırmak için sprintf'i binlik ayırıcılar olarak kullanma

Question

Kümeleri binlerce ayırıcı olarak göstermek için bir tamsayı biçimlendirmek için sprintf nasıl kullanılır?

String.Format kullanarak nasıl yapılacağını biliyorum, ancak sprintf kullanarak bunu yapamıyorum.

DÜZENLEME: Fyodor Soikin yorumuyla dayanarak aşağıda, ben bu kodu çalıştı:

printf "%a" (fun writer (value:int) -> writer.Write("{0:#,#}", value)) 10042 
let s = sprintf "%a" (fun writer (value:int) -> writer.Write("{0:#,#}", value)) 10042 

Printf çağrı işleri (ama ben Metin atayabilirsiniz bir dize olmak istiyormusunuz oysa standart çıktıya yazar Örneğin bir WPF kontrolünün içerik özelliği.

Sprintf çağrısı FS0039 hatası ile başarısız oluyor: Alan, yapıcı veya 'Yazma' üyesi tanımlı değil.

Bu hatayı düzeltebilirseniz, bu mümkün olan en doğrudan çözüm olabilir ve kısmi uygulama ile birleştirildiğinde, yerleşik bir sürüm kadar kısa olacaktır.

Answer 1

Bu işler, ancak daha basit bir yol olmalıdır.

let thousands(x:int64) = 
    System.String.Format("{0:#,0}", x) 

let s = sprintf "%s" (thousands(0L)) 
printfn "%s" s 

let s = sprintf "%s" (thousands(1L)) 
printfn "%s" s 

let s = sprintf "%s" (thousands(1000L)) 
printfn "%s" s 

let s = sprintf "%s" (thousands(1000000L)) 
printfn "%s" s 

0 
1 
1,000 
1,000,000 

Eğer Printf modülü ile, böyle yapmak yapamam yana Biraz daha iyi bir sürümü

let printNumber (x : int) : string = 
    System.String.Format("{0:N0}",x) 

Answer 2

:

/// Calls ToString on the given object, passing in a format-string value. 
let inline stringf format (x : ^a) = 
    (^a : (member ToString : string -> string) (x, format)) 

Ve sonra böyle diyoruz:

someNumber |> stringf "N0"