如何在haskell / gtk2hs中创建图形命令行?

时间:2010-11-26 01:32:07

标签: haskell gtk2hs

我正在尝试在haskell中创建我的第一个“真实程序”(如果多项式可以解决积分问题),但我完全被这部分内容所困扰:

我想做一些非常简单的事情,比如GHCi:

> user input
program output
> user input
program output
> user input
program output
> 

除了我的程序输出是图像(使用LaTeX将数学表达式转换成PNG) - 所以我不能使用System.IO来做到这一点。我认为有可能用gtk2hs我已经设法安装但我无法弄清楚如何进行输入/输出对话。

如果你有时间,请告诉我它是如何完成的。非常感谢!

2 个答案:

答案 0 :(得分:4)

感谢ClaudiusMaximus,我们设法提出了以下解决方案。

module Main where

import Graphics.UI.Gtk

main = do
 initGUI

 ----------------

 win <- windowNew
 onDestroy win mainQuit

 vb <- vBoxNew False 3
 log <- vBoxNew False 2

 sc <- scrolledWindowNew Nothing Nothing
 scrolledWindowSetPolicy sc PolicyNever PolicyAutomatic

 sw <- layoutNew Nothing Nothing

 en <- entryNew

 ----------------

 scrolledWindowAddWithViewport sc log
 boxPackStart vb sc PackGrow 0
 boxPackStart vb en PackNatural 0
 set win [ containerChild := vb ]

 en `onEntryActivate` do
   txt <- entryGetText en
   entrySetText en ""
   l <- labelNew (Just txt)
   boxPackStart log l PackNatural 0
   widgetShowAll log
   Just ran <- scrolledWindowGetVScrollbar sc
   adj <- rangeGetAdjustment ran
   max <- adjustmentGetUpper adj
   adjustmentSetValue adj max

 ----------------

 widgetShowAll win
 mainGUI

答案 1 :(得分:0)

我认为你应该首先实现后端,即解析命令和创建输出图像的代码。如果可行,则可以实现GUI。基本上,您需要一些文本输入的文本输入和输出的文本和绘图小部件。由于GUI编程(恕我直言)并非无足轻重,您首先应该看一些GTK / gtk2hs教程/介绍。