How to move a list?

[cairnswm]

The idea is to call the TMan.move for each man so you need a list something like this

1. Create a loop for each item in the list
2. Call the DoMove for each item
2a. But TList store TObjects not TMyMan so you need to typecast the Object to a TMyMan first.

[pascal]
For I := 0 to MyMen.Count-1 do
Begin
TMyMan(MyMen[I]).DoMove(MoveCount);
End;
[/pascal]