Как создать аналоговые часы с помощью winforms в F#?
Я должен создать аналоговые часы, используя winforms в f#. Часы также должны иметь этикетку, показывающую дату и время в цифровом виде. Я выяснил метку времени/даты, но у меня возникли проблемы с настройкой графического представления часов и реализацией функции таймера. Есть ли кто-нибудь, кто может помочь мне в моем пути?
Что я уже пробовал:
open System.Windows.Forms open System.Drawing open System let win = new Form () win.ClientSize <- Size (500, 500) let label = new Label () win.Controls.Add label label.Width <- 200 label.Text <- string System.DateTime.Now let timer = new Timer() timer.Interval <- 1000 timer.Enabled <- true timer.Tick.Add (fun e -> label.Text <- string System.DateTime.Now) Application.run win
Richard MacCutchan
Скорее всего, вам нужно использовать графический класс для рисования часов. И каждый раз, когда происходит событие тика таймера, вы обновляете изображения. Google для F# (или C#) графики, чтобы найти идеи.