Up

_OBJfather

Returns the father of any OBJ object, if exists.

Prototype :

fun [u0 u1] u1

Return : u1 the Scol father object. It returns nil if error.

Error :

See also :

Example :

typeof win = ObjWin;;
typeof text = ObjText;;

fun main ()=
	_showconsole;
	// ...
	set win = _CRwindow _channel nil 200 250 400 500 WN_NORMAL "test _OBJfather";
	set text = _CRtext _channel win 5 5 390 450 ET_BORDER|ET_HSCROLL|ET_VSCROLL "";
	// ...
	_CRbutton _channel _OBJfather text nil 5 460 390 35 0 "BUTTON !";
	// ...
	0;;

Note :