forked from KolibriOS/kolibrios
2eda7fed5c
eolite: fix crash on put image h<1 cmm: rename colors to the short one "sc" git-svn-id: svn://kolibrios.org@7806 a494cfbc-eb01-0410-851d-a64ba20cac60
46 lines
937 B
C
46 lines
937 B
C
|
|
#define TAB_PADDING 15
|
|
#define TAB_HEIGHT 28
|
|
|
|
:struct _tabs
|
|
{
|
|
int active_tab;
|
|
int x,y,w,h;
|
|
void draw_button();
|
|
int click();
|
|
void draw_wrapper();
|
|
};
|
|
|
|
:void _tabs::draw_wrapper()
|
|
{
|
|
DrawRectangle(x,y+TAB_HEIGHT,w-1,h-TAB_HEIGHT, sc.work_graph);
|
|
DrawRectangle(x+1,y+1+TAB_HEIGHT,w-3,h-2-TAB_HEIGHT, sc.work_light);
|
|
}
|
|
|
|
:void _tabs::draw_button(dword xx, but_id, text)
|
|
{
|
|
dword col_bg, col_text;
|
|
dword ww=strlen(text)*8, hh=TAB_HEIGHT;
|
|
|
|
if (but_id==active_tab)
|
|
{
|
|
col_bg=0xE44C9C;
|
|
col_text=sc.work_text;
|
|
}
|
|
else
|
|
{
|
|
col_bg=0xC3A1B7;
|
|
col_text= MixColors(sc.work, sc.work_text, 120);
|
|
}
|
|
DefineHiddenButton(xx-2,y, ww-1+4,hh-1, but_id);
|
|
WriteText(xx, y+6, 0x90, col_text, text);
|
|
DrawBar(xx, y+hh-3, ww, 3, col_bg);
|
|
//DrawStandartCaptButton(xx, y, but_id, text); //GetFreeButtonId()
|
|
}
|
|
|
|
:int _tabs::click(int N)
|
|
{
|
|
if (N==active_tab) return false;
|
|
active_tab = N;
|
|
return true;
|
|
} |