Subversion Repositories Kolibri OS

Rev

Rev 3412 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3399 leency 1
//Leency 2008-2013
3363 leency 2
 
3399 leency 3
 
3363 leency 4
dword onLeft(dword right,left) {EAX=Form.width-right-left;}
5
dword onTop(dword down,up) {EAX=Form.height-GetSkinHeight()-down-up;}
6
 
7
 
8
void ShowMessage(dword message)
9
{
10
	DrawFlatButton(Form.width/2-13,160,200,80,0,0xFFB6B5, message);
11
	pause(150);
12
	List_ReDraw();
13
}
14
 
3434 leency 15
inline fastcall signed int _strrchr( ESI,BL)
16
{
17
	int jj=0, last=strlen(ESI);
18
	do{
19
		jj++;
20
		$lodsb
21
		IF(AL==BL) last=jj;
22
	} while(AL!=0);
23
	return last;
24
}
3363 leency 25
 
3434 leency 26
 
3363 leency 27
dword col_palette[14] = {0xD2D3D3,0xD4D4D4,0xD6D5D6,0xD8D7D8,0xDAD8D9,0xDCDADB,
28
0xDFDCDD,0xE1DDDE,0xE2DEE0,0xE4DFE1,0xE3DFE1,0xE3DFE1,0xE3DFE1,0xE3DFE1,0xE3DFE1};
29
 
3434 leency 30
inline fastcall void Scroll() { //Прокрутка
3363 leency 31
	dword on_y, i;
3434 leency 32
	if (files.count<=0)
3399 leency 33
	{
34
		on_y = 57;
35
		scroll_size = onTop(22,58);
36
	}
37
	else
38
	{
3434 leency 39
		on_y = files.first * onTop(22,57) / files.count +57;
40
		scroll_size=onTop(22,57) * files.visible - files.visible / files.count;
3399 leency 41
		if (scroll_size<20) scroll_size = 20; //устанавливаем минимальный размер скролла
3434 leency 42
		if (scroll_size>onTop(22,57)-on_y+56) || (files.first+files.visible>=files.count) on_y=onTop(23+scroll_size,0); //для большого списка
3399 leency 43
	}
3363 leency 44
	DrawFlatButton(onLeft(27,0),on_y,16,scroll_size,0,-1,"");//ползунок
45
	if (!scroll_used) for (i=0; i<13; i++) DrawBar(onLeft(25-i,0), on_y+2, 1, scroll_size-3, col_palette[13-i]);
46
	if (scroll_used)  for (i=0; i<13; i++) DrawBar(onLeft(25-i,0), on_y+2, 1, scroll_size-3, col_palette[i]);
47
	//поле до ползунка
3434 leency 48
	if (on_y>58) DrawBar(onLeft(26,0),57,15,1, 0xC7C9C9);
3363 leency 49
	DrawBar(onLeft(26,0),58,1, on_y-58,0xC7C9C9);
50
	DrawBar(onLeft(25,0),58,14,on_y-58,0xCED0D0);
51
	//поле после ползунка
52
	if (onTop(22,57)-scroll_size+55>on_y) DrawBar(onLeft(26,0),on_y+scroll_size+1,15,1,0xC7C9C9);
53
	DrawBar(onLeft(26,0),on_y+scroll_size+2,1,onTop(22,57)-scroll_size-on_y+55,0xC7C9C9);
54
	DrawBar(onLeft(25,0),on_y+scroll_size+2,14,onTop(22,57)-scroll_size-on_y+55,0xCED0D0);
55
}
56
 
57
void DrawFlatButton(dword x,y,width,height,id,color,text)
58
{
59
	int fill_h;
60
	DrawRectangle(x,y,width,height,col_border);
61
	DrawRectangle3D(x+1,y+1,width-2,height-2,0xFEFEFE,col_padding);
62
	PutPixel(x+width-1, y+1, col_work);
63
	if (color!=-1) DrawFilledBar(x+2, y+2, width-3, height-3);
64
	IF (id<>0)	DefineButton(x+1,y+1,width-2,height-2,id+BT_HIDE,0xEFEBEF);
65
	WriteText(-strlen(text)*6+width/2+x+1,height/2-3+y,0x80,0,text);
66
}
67
 
68
void DrawFilledBar(dword x, y, w, h)
69
{
70
	int i, fill_h;
71
	if (h <= 14) fill_h = h; else fill_h = 14;
72
	for (i=0; i
73
	DrawBar(x, y+i, w, h-fill_h, col_palette[14-i]);
74
}