local oItems as Collection oItems = createobject('clsItems') oItem = createobject('clsItem') oItems.Add(oItem) local oThisItem as clsItem oThisItem = oItems(1) && causes a warning in the compiler! ? oThisItem.custProp *-------------------------------------------------- define class clsItems as collection enddefine *-------------------------------------------------- define class clsItem as custom custprop = "Hello" enddefine