Работа с GUI в F#. Использование F# Charting

@~~Ev_Hyper~~ · 05.03.2015, 23:44. **Показов** 2559. **Ответов** 4

Author24 — интернет-сервис помощи студентам

Подскажите как правильно работать с GUI в F#.
Если создавать обычное приложение то открывается консоль, а лишь потом вызывается форма. Например:

Haskell

open System
open System.Windows.Forms
open System.Windows.Forms.DataVisualization.Charting
 
let chart = new Chart(Dock = DockStyle.Fill)
let area = new ChartArea("Main")
chart.ChartAreas.Add(area)
 
let mainForm = new Form(Visible = true, TopMost = true, 
                        Width = 700, Height = 500)
mainForm.Controls.Add(chart)
 
let seriesColumns = new Series("RandomColumns")
chart.Series.Add(seriesColumns)
 
let rnd = new Random()
for i in 0 .. 10 do
    seriesColumns.Points.Add(float(rnd.Next(100))) |> ignore
 
mainForm.Show()

она открывается и сразу исчезает. В консольном приложении я ставлю Console.ReadKey(), но как правильно поступить с GUI?
Если запускать через скрипт-файл, то такой проблемы нет. Значит ли это, что в F# нормальная работа с GUI возможна только через скрипты?

Собственно вопрос возник из-за того, что я захотел посмотреть какие возможности есть в F# для построения графиков и как работать с сторонними библиотеками. Все оказалось намного сложнее, чем в С#, по крайней мере для меня.
Мой выбор пал на F# Charting
http://fsharp.github.io/FSharp.Charting/index.html
Взял первый пример. Через NuGet стянул нужный пакет.

Haskell

1
2
3

#r "FSharp.Charting.dll" 
open FSharp.Charting
Chart.Line([ for x in 0 .. 10 -> x, x*x ]).ShowChart()

В итоге выдало следующие ошибки:

Код

~vs4666.fsx(31,1): error FS0082: Не удалось разрешить данную ссылку. Не удалось обнаружить сборку "FSharp.Charting.dll". Убедитесь, что сборка существует на диске. Если данная ссылка требуется в коде, это может вызвать ошибки компиляции. (Код=MSB3245)
~vs4666.fsx(31,1): error FS0084: Ссылка на сборку "FSharp.Charting.dll" не была найдена либо является недопустимой

@pycture · 06.03.2015, 07:35

Сообщение от Ev_Hyper

Если запускать через скрипт-файл, то такой проблемы нет. Значит ли это, что в F# нормальная работа с GUI возможна только через скрипты?

нет. все как в С#

Код

open System
open System.Windows.Forms
open System.Windows.Forms.DataVisualization.Charting

[<EntryPoint>]
[<STAThread>]
let main argv = 

    Application.EnableVisualStyles()
    Application.SetCompatibleTextRenderingDefault false

    let chart = new Chart(Dock = DockStyle.Fill)
    let area = new ChartArea("Main")
    chart.ChartAreas.Add area
 
    let form = new Form(Visible = true, TopMost = true, 
                            Width = 700, Height = 500)
    form.Controls.Add(chart)
 
    let seriesColumns = new Series("RandomColumns")
    chart.Series.Add seriesColumns
 
    let rnd = Random()
    for i in 0 .. 10 do
        seriesColumns.Points.Add(rnd.Next 100 |> float) |> ignore

    Application.Run form
    0

Добавлено через 7 минут

Сообщение от Ev_Hyper

#r "FSharp.Charting.dll"

скорее всего надо указать полный путь к библиотеке. у меня работает

Добавлено через 2 минуты

Сообщение от Ev_Hyper

обычное приложение то открывается консоль, а лишь потом вызывается форма

в свойствах проекта надо выбрать windows application

@~~Ev_Hyper~~ · 06.03.2015, 10:30 **[ТС]**

Сообщение от pycture

в свойствах проекта надо выбрать windows application

pycture, спасибо. Добавил шаблон проекта, чтобы упростить дальнейшую работу.

Сообщение от pycture

скорее всего надо указать полный путь к библиотеке. у меня работает

Да, указание полного пути помогло. С чем это может быть связано?

@pycture · 06.03.2015, 10:39

Сообщение от Ev_Hyper

С чем это может быть связано?

с тем что выполнения интерактивной консоли или fsi.exe может ставить рабочим каталогом какойнить домашний каталог текущего пользователя. вот файл и не находится

Добавлено через 5 минут

Сообщение от Ev_Hyper

Добавил шаблон проекта

https://visualstudiogallery.ms... 8ae319a6d6
если не встанет, то можно попробывать отковырять изнутри исходники, вроде это обычный zip

@~~Ev_Hyper~~ · 06.03.2015, 10:48 **[ТС]**

Сообщение от pycture

https://visualstudiogallery.msdn.mic...d-da8ae319a6d6
Если не встанет, то можно попробывать отковырять изнутри исходники, вроде это обычный zip

Спасибо, но я пока сделал проще:
В VS: Файл -> Экспорт шаблона -> Шаблон проекта -> дальше заполнил поля под себя. Все, можно создавать проект.
Я думаю, по ссылке то-же самое, только более красиво оформлено - со значками и другими типами проектов

@pycture 1195 / 588 / 88 Регистрация: 20.09.2012 Сообщений: 1,881
	06.03.2015, 07:35	2
	Сообщение было отмечено Ev_Hyper как решение Решение Сообщение от Ev_Hyper Если запускать через скрипт-файл, то такой проблемы нет. Значит ли это, что в F# нормальная работа с GUI возможна только через скрипты? нет. все как в С# Код open System open System.Windows.Forms open System.Windows.Forms.DataVisualization.Charting [<EntryPoint>] [<STAThread>] let main argv = Application.EnableVisualStyles() Application.SetCompatibleTextRenderingDefault false let chart = new Chart(Dock = DockStyle.Fill) let area = new ChartArea("Main") chart.ChartAreas.Add area let form = new Form(Visible = true, TopMost = true, Width = 700, Height = 500) form.Controls.Add(chart) let seriesColumns = new Series("RandomColumns") chart.Series.Add seriesColumns let rnd = Random() for i in 0 .. 10 do seriesColumns.Points.Add(rnd.Next 100 \|> float) \|> ignore Application.Run form 0 Добавлено через 7 минут Сообщение от Ev_Hyper #r "FSharp.Charting.dll" скорее всего надо указать полный путь к библиотеке. у меня работает Добавлено через 2 минуты Сообщение от Ev_Hyper обычное приложение то открывается консоль, а лишь потом вызывается форма в свойствах проекта надо выбрать windows application 1

@~~Ev_Hyper~~ Заблокирован
	06.03.2015, 10:30 [ТС]	3
	Сообщение от pycture в свойствах проекта надо выбрать windows application pycture, спасибо. Добавил шаблон проекта, чтобы упростить дальнейшую работу. Сообщение от pycture скорее всего надо указать полный путь к библиотеке. у меня работает Да, указание полного пути помогло. С чем это может быть связано? 0

@pycture 1195 / 588 / 88 Регистрация: 20.09.2012 Сообщений: 1,881
	06.03.2015, 10:39	4
	Сообщение от Ev_Hyper С чем это может быть связано? с тем что выполнения интерактивной консоли или fsi.exe может ставить рабочим каталогом какойнить домашний каталог текущего пользователя. вот файл и не находится Добавлено через 5 минут Сообщение от Ev_Hyper Добавил шаблон проекта https://visualstudiogallery.ms... 8ae319a6d6 если не встанет, то можно попробывать отковырять изнутри исходники, вроде это обычный zip 1

@~~Ev_Hyper~~ Заблокирован
	06.03.2015, 10:48 [ТС]	5
	Сообщение от pycture https://visualstudiogallery.msdn.mic...d-da8ae319a6d6 Если не встанет, то можно попробывать отковырять изнутри исходники, вроде это обычный zip Спасибо, но я пока сделал проще: В VS: Файл -> Экспорт шаблона -> Шаблон проекта -> дальше заполнил поля под себя. Все, можно создавать проект. Я думаю, по ссылке то-же самое, только более красиво оформлено - со значками и другими типами проектов 0

Опции темы

Работа с GUI в F#. Использование F# Charting

Решение