libui/wpf/tab.cpp

127 lines
2.5 KiB
C++

// 26 november 2015
#include "uipriv_wpf.hpp"
// TODO save child alignments?
// TODO scroll tabs instead of multiline tabs
using namespace System::Collections::Generic;
ref class tabPage {
public:
TabItem ^item;
uiControl *c;
Border ^border; // see uiTabSetMargined()
int margined;
};
struct uiTab {
uiWindowsControl c;
gcroot<TabControl ^> *tab;
gcroot<List<tabPage ^> ^> *pages;
};
static void onDestroy(uiTab *);
uiWindowsDefineControlWithOnDestroy(
uiTab, // type name
uiTabType, // type function
tab, // handle
onDestroy(hthis); // on destroy
)
static void onDestroy(uiTab *t)
{
List<tabPage ^> ^pages;
pages = *(t->pages);
while (pages->Count != 0) {
pages[0]->border->Child = nullptr;
uiControlSetParent(pages[0]->c, NULL);
uiControlDestroy(pages[0]->c);
pages->RemoveAt(0);
(*(t->tab))->Items->RemoveAt(0);
}
delete t->pages;
}
void uiTabAppend(uiTab *t, const char *name, uiControl *c)
{
uiTabInsertAt(t, name, (*(t->pages))->Count, c);
}
void uiTabInsertAt(uiTab *t, const char *name, uintmax_t before, uiControl *c)
{
tabPage ^p;
p = gcnew tabPage();
p->c = c;
p->border = gcnew Border();
p->item = gcnew TabItem();
p->border->Child = genericHandle(p->c);
p->item->Content = p->border;
p->item->Header = fromUTF8(name);
uiControlSetParent(p->c, uiControl(t));
(*(t->tab))->Items->Insert(before, p->item);
(*(t->pages))->Insert(before, p);
uiControlSetParent(p->c, NULL);
}
void uiTabDelete(uiTab *t, uintmax_t index)
{
tabPage ^p;
List<tabPage ^> ^pages;
pages = (*(t->pages));
p = pages[index];
pages->RemoveAt(index);
(*(t->tab))->Items->RemoveAt(index);
p->border->Child = nullptr;
}
uintmax_t uiTabNumPages(uiTab *t)
{
return (*(t->pages))->Count;
}
int uiTabMargined(uiTab *t, uintmax_t page)
{
List<tabPage ^> ^pages;
pages = (*(t->pages));
return pages[page]->margined;
}
void uiTabSetMargined(uiTab *t, uintmax_t page, int margined)
{
List<tabPage ^> ^pages;
pages = (*(t->pages));
pages[page]->margined = margined;
// TabItem margins/padding do NOT work the way we want them to
// we have to use a Border here too
// TODO Padding?
if (pages[page]->margined)
pages[page]->border->Margin = Thickness(10, 10, 10, 10);
else
pages[page]->border->Margin = Thickness(0, 0, 0, 0);
}
uiTab *uiNewTab(void)
{
uiTab *t;
t = (uiTab *) uiNewControl(uiTabType());
t->tab = new gcroot<TabControl ^>();
*(t->tab) = gcnew TabControl();
t->pages = new gcroot<List<tabPage ^> ^>();
*(t->pages) = gcnew List<tabPage ^>();
uiWindowsFinishNewControl(t, uiTab, tab);
return t;
}