Up

_FORCEcompCheckROverDisplay Scol 5.x or above required

Forces a rollOver object aspect display for a compCheck object.

Prototype :

fun [CompCheck I I] I

• CompCheck : a check object.
• I : Aspect: Normal (CHK_DSPL_RO_NO) or RollOver (CHK_DSPL_RO_YES).
• I : Protect RollOver aspect (CHK_DSPL_RO_FRC) or not (CHK_DSPL_RO_NO): Protected RO aspect, lets this aspect displayed when a mouse cursor leaves the CompCheck. The protected aspect has to be removed manually.

Return : I 0 or nil if error.

See also :

Example :

typeof myCheck = CompCheck;;

fun myFunction (flag)=
	if flag == 1 then
		_FORCEcompCheckROverDisplay myCheck CHK_DSPL_RO_NO CHK_DSPL_RO_NO	// Forcing normal aspect & removing protection
	else if flag == 2 then
		_FORCEcompCheckROverDisplay myCheck CHK_DSPL_RO_YES CHK_DSPL_RO_NO	// Forcing rollover aspect
	else if flag == 3 then
		_FORCEcompCheckROverDisplay myCheck CHK_DSPL_RO_YES CHK_DSPL_RO_FRC	// Forcing & protecting rollover aspect
	else
		1;;
		
fun createFunction (container, x, y)=
	let _LDalphaBitmap _channel _checkpack "tests/scol2d/check/rsc/check_1.png" -> abmp in
	set myCheck = _CRcompCheck _channel container nil [x y] OBJ_ENABLE|OBJ_VISIBLE|ROL_DISABLE|ROL_MASK OBJ_CONTAINER_ALLEVENTS abmp;
	0;;