c#之处理将 C# 转换为 F# 的 2 个编译器错误

我在将此代码移植到 f# 时遇到了一些问题

public class MyForm : Form 
{ 
    public MyForm () 
    { 
        Text = "My Cross-Platform App"; 
        Size = new Size (200, 200); 
        Content = new Label { Text = "Hello World!" }; 
    } 
 
    [STAThread] 
    static void Main () { 
        var app = new Application(); 
        app.Initialized += delegate { 
            app.MainForm = new MyForm (); 
            app.MainForm.Show (); 
        }; 
        app.Run (); 
    } 
} 

open System 
open Eto.Forms 
open Eto.Drawing 
 
type MyWindow()= 
    inherit Form() 
    override this.Size = Size(500,500) 
    override this.Text = "test" // no abstract property was found 
    override this.Content = new Label() // no abstract property was found 
 
[<STAThread>] 
[<EntryPoint>] 
let main argv =  
    let app = new Application() 
    app.Initialized.Add( fun e -> app.MainForm <- new Form() 
                                  app.MainForm.Show()) 
    app.Run() 
    0 // return an integer exit code 

我有几个问题:

1.) 如何从基类访问成员？

{ 
    Text = "My Cross-Platform App"; 
    Size = new Size (200, 200); 
    Content = new Label { Text = "Hello World!" }; 
} 

我用覆盖试过了，但它只适用于大小而不适用于内容和文本。

2.) 如何将此行翻译成 f# Content = new Label { Text = "Hello World!"};

请您参考如下方法:

快速修复

type MyWindow()= 
    inherit Form() 
    override this.Size = Size(500,500) 
    override this.Text = "test" // no abstract property was found 
    override this.Content = new Label() // no abstract property was found 

应该是

type MyWindow() as this = 
    inherit Form() 
    do this.Size <- Size(500,500) 
    do this.Text <- "test"  
    do this.Content <- new Label()  

最后，

Content = new Label { Text = "Hello World!" } 

是

let Content = new Label(Text = "Hello World!")