Subversion Repositories Kolibri OS

Rev

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

Rev 7759 Rev 7773
Line 225... Line 225...
225 
	DrawBar(x+1,y+2,1,h-2,0xFFFfff);
 225 
	DrawBar(x+1,y+2,1,h-2,0xFFFfff);
226 
	if (col_work!=-1) DrawBar(x+2,y+2,w-2,h-2,col_work);
 226 
	if (col_work!=-1) DrawBar(x+2,y+2,w-2,h-2,col_work);
227 
	DrawPopupShadow(x,y,w,h-1,skinned);
 227 
	DrawPopupShadow(x,y,w,h-1,skinned);
228 
}
 228 
}
Line -... Line 229...
- 
 
 229 
 
- 
 
 230 
:void Draw3DPopup(dword x,y,w,h)
- 
 
 231 
{
- 
 
 232 
	DrawRectangle3D(x,y,w,h, system.color.work_dark, system.color.work_graph);
- 
 
 233 
	DrawBar(x+1,y+1,w-1,1,system.color.work_light);
- 
 
 234 
	DrawBar(x+1,y+2,1,h-2,system.color.work_light);
- 
 
 235 
	DrawPopupShadow(x,y,w,h-1,0);
- 
 
 236 
}
229 
 
 237 
 
230 
:void DrawPopupShadow(dword x,y,w,h,skinned)
 238 
:void DrawPopupShadow(dword x,y,w,h,skinned)
231 
{
 239 
{
232 
	PutShadow(w+x+1,y,1,h+2,skinned,2);
 240 
	PutShadow(w+x+1,y,1,h+2,skinned,2);
233 
	PutShadow(w+x+2,y+1,1,h+2,skinned,1);
 241 
	PutShadow(w+x+2,y+1,1,h+2,skinned,1);
Line 289... Line 297...
289 
	PutPixel(x,     y+h, dark);
 297 
	PutPixel(x,     y+h, dark);
290 
	PutPixel(x+w+1, y+1, light);
 298 
	PutPixel(x+w+1, y+1, light);
291 
	PutPixel(x+w+1, y+h, dark);
299 
	PutPixel(x+w+1, y+h, dark);
292 
}
 300 
}
Line -... Line 301...
- 
 
 301 
 
- 
 
 302 
:bool is_the_skin_dark()
- 
 
 303 
{
- 
 
 304 
	dword bg_col = system.color.work;
- 
 
 305 
	if (GrayScaleImage(#bg_col,1,1)<65) {
- 
 
 306 
		return true;
- 
 
 307 
	} else {
- 
 
 308 
		return false;
- 
 
 309 
	}
- 
 
 310 
}
293 
 
 311 
 
294 
//this function increase falue and return it
 312 
//this function increase falue and return it
295 
//useful for list of controls which goes one after one
 313 
//useful for list of controls which goes one after one
296 
:struct incn
 314 
:struct incn
297 
{
 315 
{