TWinControlEnumerator

pt 

GetCurrent

 

Create

 

GetEnumerator

 

MoveNext