請問Delphi的for...

[fores...@bbs.stut.edu.tw]

※ 引述《chenw...@bbs.kimo.com.tw (aoc....)》之銘言：
> for i = 1 to 10
> 中間可以設定間隔嗎?
> 就是如果要每個間隔2的話
> 要怎麼設定
> 我記得vb是fotr i = 1 to 10 step 2
> 那Delphi呢?
> 謝謝!!

delphi沒有提供這樣的功能，
只有
for 變數=初值 <to/downto> 終值 do //只能加1減1
begin
[敘述區塊;]
[break;]
[continue;]
[敘述區塊;]
end;

例如：從1加到100只計算奇數

var a,sum:integer;
begin
sum:=0;
for a:=1 to 100 do
begin
if (a mod 2)=0 then //判斷是否為偶數，若為偶數則不加
continue;
sum:=sum+a;
end;
--
[1;36m╭╮╭╮ [m 作者 [36mforest [m 來自 [36m10.1.67.35 [m
[1;35m╰╰╯╯ [m [1;36m南台科技大學˙南台計中BBS [33m[STUT.BBS] [31m@ [37mbbs.stut.edu.tw [m