Something funny I've come across

If you have a class based on cursor, avoid the Width property (Height as well)

xxx = createobject('test1', 20)
xxx = createobject('test2', 20)

define class test1 as cursor

	width = 0
function init( Width )
	
	this.Width = min(m.width, this.Width) && error here
	?this.Class, this.Width
	
endfunc
enddefine

define class test2 as relation

	width = 0
function init( Width )
	
	this.Width = min(m.width, this.Width)	&& no error here
	?this.Class, this.Width
endfunc
enddefine