我使用 glade 创建了 Window、ComboBox、Buttons,代码如下:
module Main where
import Graphics.UI.Gtk
import Graphics.UI.Gtk.Glade
main = do
initGUI
Just xml <- xmlNew "Tp.glade"
window <- xmlGetWidget xml castToWindow "window1"
button <- xmlGetWidget xml castToButton "button1"
comboBox <- xmlGetWidget xml castToComboBox "combobox1"
onClicked button $ do
putStrLn $ "Apply button selected "
selected <- comboBoxGetActiveText comboBox
print selected
onDestroy window mainQuit
widgetShowAll window
mainGUI
如果我从 ComboBox 中选择一个选项并单击操作按钮,则会显示以下错误消息 UI.exe:用户错误(gtk\Graphics\UI\G tk\MenuComboToolbar\ComboBox.chs.pp 的 do 表达式中的模式匹配失败: 244:2-13)
当我从 ComboBox 中选择一个选项时,是否需要为要执行的操作提供单独的功能?请帮我!!