Subversion Repositories Kolibri OS

Rev

Rev 5651 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5651 Rev 5674
Line 63... Line 63...
63 
#define WIN_H 400
 63 
#define WIN_H 400
Line 64... Line 64...
64 
 
 64 
 
65 
#define TITLE "Calypte v0.12"
 65 
#define TITLE "Calypte v0.12"
66 
char win_title[4096] = TITLE;
 66 
char win_title[4096] = TITLE;
67 
proc_info Form;
 - 
 
- 
 
 67 
proc_info Form;
68 
system_colors sc;
 68 
 
69 
dword old_width,old_height;
 69 
dword old_width,old_height;
Line 70... Line 70...
70 
llist tview;
 70 
llist tview;
71 
 
 71 
 
Line 219... Line 219...
219 
}
 219 
}
Line 220... Line 220...
220 
 
 220 
 
221 
 
 221 
 
222 
void draw_window()
 222 
void draw_window()
223 
{
 223 
{
224 
	sc.get();
 224 
	system.color.get();
225 
	DefineAndDrawWindow(GetScreenWidth()-WIN_W/2,GetScreenHeight()-WIN_H/2,WIN_W,WIN_H,0x73,0xFFFFFF,#win_title);
 225 
	DefineAndDrawWindow(GetScreenWidth()-WIN_W/2,GetScreenHeight()-WIN_H/2,WIN_W,WIN_H,0x73,0xFFFFFF,#win_title);
226 
	GetProcessInfo(#Form, SelfInfo);
 226 
	GetProcessInfo(#Form, SelfInfo);
227 
	if (Form.status_window>2) return;
 227 
	if (Form.status_window>2) return;
228 
	tview.SetSizes(0, TOPPANELH, Form.cwidth, Form.cheight-BOTPANELH-TOPPANELH, 200, 12);
 228 
	tview.SetSizes(0, TOPPANELH, Form.cwidth, Form.cheight-BOTPANELH-TOPPANELH, 200, 12);
Line 229... Line 229...
229 
	DrawBar(0, 0, Form.cwidth, TOPPANELH, sc.work);
 229 
	DrawBar(0, 0, Form.cwidth, TOPPANELH, system.color.work);
230 
	DrawBar(0, Form.cheight-BOTPANELH, Form.cwidth, BOTPANELH, sc.work);
 230 
	DrawBar(0, Form.cheight-BOTPANELH, Form.cwidth, BOTPANELH, system.color.work);
Line 231... Line 231...
231
231
232 
	menudata1.bckg_col = sc.work;
 232 
	menudata1.bckg_col = system.color.work;
233 
	menu_bar_draw stdcall (#menudata1);
 233 
	menu_bar_draw stdcall (#menudata1);