Subversion Repositories Kolibri OS

Rev

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

Rev 4137 Rev 4166
Line 218... Line 218...
218
	$int 0x40
218
	$int 0x40
219
}
219
}
Line 220... Line 220...
220
 
220
 
221
:int CheckActiveProcess(int Form_ID)
221
:int CheckActiveProcess(int Form_ID)
222
{
222
{
223
	int id=GetProcessSlot(Form_ID);
223
	int id9=GetProcessSlot(Form_ID);
224
	if (id==GetActiveProcess()) return 1;
224
	if (id9==GetActiveProcess()) return 1;
225
	return 0;
225
	return 0;
Line 226... Line 226...
226
}
226
}
227
 
227