Si tienes una version de dephi mas moderna, el uso de genericos es mejor.
Ademas, "caminar" una enumeracion es mucho mejor asi:
http://delphi.about.com/od/beginners/a/delphi_loops.htm
Código Delphi
[-]
for varName in enumName do
begin
end;
Y pusiste el error, pero no cual de todas las lineas lo saco!