{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-} ---------- GENERATED FILE, EDITS WILL BE LOST ---------- {-# LANGUAGE NoMonomorphismRestriction #-} module Graphics.UI.Qtah.Widgets.QTreeView ( QTreeViewValue (..), QTreeViewConstPtr (..), QTreeViewPtr (..), QTreeViewConst, QTreeView, castConst, cast, downCastConst, downCast, new, allColumnsShowFocus, autoExpandDelay, collapse, collapseAll, columnAt, columnViewportPosition, columnWidth, dataChanged, dataChangedWithRoles, emitCollapsed, emitExpanded, expand, expandAll, expandRecursively, expandRecursivelyWithDepth, expandToDepth, expandsOnDoubleClick, hideColumn, indentation, indexAbove, indexBelow, isAnimated, isColumnHidden, isExpanded, isFirstColumnSpanned, isHeaderHidden, isRowHidden, isSortingEnabled, itemsExpandable, resizeColumnToContents, rootIsDecorated, selectAll, setAllColumnsShowFocus, setAnimated, setAutoExpandDelay, setColumnHidden, setColumnWidth, setExpanded, setExpandsOnDoubleClick, setFirstColumnSpanned, setHeaderHidden, setIndentation, setItemsExpandable, setRootIsDecorated, setRowHidden, setSortingEnabled, setTreePosition, setUniformRowHeights, setWordWrap, showColumn, sortByColumn, uniformRowHeights, wordWrap, collapsedSignal, expandedSignal, ) where import qualified Foreign.Hoppy.Runtime as QtahFHR import qualified Graphics.UI.Qtah.Generated.Core.QModelIndex as M92 import Graphics.UI.Qtah.Generated.Widgets.QTreeView import Graphics.UI.Qtah.Internal.Listener import qualified Graphics.UI.Qtah.Signal as QtahSignal import Prelude (($), (>>)) import qualified Prelude as HoppyP import qualified Prelude as QtahP castConst = toQTreeViewConst cast = toQTreeView downCastConst = downToQTreeViewConst downCast = downToQTreeView collapsedSignal :: (QTreeViewPtr object) => QtahSignal.Signal object (M92.QModelIndexConst -> HoppyP.IO ()) collapsedSignal = QtahSignal.Signal { QtahSignal.internalConnectSignal = \object' fn' -> do listener' <- listenerRefConstQModelIndex_new object' "2collapsed(QModelIndex const&)" fn' valid' <- listenerRefConstQModelIndex_isValid listener' if valid' then QtahP.fmap QtahP.Just $ QtahSignal.internalMakeConnection listener' else QtahFHR.delete listener' >> QtahP.return QtahP.Nothing , QtahSignal.internalName = "QTreeView::collapsed (ListenerRefConstQModelIndex)" } expandedSignal :: (QTreeViewPtr object) => QtahSignal.Signal object (M92.QModelIndexConst -> HoppyP.IO ()) expandedSignal = QtahSignal.Signal { QtahSignal.internalConnectSignal = \object' fn' -> do listener' <- listenerRefConstQModelIndex_new object' "2expanded(QModelIndex const&)" fn' valid' <- listenerRefConstQModelIndex_isValid listener' if valid' then QtahP.fmap QtahP.Just $ QtahSignal.internalMakeConnection listener' else QtahFHR.delete listener' >> QtahP.return QtahP.Nothing , QtahSignal.internalName = "QTreeView::expanded (ListenerRefConstQModelIndex)" }