mirror of
https://github.com/Drezil/dear-imgui.hs.git
synced 2025-09-16 08:03:15 +02:00
committed by
GitHub
parent
6dbb455d62
commit
8df98e075c
4
Main.hs
4
Main.hs
@ -79,10 +79,10 @@ loop window checked color slider r pos size' selected tab1Ref tab2Ref = do
|
||||
text "Hello!"
|
||||
|
||||
beginTabBar "My tab bar" ImGuiTabBarFlags_Reorderable >>= whenTrue do
|
||||
beginTabItem "Tab 1" tab1Ref ImGuiTabBarFlags_None >>= whenTrue do
|
||||
beginTabItem "Tab 1" tab1Ref ImGuiTabItemFlags_None >>= whenTrue do
|
||||
text "Tab 1 is currently selected."
|
||||
endTabItem
|
||||
beginTabItem "Tab 2" tab2Ref ImGuiTabBarFlags_None >>= whenTrue do
|
||||
beginTabItem "Tab 2" tab2Ref ImGuiTabItemFlags_None >>= whenTrue do
|
||||
text "Tab 2 is selected now."
|
||||
endTabItem
|
||||
reOpen <- tabItemButton "ReopenTabs" ImGuiTabItemFlags_Trailing
|
||||
|
Reference in New Issue
Block a user