如何在 fsi 中 运行 .fsx
how to run .fsx in fsi
使用 FSharp.Charting 探索 F# 我想我会从一个简单的 'hello world' 开始，但它给我留下了比代码行更多的问题。
#load @"..\packages\FSharp.Charting.0.90.14\FSharp.Charting.fsx"
open FSharp.Charting
let chart = Chart.Line([ for x in 0 .. 10 -> x, x*x ])
chart.ShowChart()
chart.SaveChartAs(@"C:\Temp\chart.png",ChartTypes.ChartImageFormat.Png)
这在 VS 中的交互式 window 中有效，但我想做的是从 cmd 行执行此脚本（使用 fsi.exe）。我将 fsx 文件关联到 fsi，但是当我执行它时，它会打开 fsi 但没有创建图表。我需要做什么？
简答：在程序末尾添加以下行：
System.Windows.Forms.Application.Run()
长答案：
确实创建了图表，但它立即消失了，因为您的程序在创建图表后立即退出。这不会在 Visual Studio 中的 F# Interactive window 中发生，因为 F# interactive window 不会在执行您的程序后立即关闭 - 它只是挂在那里，等待您提交更多执行代码。
为了让你的程序不立即退出，你可以实现一些等待机制，比如等待一段设定的时间（见System.Threading.Thread.Sleep）或者等待用户按下回车键（通过stdin.ReadLine()), 等等
然而，这实际上对你没有帮助，因为还有下一个问题：图表是通过 Windows 表格绘制的，它依赖于 message loop 运行 - 否则window 无法接收消息，因此无法绘制自身。
FSI does have its own built-in event loop，这就是你的程序在 VS 下的工作方式。但是，如果您实施 "waiting" 机制（例如 stdin.ReadLine()），此事件循环将被阻止 - 将无法发送消息。因此，在不干扰图表 window 功能的情况下，防止程序退出的唯一合理方法是启动您自己的事件循环。而这正是 Application.Run() 所做的。
保存到磁盘而不显示：
（回应评论）
据我了解，FSharp.Charting 库旨在作为一种在屏幕上 显示 图表的快捷方式，主要用例是探索数据集生活在 F# Interactive 中。更具体地说，Chart 对象的一些关键属性，例如 ChartAreas and Series are not initialized upon chart creation, but only when it is shown on the screen (see source code)，如果没有这些属性，图表将保持为空。
如果没有向库提交拉取请求，我建议下降到底层 System.Windows.Forms.DataVisualization.Charting.Chart:
open System.Windows.Forms.DataVisualization.Charting
let ch = new Chart()
ch.ChartAreas.Add( new ChartArea() )
let s = new Series( ChartType = SeriesChartType.Line )
s.Points.DataBind( [for x in 1..10 -> x, x*x], "Item1", "Item2", "" )
ch.Series.Add s;
ch.SaveImage(@"C:\Temp\chart.png", System.Drawing.Imaging.ImageFormat.Png)
使用 FSharp.Charting 探索 F# 我想我会从一个简单的 'hello world' 开始，但它给我留下了比代码行更多的问题。
#load @"..\packages\FSharp.Charting.0.90.14\FSharp.Charting.fsx"
open FSharp.Charting
let chart = Chart.Line([ for x in 0 .. 10 -> x, x*x ])
chart.ShowChart()
chart.SaveChartAs(@"C:\Temp\chart.png",ChartTypes.ChartImageFormat.Png)
这在 VS 中的交互式 window 中有效，但我想做的是从 cmd 行执行此脚本（使用 fsi.exe）。我将 fsx 文件关联到 fsi，但是当我执行它时，它会打开 fsi 但没有创建图表。我需要做什么？
简答：在程序末尾添加以下行：
System.Windows.Forms.Application.Run()
长答案：
确实创建了图表，但它立即消失了，因为您的程序在创建图表后立即退出。这不会在 Visual Studio 中的 F# Interactive window 中发生，因为 F# interactive window 不会在执行您的程序后立即关闭 - 它只是挂在那里，等待您提交更多执行代码。
为了让你的程序不立即退出，你可以实现一些等待机制，比如等待一段设定的时间（见System.Threading.Thread.Sleep）或者等待用户按下回车键（通过stdin.ReadLine()), 等等
然而，这实际上对你没有帮助，因为还有下一个问题：图表是通过 Windows 表格绘制的，它依赖于 message loop 运行 - 否则window 无法接收消息，因此无法绘制自身。
FSI does have its own built-in event loop，这就是你的程序在 VS 下的工作方式。但是，如果您实施 "waiting" 机制（例如 stdin.ReadLine()），此事件循环将被阻止 - 将无法发送消息。因此，在不干扰图表 window 功能的情况下，防止程序退出的唯一合理方法是启动您自己的事件循环。而这正是 Application.Run() 所做的。
保存到磁盘而不显示：
（回应评论）
据我了解，FSharp.Charting 库旨在作为一种在屏幕上 显示 图表的快捷方式，主要用例是探索数据集生活在 F# Interactive 中。更具体地说，Chart 对象的一些关键属性，例如 ChartAreas and Series are not initialized upon chart creation, but only when it is shown on the screen (see source code)，如果没有这些属性，图表将保持为空。
如果没有向库提交拉取请求，我建议下降到底层 System.Windows.Forms.DataVisualization.Charting.Chart:
open System.Windows.Forms.DataVisualization.Charting
let ch = new Chart()
ch.ChartAreas.Add( new ChartArea() )
let s = new Series( ChartType = SeriesChartType.Line )
s.Points.DataBind( [for x in 1..10 -> x, x*x], "Item1", "Item2", "" )
ch.Series.Add s;
ch.SaveImage(@"C:\Temp\chart.png", System.Drawing.Imaging.ImageFormat.Png)