qtah-qt5-0.8.0: src/Graphics/UI/Qtah/Generated/Widgets/QInputDialog.hs
{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-}
---------- GENERATED FILE, EDITS WILL BE LOST ----------
module Graphics.UI.Qtah.Generated.Widgets.QInputDialog (
castQInputDialogToQDialog,
castQDialogToQInputDialog,
castQInputDialogToQWidget,
castQWidgetToQInputDialog,
castQInputDialogToQObject,
castQObjectToQInputDialog,
QInputDialogValue (..),
QInputDialogConstPtr (..),
cancelButtonText,
isComboBoxEditable,
comboBoxItems,
doubleDecimals,
doubleMaximum,
doubleMinimum,
doubleValue,
inputMode,
intMaximum,
intMinimum,
intStep,
intValue,
labelText,
okButtonText,
options,
testOption,
textEchoMode,
textValue,
QInputDialogPtr (..),
setCancelButtonText,
setComboBoxEditable,
setComboBoxItems,
setDoubleDecimals,
setDoubleMaximum,
setDoubleMinimum,
setDoubleValue,
setInputMode,
setIntMaximum,
setIntMinimum,
setIntStep,
setIntValue,
setLabelText,
setOkButtonText,
setOptions,
setDoubleRange,
setIntRange,
setOption,
setTextEchoMode,
setTextValue,
emitDoubleValueChanged,
emitDoubleValueSelected,
emitIntValueChanged,
emitIntValueSelected,
emitTextValueChanged,
emitTextValueSelected,
getDouble,
getDoubleWithOptions,
getInt,
getIntWithOptions,
getItem,
getItemWithOptions,
getMultiLineText,
getMultiLineTextWithOptions,
getText,
getTextWithOptions,
QInputDialogConst (..),
castQInputDialogToConst,
QInputDialog (..),
castQInputDialogToNonconst,
new,
newWithParent,
newWithParentAndFlags,
QInputDialogSuper (..),
QInputDialogSuperConst (..),
QInputDialogInputDialogOption (..),
QInputDialogInputDialogOptions,
IsQInputDialogInputDialogOptions (..),
noButtons,
useListViewForComboBoxItems,
usePlainTextEditForTextInput,
QInputDialogInputMode (..),
) where
import Data.Bits ((.&.), (.|.))
import qualified Data.Bits as QtahDB
import qualified Foreign as HoppyF
import qualified Foreign.C as HoppyFC
import qualified Foreign.Hoppy.Runtime as HoppyFHR
import qualified Foreign.Hoppy.Runtime as QtahFHR
import qualified Graphics.UI.Qtah.Flags as QtahFlags
import qualified Graphics.UI.Qtah.Generated.Core.QObject as M94
import qualified Graphics.UI.Qtah.Generated.Core.QString as M142
import qualified Graphics.UI.Qtah.Generated.Core.QStringList as M144
import qualified Graphics.UI.Qtah.Generated.Core.Types as M190
import qualified Graphics.UI.Qtah.Generated.Widgets.QDialog as M388
import qualified Graphics.UI.Qtah.Generated.Widgets.QLineEdit as M438
import qualified Graphics.UI.Qtah.Generated.Widgets.QWidget as M506
import Prelude (($), (.), (/=), (=<<), (==), (>>=))
import qualified Prelude as HoppyP
import qualified Prelude as QtahP
foreign import ccall "genpop__QInputDialog_new" new' :: HoppyP.IO (HoppyF.Ptr QInputDialog)
foreign import ccall "genpop__QInputDialog_newWithParent" newWithParent' :: HoppyF.Ptr M506.QWidget -> HoppyP.IO (HoppyF.Ptr QInputDialog)
foreign import ccall "genpop__QInputDialog_newWithParentAndFlags" newWithParentAndFlags' :: HoppyF.Ptr M506.QWidget -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QInputDialog)
foreign import ccall "genpop__QInputDialog_cancelButtonText" cancelButtonText' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_setCancelButtonText" setCancelButtonText' :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_isComboBoxEditable" isComboBoxEditable' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QInputDialog_setComboBoxEditable" setComboBoxEditable' :: HoppyF.Ptr QInputDialog -> HoppyFC.CBool -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_comboBoxItems" comboBoxItems' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO (HoppyF.Ptr M144.QStringListConst)
foreign import ccall "genpop__QInputDialog_setComboBoxItems" setComboBoxItems' :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr M144.QStringListConst -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_doubleDecimals" doubleDecimals' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setDoubleDecimals" setDoubleDecimals' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_doubleMaximum" doubleMaximum' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CDouble
foreign import ccall "genpop__QInputDialog_setDoubleMaximum" setDoubleMaximum' :: HoppyF.Ptr QInputDialog -> HoppyFC.CDouble -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_doubleMinimum" doubleMinimum' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CDouble
foreign import ccall "genpop__QInputDialog_setDoubleMinimum" setDoubleMinimum' :: HoppyF.Ptr QInputDialog -> HoppyFC.CDouble -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_doubleValue" doubleValue' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CDouble
foreign import ccall "genpop__QInputDialog_setDoubleValue" setDoubleValue' :: HoppyF.Ptr QInputDialog -> HoppyFC.CDouble -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_getDouble" getDouble' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO HoppyFC.CDouble
foreign import ccall "genpop__QInputDialog_getDoubleWithOptions" getDoubleWithOptions' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyFC.CDouble -> HoppyFC.CDouble -> HoppyFC.CDouble -> HoppyFC.CInt -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CDouble
foreign import ccall "genpop__QInputDialog_getInt" getInt' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_getIntWithOptions" getIntWithOptions' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_getItem" getItem' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M144.QStringListConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_getItemWithOptions" getItemWithOptions' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M144.QStringListConst -> HoppyFC.CInt -> HoppyFC.CBool -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyFC.CUInt -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_getMultiLineText" getMultiLineText' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_getMultiLineTextWithOptions" getMultiLineTextWithOptions' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyFC.CUInt -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_getText" getText' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_getTextWithOptions" getTextWithOptions' :: HoppyF.Ptr M506.QWidget -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyFC.CInt -> HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyFC.CUInt -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_inputMode" inputMode' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setInputMode" setInputMode' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_intMaximum" intMaximum' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setIntMaximum" setIntMaximum' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_intMinimum" intMinimum' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setIntMinimum" setIntMinimum' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_intStep" intStep' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setIntStep" setIntStep' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_intValue" intValue' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setIntValue" setIntValue' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_labelText" labelText' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_setLabelText" setLabelText' :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_okButtonText" okButtonText' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_setOkButtonText" setOkButtonText' :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_options" options' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setOptions" setOptions' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_setDoubleRange" setDoubleRange' :: HoppyF.Ptr QInputDialog -> HoppyFC.CDouble -> HoppyFC.CDouble -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_setIntRange" setIntRange' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_setOption" setOption' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyFC.CBool -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_testOption" testOption' :: HoppyF.Ptr QInputDialogConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QInputDialog_textEchoMode" textEchoMode' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QInputDialog_setTextEchoMode" setTextEchoMode' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_textValue" textValue' :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst)
foreign import ccall "genpop__QInputDialog_setTextValue" setTextValue' :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_emitDoubleValueChanged" emitDoubleValueChanged' :: HoppyF.Ptr QInputDialog -> HoppyFC.CDouble -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_emitDoubleValueSelected" emitDoubleValueSelected' :: HoppyF.Ptr QInputDialog -> HoppyFC.CDouble -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_emitIntValueChanged" emitIntValueChanged' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_emitIntValueSelected" emitIntValueSelected' :: HoppyF.Ptr QInputDialog -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_emitTextValueChanged" emitTextValueChanged' :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO ()
foreign import ccall "genpop__QInputDialog_emitTextValueSelected" emitTextValueSelected' :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO ()
foreign import ccall "gencast__QInputDialog__QDialog" castQInputDialogToQDialog :: HoppyF.Ptr QInputDialogConst -> HoppyF.Ptr M388.QDialogConst
foreign import ccall "gencast__QDialog__QInputDialog" castQDialogToQInputDialog :: HoppyF.Ptr M388.QDialogConst -> HoppyF.Ptr QInputDialogConst
foreign import ccall "gencast__QInputDialog__QWidget" castQInputDialogToQWidget :: HoppyF.Ptr QInputDialogConst -> HoppyF.Ptr M506.QWidgetConst
foreign import ccall "gencast__QWidget__QInputDialog" castQWidgetToQInputDialog :: HoppyF.Ptr M506.QWidgetConst -> HoppyF.Ptr QInputDialogConst
foreign import ccall "gencast__QInputDialog__QObject" castQInputDialogToQObject :: HoppyF.Ptr QInputDialogConst -> HoppyF.Ptr M94.QObjectConst
foreign import ccall "gencast__QObject__QInputDialog" castQObjectToQInputDialog :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr QInputDialogConst
foreign import ccall "gendel__QInputDialog" delete'QInputDialog :: HoppyF.Ptr QInputDialogConst -> HoppyP.IO ()
foreign import ccall "&gendel__QInputDialog" deletePtr'QInputDialog :: HoppyF.FunPtr (HoppyF.Ptr QInputDialogConst -> HoppyP.IO ())
class QInputDialogValue a where
withQInputDialogPtr :: a -> (QInputDialogConst -> HoppyP.IO b) -> HoppyP.IO b
instance {-# OVERLAPPABLE #-} QInputDialogConstPtr a => QInputDialogValue a where
withQInputDialogPtr = HoppyP.flip ($) . toQInputDialogConst
class (M388.QDialogConstPtr this) => QInputDialogConstPtr this where
toQInputDialogConst :: this -> QInputDialogConst
cancelButtonText :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String)
cancelButtonText arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(cancelButtonText' arg'1')
isComboBoxEditable :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
isComboBoxEditable arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
(HoppyP.return . (/= 0))
) =<<
(isComboBoxEditable' arg'1')
comboBoxItems :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO [QtahP.String])
comboBoxItems arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M144.QStringListConst) =<<
(comboBoxItems' arg'1')
doubleDecimals :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
doubleDecimals arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(doubleDecimals' arg'1')
doubleMaximum :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Double)
doubleMaximum arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) =<<
(doubleMaximum' arg'1')
doubleMinimum :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Double)
doubleMinimum arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) =<<
(doubleMinimum' arg'1')
doubleValue :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Double)
doubleValue arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) =<<
(doubleValue' arg'1')
inputMode :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO QInputDialogInputMode)
inputMode arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.toCppEnum
) =<<
(inputMode' arg'1')
intMaximum :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
intMaximum arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(intMaximum' arg'1')
intMinimum :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
intMinimum arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(intMinimum' arg'1')
intStep :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
intStep arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(intStep' arg'1')
intValue :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
intValue arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(intValue' arg'1')
labelText :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String)
labelText arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(labelText' arg'1')
okButtonText :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String)
okButtonText arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(okButtonText' arg'1')
options :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO QInputDialogInputDialogOptions)
options arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
QtahP.return . QtahFlags.numToFlags
) =<<
(options' arg'1')
testOption :: (QInputDialogValue this) => (this) {- ^ this -} -> (QInputDialogInputDialogOption) -> (HoppyP.IO HoppyP.Bool)
testOption arg'1 arg'2 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'2 >>= \arg'2' ->
(
(HoppyP.return . (/= 0))
) =<<
(testOption' arg'1' arg'2')
textEchoMode :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO M438.QLineEditEchoMode)
textEchoMode arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.toCppEnum
) =<<
(textEchoMode' arg'1')
textValue :: (QInputDialogValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String)
textValue arg'1 =
withQInputDialogPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(textValue' arg'1')
class (QInputDialogConstPtr this, M388.QDialogPtr this) => QInputDialogPtr this where
toQInputDialog :: this -> QInputDialog
setCancelButtonText :: (QInputDialogPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setCancelButtonText arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(setCancelButtonText' arg'1' arg'2')
setComboBoxEditable :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Bool) -> (HoppyP.IO ())
setComboBoxEditable arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
\x -> HoppyP.return $ if x then 1 else 0
) arg'2 >>= \arg'2' ->
(setComboBoxEditable' arg'1' arg'2')
setComboBoxItems :: (QInputDialogPtr this, M144.QStringListValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setComboBoxItems arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
M144.withQStringListPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(setComboBoxItems' arg'1' arg'2')
setDoubleDecimals :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
setDoubleDecimals arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(setDoubleDecimals' arg'1' arg'2')
setDoubleMaximum :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.IO ())
setDoubleMaximum arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'2 >>= \arg'2' ->
(setDoubleMaximum' arg'1' arg'2')
setDoubleMinimum :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.IO ())
setDoubleMinimum arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'2 >>= \arg'2' ->
(setDoubleMinimum' arg'1' arg'2')
setDoubleValue :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.IO ())
setDoubleValue arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'2 >>= \arg'2' ->
(setDoubleValue' arg'1' arg'2')
setInputMode :: (QInputDialogPtr this) => (this) {- ^ this -} -> (QInputDialogInputMode) -> (HoppyP.IO ())
setInputMode arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'2 >>= \arg'2' ->
(setInputMode' arg'1' arg'2')
setIntMaximum :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
setIntMaximum arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(setIntMaximum' arg'1' arg'2')
setIntMinimum :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
setIntMinimum arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(setIntMinimum' arg'1' arg'2')
setIntStep :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
setIntStep arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(setIntStep' arg'1' arg'2')
setIntValue :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
setIntValue arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(setIntValue' arg'1' arg'2')
setLabelText :: (QInputDialogPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setLabelText arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(setLabelText' arg'1' arg'2')
setOkButtonText :: (QInputDialogPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setOkButtonText arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(setOkButtonText' arg'1' arg'2')
setOptions :: (QInputDialogPtr this, IsQInputDialogInputDialogOptions arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setOptions arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
QtahP.return . QtahFlags.flagsToNum . toQInputDialogInputDialogOptions
) arg'2 >>= \arg'2' ->
(setOptions' arg'1' arg'2')
setDoubleRange :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.Double) -> (HoppyP.IO ())
setDoubleRange arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'3 >>= \arg'3' ->
(setDoubleRange' arg'1' arg'2' arg'3')
setIntRange :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
setIntRange arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(setIntRange' arg'1' arg'2' arg'3')
setOption :: (QInputDialogPtr this) => (this) {- ^ this -} -> (QInputDialogInputDialogOption) -> (HoppyP.Bool) -> (HoppyP.IO ())
setOption arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'2 >>= \arg'2' ->
(
\x -> HoppyP.return $ if x then 1 else 0
) arg'3 >>= \arg'3' ->
(setOption' arg'1' arg'2' arg'3')
setTextEchoMode :: (QInputDialogPtr this) => (this) {- ^ this -} -> (M438.QLineEditEchoMode) -> (HoppyP.IO ())
setTextEchoMode arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'2 >>= \arg'2' ->
(setTextEchoMode' arg'1' arg'2')
setTextValue :: (QInputDialogPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
setTextValue arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(setTextValue' arg'1' arg'2')
emitDoubleValueChanged :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.IO ())
emitDoubleValueChanged arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'2 >>= \arg'2' ->
(emitDoubleValueChanged' arg'1' arg'2')
emitDoubleValueSelected :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.IO ())
emitDoubleValueSelected arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'2 >>= \arg'2' ->
(emitDoubleValueSelected' arg'1' arg'2')
emitIntValueChanged :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
emitIntValueChanged arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(emitIntValueChanged' arg'1' arg'2')
emitIntValueSelected :: (QInputDialogPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
emitIntValueSelected arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(emitIntValueSelected' arg'1' arg'2')
emitTextValueChanged :: (QInputDialogPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
emitTextValueChanged arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(emitTextValueChanged' arg'1' arg'2')
emitTextValueSelected :: (QInputDialogPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
emitTextValueSelected arg'1 arg'2 =
HoppyFHR.withCppPtr (toQInputDialog arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(emitTextValueSelected' arg'1' arg'2')
getDouble :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3) => (arg'1) -> (arg'2) -> (arg'3) -> (HoppyP.IO HoppyP.Double)
getDouble arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
(
HoppyP.return . HoppyP.realToFrac
) =<<
(getDouble' arg'1' arg'2' arg'3')
getDoubleWithOptions :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3, M190.IsQtWindowFlags arg'9) => (arg'1) -> (arg'2) -> (arg'3) -> (HoppyP.Double) -> (HoppyP.Double) -> (HoppyP.Double) -> (HoppyP.Int) -> (HoppyF.Ptr HoppyFC.CBool) -> (arg'9) -> (HoppyP.IO HoppyP.Double)
getDoubleWithOptions arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 arg'9 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'6 >>= \arg'6' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'7 >>= \arg'7' ->
let arg'8' = arg'8 in
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtWindowFlags
) arg'9 >>= \arg'9' ->
(
HoppyP.return . HoppyP.realToFrac
) =<<
(getDoubleWithOptions' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8' arg'9')
getInt :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3) => (arg'1) -> (arg'2) -> (arg'3) -> (HoppyP.IO HoppyP.Int)
getInt arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(getInt' arg'1' arg'2' arg'3')
getIntWithOptions :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3, M190.IsQtWindowFlags arg'9) => (arg'1) -> (arg'2) -> (arg'3) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyF.Ptr HoppyFC.CBool) -> (arg'9) -> (HoppyP.IO HoppyP.Int)
getIntWithOptions arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 arg'9 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'7 >>= \arg'7' ->
let arg'8' = arg'8 in
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtWindowFlags
) arg'9 >>= \arg'9' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(getIntWithOptions' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8' arg'9')
getItem :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3, M144.QStringListValue arg'4) => (arg'1) -> (arg'2) -> (arg'3) -> (arg'4) -> (HoppyP.IO QtahP.String)
getItem arg'1 arg'2 arg'3 arg'4 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
M144.withQStringListPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(getItem' arg'1' arg'2' arg'3' arg'4')
getItemWithOptions :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3, M144.QStringListValue arg'4, M190.IsQtWindowFlags arg'8, M190.IsQtInputMethodHints arg'9) => (arg'1) -> (arg'2) -> (arg'3) -> (arg'4) -> (HoppyP.Int) -> (HoppyP.Bool) -> (HoppyF.Ptr HoppyFC.CBool) -> (arg'8) -> (arg'9) -> (HoppyP.IO QtahP.String)
getItemWithOptions arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 arg'9 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
M144.withQStringListPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
\x -> HoppyP.return $ if x then 1 else 0
) arg'6 >>= \arg'6' ->
let arg'7' = arg'7 in
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtWindowFlags
) arg'8 >>= \arg'8' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtInputMethodHints
) arg'9 >>= \arg'9' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(getItemWithOptions' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8' arg'9')
getMultiLineText :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3) => (arg'1) -> (arg'2) -> (arg'3) -> (HoppyP.IO QtahP.String)
getMultiLineText arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(getMultiLineText' arg'1' arg'2' arg'3')
getMultiLineTextWithOptions :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3, M142.QStringValue arg'4, M190.IsQtWindowFlags arg'6, M190.IsQtInputMethodHints arg'7) => (arg'1) -> (arg'2) -> (arg'3) -> (arg'4) -> (HoppyF.Ptr HoppyFC.CBool) -> (arg'6) -> (arg'7) -> (HoppyP.IO QtahP.String)
getMultiLineTextWithOptions arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
M142.withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' ->
let arg'5' = arg'5 in
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtWindowFlags
) arg'6 >>= \arg'6' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtInputMethodHints
) arg'7 >>= \arg'7' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(getMultiLineTextWithOptions' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7')
getText :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3) => (arg'1) -> (arg'2) -> (arg'3) -> (HoppyP.IO QtahP.String)
getText arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(getText' arg'1' arg'2' arg'3')
getTextWithOptions :: (M506.QWidgetPtr arg'1, M142.QStringValue arg'2, M142.QStringValue arg'3, M142.QStringValue arg'5, M190.IsQtWindowFlags arg'7, M190.IsQtInputMethodHints arg'8) => (arg'1) -> (arg'2) -> (arg'3) -> (M438.QLineEditEchoMode) -> (arg'5) -> (HoppyF.Ptr HoppyFC.CBool) -> (arg'7) -> (arg'8) -> (HoppyP.IO QtahP.String)
getTextWithOptions arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
M142.withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'4 >>= \arg'4' ->
M142.withQStringPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' ->
let arg'6' = arg'6 in
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtWindowFlags
) arg'7 >>= \arg'7' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtInputMethodHints
) arg'8 >>= \arg'8' ->
(HoppyFHR.decodeAndDelete . M142.QStringConst) =<<
(getTextWithOptions' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8')
data QInputDialogConst =
QInputDialogConst (HoppyF.Ptr QInputDialogConst)
| QInputDialogConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QInputDialogConst)
deriving (HoppyP.Show)
instance HoppyP.Eq QInputDialogConst where
x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y
instance HoppyP.Ord QInputDialogConst where
compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)
castQInputDialogToConst :: QInputDialog -> QInputDialogConst
castQInputDialogToConst (QInputDialog ptr') = QInputDialogConst $ HoppyF.castPtr ptr'
castQInputDialogToConst (QInputDialogGc fptr' ptr') = QInputDialogConstGc fptr' $ HoppyF.castPtr ptr'
instance HoppyFHR.CppPtr QInputDialogConst where
nullptr = QInputDialogConst HoppyF.nullPtr
withCppPtr (QInputDialogConst ptr') f' = f' ptr'
withCppPtr (QInputDialogConstGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
toPtr (QInputDialogConst ptr') = ptr'
toPtr (QInputDialogConstGc _ ptr') = ptr'
touchCppPtr (QInputDialogConst _) = HoppyP.return ()
touchCppPtr (QInputDialogConstGc fptr' _) = HoppyF.touchForeignPtr fptr'
instance HoppyFHR.Deletable QInputDialogConst where
delete (QInputDialogConst ptr') = delete'QInputDialog ptr'
delete (QInputDialogConstGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QInputDialogConst", " object."]
toGc this'@(QInputDialogConst ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QInputDialogConstGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QInputDialog :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
toGc this'@(QInputDialogConstGc {}) = HoppyP.return this'
instance QInputDialogConstPtr QInputDialogConst where
toQInputDialogConst = HoppyP.id
instance M388.QDialogConstPtr QInputDialogConst where
toQDialogConst (QInputDialogConst ptr') = M388.QDialogConst $ castQInputDialogToQDialog ptr'
toQDialogConst (QInputDialogConstGc fptr' ptr') = M388.QDialogConstGc fptr' $ castQInputDialogToQDialog ptr'
instance M506.QWidgetConstPtr QInputDialogConst where
toQWidgetConst (QInputDialogConst ptr') = M506.QWidgetConst $ castQInputDialogToQWidget ptr'
toQWidgetConst (QInputDialogConstGc fptr' ptr') = M506.QWidgetConstGc fptr' $ castQInputDialogToQWidget ptr'
instance M94.QObjectConstPtr QInputDialogConst where
toQObjectConst (QInputDialogConst ptr') = M94.QObjectConst $ castQInputDialogToQObject ptr'
toQObjectConst (QInputDialogConstGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQInputDialogToQObject ptr'
data QInputDialog =
QInputDialog (HoppyF.Ptr QInputDialog)
| QInputDialogGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QInputDialog)
deriving (HoppyP.Show)
instance HoppyP.Eq QInputDialog where
x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y
instance HoppyP.Ord QInputDialog where
compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)
castQInputDialogToNonconst :: QInputDialogConst -> QInputDialog
castQInputDialogToNonconst (QInputDialogConst ptr') = QInputDialog $ HoppyF.castPtr ptr'
castQInputDialogToNonconst (QInputDialogConstGc fptr' ptr') = QInputDialogGc fptr' $ HoppyF.castPtr ptr'
instance HoppyFHR.CppPtr QInputDialog where
nullptr = QInputDialog HoppyF.nullPtr
withCppPtr (QInputDialog ptr') f' = f' ptr'
withCppPtr (QInputDialogGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
toPtr (QInputDialog ptr') = ptr'
toPtr (QInputDialogGc _ ptr') = ptr'
touchCppPtr (QInputDialog _) = HoppyP.return ()
touchCppPtr (QInputDialogGc fptr' _) = HoppyF.touchForeignPtr fptr'
instance HoppyFHR.Deletable QInputDialog where
delete (QInputDialog ptr') = delete'QInputDialog $ (HoppyF.castPtr ptr' :: HoppyF.Ptr QInputDialogConst)
delete (QInputDialogGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QInputDialog", " object."]
toGc this'@(QInputDialog ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QInputDialogGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QInputDialog :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
toGc this'@(QInputDialogGc {}) = HoppyP.return this'
instance QInputDialogConstPtr QInputDialog where
toQInputDialogConst (QInputDialog ptr') = QInputDialogConst $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
toQInputDialogConst (QInputDialogGc fptr' ptr') = QInputDialogConstGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
instance QInputDialogPtr QInputDialog where
toQInputDialog = HoppyP.id
instance M388.QDialogConstPtr QInputDialog where
toQDialogConst (QInputDialog ptr') = M388.QDialogConst $ castQInputDialogToQDialog $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
toQDialogConst (QInputDialogGc fptr' ptr') = M388.QDialogConstGc fptr' $ castQInputDialogToQDialog $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
instance M388.QDialogPtr QInputDialog where
toQDialog (QInputDialog ptr') = M388.QDialog $ (HoppyF.castPtr :: HoppyF.Ptr M388.QDialogConst -> HoppyF.Ptr M388.QDialog) $ castQInputDialogToQDialog $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
toQDialog (QInputDialogGc fptr' ptr') = M388.QDialogGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M388.QDialogConst -> HoppyF.Ptr M388.QDialog) $ castQInputDialogToQDialog $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
instance M506.QWidgetConstPtr QInputDialog where
toQWidgetConst (QInputDialog ptr') = M506.QWidgetConst $ castQInputDialogToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
toQWidgetConst (QInputDialogGc fptr' ptr') = M506.QWidgetConstGc fptr' $ castQInputDialogToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
instance M506.QWidgetPtr QInputDialog where
toQWidget (QInputDialog ptr') = M506.QWidget $ (HoppyF.castPtr :: HoppyF.Ptr M506.QWidgetConst -> HoppyF.Ptr M506.QWidget) $ castQInputDialogToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
toQWidget (QInputDialogGc fptr' ptr') = M506.QWidgetGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M506.QWidgetConst -> HoppyF.Ptr M506.QWidget) $ castQInputDialogToQWidget $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
instance M94.QObjectConstPtr QInputDialog where
toQObjectConst (QInputDialog ptr') = M94.QObjectConst $ castQInputDialogToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
toQObjectConst (QInputDialogGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQInputDialogToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
instance M94.QObjectPtr QInputDialog where
toQObject (QInputDialog ptr') = M94.QObject $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQInputDialogToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
toQObject (QInputDialogGc fptr' ptr') = M94.QObjectGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQInputDialogToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QInputDialog -> HoppyF.Ptr QInputDialogConst) ptr'
new :: (HoppyP.IO QInputDialog)
new =
HoppyP.fmap QInputDialog
(new')
newWithParent :: (M506.QWidgetPtr arg'1) => (arg'1) -> (HoppyP.IO QInputDialog)
newWithParent arg'1 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
HoppyP.fmap QInputDialog
(newWithParent' arg'1')
newWithParentAndFlags :: (M506.QWidgetPtr arg'1, M190.IsQtWindowFlags arg'2) => (arg'1) -> (arg'2) -> (HoppyP.IO QInputDialog)
newWithParentAndFlags arg'1 arg'2 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtWindowFlags
) arg'2 >>= \arg'2' ->
HoppyP.fmap QInputDialog
(newWithParentAndFlags' arg'1' arg'2')
class QInputDialogSuper a where
downToQInputDialog :: a -> QInputDialog
instance QInputDialogSuper M388.QDialog where
downToQInputDialog = castQInputDialogToNonconst . cast' . M388.castQDialogToConst
where
cast' (M388.QDialogConst ptr') = QInputDialogConst $ castQDialogToQInputDialog ptr'
cast' (M388.QDialogConstGc fptr' ptr') = QInputDialogConstGc fptr' $ castQDialogToQInputDialog ptr'
instance QInputDialogSuper M506.QWidget where
downToQInputDialog = castQInputDialogToNonconst . cast' . M506.castQWidgetToConst
where
cast' (M506.QWidgetConst ptr') = QInputDialogConst $ castQWidgetToQInputDialog ptr'
cast' (M506.QWidgetConstGc fptr' ptr') = QInputDialogConstGc fptr' $ castQWidgetToQInputDialog ptr'
instance QInputDialogSuper M94.QObject where
downToQInputDialog = castQInputDialogToNonconst . cast' . M94.castQObjectToConst
where
cast' (M94.QObjectConst ptr') = QInputDialogConst $ castQObjectToQInputDialog ptr'
cast' (M94.QObjectConstGc fptr' ptr') = QInputDialogConstGc fptr' $ castQObjectToQInputDialog ptr'
class QInputDialogSuperConst a where
downToQInputDialogConst :: a -> QInputDialogConst
instance QInputDialogSuperConst M388.QDialogConst where
downToQInputDialogConst = cast'
where
cast' (M388.QDialogConst ptr') = QInputDialogConst $ castQDialogToQInputDialog ptr'
cast' (M388.QDialogConstGc fptr' ptr') = QInputDialogConstGc fptr' $ castQDialogToQInputDialog ptr'
instance QInputDialogSuperConst M506.QWidgetConst where
downToQInputDialogConst = cast'
where
cast' (M506.QWidgetConst ptr') = QInputDialogConst $ castQWidgetToQInputDialog ptr'
cast' (M506.QWidgetConstGc fptr' ptr') = QInputDialogConstGc fptr' $ castQWidgetToQInputDialog ptr'
instance QInputDialogSuperConst M94.QObjectConst where
downToQInputDialogConst = cast'
where
cast' (M94.QObjectConst ptr') = QInputDialogConst $ castQObjectToQInputDialog ptr'
cast' (M94.QObjectConstGc fptr' ptr') = QInputDialogConstGc fptr' $ castQObjectToQInputDialog ptr'
instance HoppyFHR.Assignable (HoppyF.Ptr (HoppyF.Ptr QInputDialog)) QInputDialog where
assign ptr' value' = HoppyF.poke ptr' $ HoppyFHR.toPtr value'
instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QInputDialog)) QInputDialog where
decode = HoppyP.fmap QInputDialog . HoppyF.peek
data QInputDialogInputDialogOption =
NoButtons
| UseListViewForComboBoxItems
| UsePlainTextEditForTextInput
| UnknownQInputDialogInputDialogOption (HoppyFC.CInt)
deriving (HoppyP.Show)
instance HoppyFHR.CppEnum (HoppyFC.CInt) QInputDialogInputDialogOption where
fromCppEnum NoButtons = 1
fromCppEnum UseListViewForComboBoxItems = 2
fromCppEnum UsePlainTextEditForTextInput = 4
fromCppEnum (UnknownQInputDialogInputDialogOption n) = n
toCppEnum (1) = NoButtons
toCppEnum (2) = UseListViewForComboBoxItems
toCppEnum (4) = UsePlainTextEditForTextInput
toCppEnum n = UnknownQInputDialogInputDialogOption n
instance HoppyP.Eq QInputDialogInputDialogOption where
x == y = HoppyFHR.fromCppEnum x == HoppyFHR.fromCppEnum y
instance HoppyP.Ord QInputDialogInputDialogOption where
compare x y = HoppyP.compare (HoppyFHR.fromCppEnum x) (HoppyFHR.fromCppEnum y)
newtype QInputDialogInputDialogOptions = QInputDialogInputDialogOptions (HoppyFC.CInt) deriving (QtahP.Eq, QtahP.Ord, QtahP.Show)
instance QtahFlags.Flags (HoppyFC.CInt) QInputDialogInputDialogOption QInputDialogInputDialogOptions where
enumToFlags = QInputDialogInputDialogOptions . QtahFHR.fromCppEnum
flagsToEnum (QInputDialogInputDialogOptions x') = QtahFHR.toCppEnum x'
class IsQInputDialogInputDialogOptions a where
toQInputDialogInputDialogOptions :: a -> QInputDialogInputDialogOptions
instance IsQInputDialogInputDialogOptions QInputDialogInputDialogOptions where toQInputDialogInputDialogOptions = QtahP.id
instance IsQInputDialogInputDialogOptions QInputDialogInputDialogOption where toQInputDialogInputDialogOptions = QtahFlags.enumToFlags
instance IsQInputDialogInputDialogOptions (HoppyFC.CInt) where toQInputDialogInputDialogOptions = QtahFlags.numToFlags
noButtons :: QInputDialogInputDialogOptions
noButtons = QInputDialogInputDialogOptions (1)
useListViewForComboBoxItems :: QInputDialogInputDialogOptions
useListViewForComboBoxItems = QInputDialogInputDialogOptions (2)
usePlainTextEditForTextInput :: QInputDialogInputDialogOptions
usePlainTextEditForTextInput = QInputDialogInputDialogOptions (4)
instance QtahDB.Bits QInputDialogInputDialogOptions where
x .&. y = QtahFlags.numToFlags (QtahFlags.flagsToNum x .&. QtahFlags.flagsToNum y)
x .|. y = QtahFlags.numToFlags (QtahFlags.flagsToNum x .|. QtahFlags.flagsToNum y)
xor x y = QtahFlags.numToFlags $ QtahDB.xor (QtahFlags.flagsToNum x) (QtahFlags.flagsToNum y)
complement x = QtahFlags.numToFlags $ QtahDB.complement $ QtahFlags.flagsToNum x
shift x i = QtahFlags.numToFlags $ QtahDB.shift (QtahFlags.flagsToNum x) i
rotate x i = QtahFlags.numToFlags $ QtahDB.rotate (QtahFlags.flagsToNum x) i
bitSize x = case QtahDB.bitSizeMaybe x of
QtahP.Just n -> n
QtahP.Nothing -> QtahP.error "bitSize is undefined"
bitSizeMaybe = QtahDB.bitSizeMaybe . QtahFlags.flagsToNum
isSigned = QtahDB.isSigned . QtahFlags.flagsToNum
testBit x i = QtahDB.testBit (QtahFlags.flagsToNum x) i
bit = QtahFlags.numToFlags . QtahDB.bit
popCount = QtahDB.popCount . QtahFlags.flagsToNum
data QInputDialogInputMode =
TextInput
| IntInput
| DoubleInput
| UnknownQInputDialogInputMode (HoppyFC.CInt)
deriving (HoppyP.Show)
instance HoppyFHR.CppEnum (HoppyFC.CInt) QInputDialogInputMode where
fromCppEnum TextInput = 0
fromCppEnum IntInput = 1
fromCppEnum DoubleInput = 2
fromCppEnum (UnknownQInputDialogInputMode n) = n
toCppEnum (0) = TextInput
toCppEnum (1) = IntInput
toCppEnum (2) = DoubleInput
toCppEnum n = UnknownQInputDialogInputMode n
instance HoppyP.Eq QInputDialogInputMode where
x == y = HoppyFHR.fromCppEnum x == HoppyFHR.fromCppEnum y
instance HoppyP.Ord QInputDialogInputMode where
compare x y = HoppyP.compare (HoppyFHR.fromCppEnum x) (HoppyFHR.fromCppEnum y)