引言: 請問for i=0 to 9 do ....都是以1遞增,請問如果我要以2為遞增單位要如何做???

while I < 8 do
begin
  Inc(I,2);
  ......
end;

for i:=0 to 9 do
begin
   if (i mod 2)=0 then 
    begin
      ......
      ......
    end;
end;

DoIt := True;
for i:=0 to 9 do
begin
  if DoIt then 
  begin
      ......
      ......
  end;
  DoIt := Not DoIt;
end;