Create (TWinControlEnumerator)

pt 

GetCurrent (TWinControlEnumerator)

GetEnumerator (TWinControlEnumerator)

MoveNext (TWinControlEnumerator)