Windows 7 下不能显示打开文件对话在框

Windows 7 下不能显示打开文件对话在框

    在交互窗口中，可以显示打开文件对话在框，但是，编译后，在 Vista 和 Win7 环境下，就不能显示。

    要在 main 前面加上 [<STAThread>]，才能显示打开文件对话在框。

open System 

open System.IO

open System.Windows.Forms 

let main = 

    let d = new OpenFileDialog()

    d.ShowDialog() |>ignore

    let f = File.ReadAllLines (d.FileName)

    Console.Write (String.concat "," f)

[<STAThread>] 

main

===========
如果读取的文件中有汉字，需要 ReadAllLines 的第二个参数：


// File.ReadAllLines (d.FileName, System.Text.Encoding.GetEncoding(936));;
// File.ReadAllLines (d.FileName, System.Text.Encoding.Default);;