心脏线绘制python_F# 在窗体里的PictureBox中绘制心脏线

心脏线方程：r=a(1-sinθ)

转换为参数方程

x=2r(sin(t)-sin(2t)/2)

y=2r(cos(t)-cos(2t)/2)

程序代码：

// 在 http://fsharp.net 上了解有关 F# 的更多信息

// 请参阅“F# 教程”项目以获取更多帮助。

//DLL如果没有则需要手动添加引用

open System.Drawing

open System.Windows.Forms

[]

let main argv =

System.Console.WriteLine("心脏线绘制程序 By Tsybius")

System.Console.WriteLine("2014年9月21日 21:53:52")

System.Console.WriteLine("=============================\n")

System.Console.WriteLine("正在构建窗体(Form)")

//添加窗体Form

let frmHeart = new Form()

//设置窗体属性

frmHeart.Name

frmHeart.Text

frmHeart.AutoScaleDimensions

frmHeart.AutoScaleMode

frmHeart.ClientSize