mirror of
https://github.com/Drezil/dear-imgui.hs.git
synced 2024-11-22 16:57:00 +00:00
Wrap ImGui::Separator()
This commit is contained in:
parent
85c6f34054
commit
c4d54a6e36
2
Main.hs
2
Main.hs
@ -58,6 +58,8 @@ loop w checked = do
|
|||||||
True -> readIORef checked >>= print
|
True -> readIORef checked >>= print
|
||||||
False -> return ()
|
False -> return ()
|
||||||
|
|
||||||
|
separator
|
||||||
|
|
||||||
progressBar 0.314 (Just "Pi")
|
progressBar 0.314 (Just "Pi")
|
||||||
|
|
||||||
beginCombo "Label" "Preview" >>= whenTrue do
|
beginCombo "Label" "Preview" >>= whenTrue do
|
||||||
|
@ -49,6 +49,7 @@ module DearImGui
|
|||||||
, end
|
, end
|
||||||
|
|
||||||
-- * Cursor/Layout
|
-- * Cursor/Layout
|
||||||
|
, separator
|
||||||
, sameLine
|
, sameLine
|
||||||
|
|
||||||
-- * Widgets
|
-- * Widgets
|
||||||
@ -311,6 +312,15 @@ end = liftIO do
|
|||||||
[C.exp| void { ImGui::End(); } |]
|
[C.exp| void { ImGui::End(); } |]
|
||||||
|
|
||||||
|
|
||||||
|
-- | Separator, generally horizontal. inside a menu bar or in horizontal layout
|
||||||
|
-- mode, this becomes a vertical separator.
|
||||||
|
--
|
||||||
|
-- Wraps @ImGui::Separator()@
|
||||||
|
separator :: MonadIO m => m ()
|
||||||
|
separator = liftIO do
|
||||||
|
[C.exp| void { Separator(); } |]
|
||||||
|
|
||||||
|
|
||||||
-- | Call between widgets or groups to layout them horizontally.
|
-- | Call between widgets or groups to layout them horizontally.
|
||||||
--
|
--
|
||||||
-- Wraps @ImGui::SameLine@.
|
-- Wraps @ImGui::SameLine@.
|
||||||
|
Loading…
Reference in New Issue
Block a user