I have the following code that tries to resize window after a click. But
nothing happens. If I use a builtin slot that does not need a function, such
as "close", "quit" it works, however for any other slot it seems my function
is ignored. Which slot/signal should I use and how?
module Main where
import Qtc.Classes.Qccs
import Qtc.Classes.Gui
import Qtc.Gui.Base
import Qtc.Gui.QApplication
import Qtc.Gui.QPushButton
import Qtc.Core.QFile
import Qtc.Tools.QUiLoader
import Qtc.Enums.Core.QIODevice
import Qtc.Core.Base
import Qtc.ClassTypes.Gui
import Qtc.Gui.QAbstractButton
main = do
app <- qApplication ()
loader <- qUiLoader ()
uiFile <- qFile "slide.ui"
open uiFile fReadOnly
ui <- load loader uiFile
close uiFile ()
add <- findChild ui ("<QPushButton*>", "pushButton")
connectSlot add "clicked()" add "click()" $ t ui
qshow ui ()
qApplicationExec ()
t :: QWidget () -> QWidget () -> IO ()
t ui _= resize ui (500::Int ,500::Int)
--
View this message in context:
http://haskell.1045720.n5.nabble.com/qtHaskell-signal-and-slots-tp3282748p3282748.html
Sent from the Haskell - Haskell-Cafe mailing list archive at Nabble.com.
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe
