You have to use enumrerators. I haven't use them yet in any of my classes so I can't provide you with an example of my own.
But I can provide you with links to a few articles on this topic:
http://delphi.about.com/od/oopindelp...iterations.htm