Collection of types?

What is the correct way to do this?

Local entitylist:tentity[]
While parent:tentity<>Null
	entitylist[entities]=parent'crash here
	entities=entities+1
	parent=parent.parent
Wend

have you looked at lists?

Local entities:TList = New TList
While parent:TEntity <> Null
  entities.AddLast( parent )
  parent = parent.parent
Wend

neat isnt it!