No, it's still saying it's a non-Newtype...
Type TypSmallBit Field x#,y# End Type Function CreateSmallBits() For f = 1 To 100 SMbit.TypSmallBit = New TypSmallBit Next End Function Function UpdateCollision() For SMbit.TypSmallBit = Each TypSmallBit Next If ImagesCollide (imgplayerR,x,y,0,smallbit,bitx,bity,0) p1score = p1score + 10 Delete TypSmallBit ;problem is here End If End Function