Можно ли задать шаг в For?

Fori:=0 to Maximum do if i mod step = 0 then
begin

end; 

Переменная Step и есть нужный шаг