Subversion Repositories Kolibri OS

Rev

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

Rev 7654 Rev 7914
Line 35... Line 35...
35
			if (multiple==SINGLE) break;
35
			if (multiple==SINGLE) break;
36
		}
36
		}
37
	}
37
	}
38
}
38
}
Line -... Line 39...
-
 
39
 
-
 
40
:int GetProcessesCount(dword proc_name) {
-
 
41
	int i, count=0;
-
 
42
	proc_info Process;
-
 
43
	for (i=0; i
-
 
44
	{
-
 
45
		GetProcessInfo(#Process, i);
-
 
46
		if (strcmpi(#Process.name, proc_name)==0) count++;
-
 
47
	}
-
 
48
	return count;
-
 
49
}
39
 
50
 
40
:void RestartProcessByName(dword proc_name, byte multiple) {
51
:void RestartProcessByName(dword proc_name, byte multiple) {
41
	KillProcessByName(proc_name + strrchr(proc_name, '/'), multiple);
52
	KillProcessByName(proc_name + strrchr(proc_name, '/'), multiple);
42
	RunProgram(proc_name, "");	
53
	RunProgram(proc_name, "");