Up

_CLRwindow

Clear the background of a window object.

Prototype :

fun [ObjWin] ObjWin

Return : ObjWin the same window object or nil if error

See also :

Example :

typeof win = ObjWin;;

fun cbClick (obj, user_param, xclick, yclick, mousebutton)=
	_CLRwindow win;
	0;;

fun main ()=
	_showconsole;
	set win = _CRwindow _channel nil 0 0 300 200 WN_NORMAL "Test CLRwindow";
	_PAINTrectangle win 50 20 200 160 DRAW_SOLID 1 0 DRAW_SOLID 0x00FF00;
	_CBwinClick win @cbClick 0;
	0;;