小编Jor*_*gon的帖子

Delphi 的新手，我如何让 for 循环以 2 的倍数而不是 1 的倍数递增？所以而不是：

procedure TForm1.button1click(Sender TObject);
var
i, x: integer;
begin
for i := 0 to 5 do;
x := IntToStr(i);
memo1.add.lines(x);
end;

所以，而不是在备忘录框中的输出是 0 1 2 3 4 5

这将是

0 2 4