Приложение F# windowsforms с пользовательским классом
У меня есть класс кнопки, производной от Button()
с атрибутом позиции
namespace fgame15
open System
open System.Windows.Forms
open System.Drawing
module Game15Button =
type Game15Button(position:Point) as button =
inherit Button()
member this.Pozition = position
Это мой основной модуль, который показывает форму
Компилируется без ошибок, но
не отображается форма с кнопкой
namespace fgame15
open System
open System.Drawing
open System.Windows.Forms
module Main =
do
let form = new Form(BackColor = Color.Pink , Text = "My Window Application")
let btn=new Button()
btn.Text <- "Ok"
form.Controls.Add(btn)
Application.Run(form)
Распечатывает следующее предупреждение
Warning 1 Main module of program is empty: nothing will happen when it is run
1 ответ
Решение
Если это не ваш последний файл fs в проекте, он не будет выполняться при запуске приложения. Вы можете изменить порядок файлов, используя Alt+Up/Alt+Down в VS или используя контекстное меню для каждого файла.