Subversion Repositories Kolibri OS

Rev

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

Rev 3848 Rev 3997
Line 3... Line 3...
3
 
3
 
4
dword onLeft(dword right,left) {EAX=Form.width-right-left;}
4
dword onLeft(dword right,left) {EAX=Form.width-right-left;}
Line 5... Line 5...
5
dword onTop(dword down,up) {EAX=Form.height-GetSkinHeight()-down-up;}
5
dword onTop(dword down,up) {EAX=Form.height-GetSkinHeight()-down-up;}
6
 
6
 
-
 
7
 
-
 
8
void ShowMessage(dword message, pause_duration)
7
 
9
{
-
 
10
	int form_x=Form.width/2-13;
8
void ShowMessage(dword message)
11
	int form_y=160;
9
{
12
	DrawPopup(form_x,form_y,220,80,1,col_work,col_border);
10
	DrawFlatButton(Form.width/2-13,160,220,80,0,0xFFB6B5, message);
13
	WriteText(-strlen(message)*3+110+form_x,80/2-4+form_y,0x80,0,message);
Line 11... Line 14...
11
	pause(150);
14
	pause(pause_duration);
12
	List_ReDraw();
15
	if (pause_duration) List_ReDraw();
13
}
16
}