module HGamer3D.Bindings.CEGUI.ClassEditbox where
import Foreign
import Foreign.Ptr
import Foreign.C
import HGamer3D.Data.HG3DClass
import HGamer3D.Data.Vector
import HGamer3D.Data.Colour
import HGamer3D.Data.Angle
import HGamer3D.Bindings.CEGUI.Utils
import HGamer3D.Bindings.CEGUI.ClassPtr
import HGamer3D.Bindings.CEGUI.StructHG3DClass
hasInputFocus :: HG3DClass -> IO (Bool)
hasInputFocus a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
hasInputFocus'_ a1' a2' >>= \res ->
peekBoolUtil a2'>>= \a2'' ->
return (a2'')
isReadOnly :: HG3DClass -> IO (Bool)
isReadOnly a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
isReadOnly'_ a1' a2' >>= \res ->
peekBoolUtil a2'>>= \a2'' ->
return (a2'')
isTextMasked :: HG3DClass -> IO (Bool)
isTextMasked a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
isTextMasked'_ a1' a2' >>= \res ->
peekBoolUtil a2'>>= \a2'' ->
return (a2'')
isTextValid :: HG3DClass -> IO (Bool)
isTextValid a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
isTextValid'_ a1' a2' >>= \res ->
peekBoolUtil a2'>>= \a2'' ->
return (a2'')
getValidationString :: HG3DClass -> IO (String)
getValidationString a1 =
withHG3DClass a1 $ \a1' ->
alloc64k $ \a2' ->
getValidationString'_ a1' a2' >>= \res ->
peekCString a2'>>= \a2'' ->
return (a2'')
getCaratIndex :: HG3DClass -> IO (Int)
getCaratIndex a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getCaratIndex'_ a1' a2' >>= \res ->
peekIntConv a2'>>= \a2'' ->
return (a2'')
getSelectionStartIndex :: HG3DClass -> IO (Int)
getSelectionStartIndex a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getSelectionStartIndex'_ a1' a2' >>= \res ->
peekIntConv a2'>>= \a2'' ->
return (a2'')
getSelectionEndIndex :: HG3DClass -> IO (Int)
getSelectionEndIndex a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getSelectionEndIndex'_ a1' a2' >>= \res ->
peekIntConv a2'>>= \a2'' ->
return (a2'')
getSelectionLength :: HG3DClass -> IO (Int)
getSelectionLength a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getSelectionLength'_ a1' a2' >>= \res ->
peekIntConv a2'>>= \a2'' ->
return (a2'')
getMaskCodePoint :: HG3DClass -> IO (Int)
getMaskCodePoint a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getMaskCodePoint'_ a1' a2' >>= \res ->
peekIntConv a2'>>= \a2'' ->
return (a2'')
getMaxTextLength :: HG3DClass -> IO (Int)
getMaxTextLength a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getMaxTextLength'_ a1' a2' >>= \res ->
peekIntConv a2'>>= \a2'' ->
return (a2'')
setReadOnly :: HG3DClass -> Bool -> IO ()
setReadOnly a1 a2 =
withHG3DClass a1 $ \a1' ->
let {a2' = fromBool a2} in
setReadOnly'_ a1' a2' >>= \res ->
return ()
setTextMasked :: HG3DClass -> Bool -> IO ()
setTextMasked a1 a2 =
withHG3DClass a1 $ \a1' ->
let {a2' = fromBool a2} in
setTextMasked'_ a1' a2' >>= \res ->
return ()
setValidationString :: HG3DClass -> String -> IO ()
setValidationString a1 a2 =
withHG3DClass a1 $ \a1' ->
withCString a2 $ \a2' ->
setValidationString'_ a1' a2' >>= \res ->
return ()
setCaratIndex :: HG3DClass -> Int -> IO ()
setCaratIndex a1 a2 =
withHG3DClass a1 $ \a1' ->
let {a2' = fromIntegral a2} in
setCaratIndex'_ a1' a2' >>= \res ->
return ()
setSelection :: HG3DClass -> Int -> Int -> IO ()
setSelection a1 a2 a3 =
withHG3DClass a1 $ \a1' ->
let {a2' = fromIntegral a2} in
let {a3' = fromIntegral a3} in
setSelection'_ a1' a2' a3' >>= \res ->
return ()
setMaskCodePoint :: HG3DClass -> Int -> IO ()
setMaskCodePoint a1 a2 =
withHG3DClass a1 $ \a1' ->
let {a2' = fromIntegral a2} in
setMaskCodePoint'_ a1' a2' >>= \res ->
return ()
setMaxTextLength :: HG3DClass -> Int -> IO ()
setMaxTextLength a1 a2 =
withHG3DClass a1 $ \a1' ->
let {a2' = fromIntegral a2} in
setMaxTextLength'_ a1' a2' >>= \res ->
return ()
new :: String -> String -> IO (HG3DClass)
new a1 a2 =
withCString a1 $ \a1' ->
withCString a2 $ \a2' ->
alloca $ \a3' ->
new'_ a1' a2' a3' >>= \res ->
peek a3'>>= \a3'' ->
return (a3'')
delete :: HG3DClass -> IO ()
delete a1 =
withHG3DClass a1 $ \a1' ->
delete'_ a1' >>= \res ->
return ()
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_hasInputFocus"
hasInputFocus'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_isReadOnly"
isReadOnly'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_isTextMasked"
isTextMasked'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_isTextValid"
isTextValid'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_getValidationString"
getValidationString'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_getCaratIndex"
getCaratIndex'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_getSelectionStartIndex"
getSelectionStartIndex'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_getSelectionEndIndex"
getSelectionEndIndex'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_getSelectionLength"
getSelectionLength'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_getMaskCodePoint"
getMaskCodePoint'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_getMaxTextLength"
getMaxTextLength'_ :: ((HG3DClassPtr) -> ((Ptr CInt) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_setReadOnly"
setReadOnly'_ :: ((HG3DClassPtr) -> (CInt -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_setTextMasked"
setTextMasked'_ :: ((HG3DClassPtr) -> (CInt -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_setValidationString"
setValidationString'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_setCaratIndex"
setCaratIndex'_ :: ((HG3DClassPtr) -> (CInt -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_setSelection"
setSelection'_ :: ((HG3DClassPtr) -> (CInt -> (CInt -> (IO ()))))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_setMaskCodePoint"
setMaskCodePoint'_ :: ((HG3DClassPtr) -> (CInt -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_setMaxTextLength"
setMaxTextLength'_ :: ((HG3DClassPtr) -> (CInt -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_construct"
new'_ :: ((Ptr CChar) -> ((Ptr CChar) -> ((HG3DClassPtr) -> (IO ()))))
foreign import ccall safe "HGamer3D\\Bindings\\CEGUI\\ClassEditbox.chs.h cegui_edtbx_destruct"
delete'_ :: ((HG3DClassPtr) -> (IO ()))