全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1278
推到 Plurk!
推到 Facebook!

For迴圈的問題

 
aaa33358
一般會員


發表:1
回覆:1
積分:0
註冊:2007-02-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-02-24 11:15:04 IP:219.84.xxx.xxx 訂閱
請問各位高手,如果小弟想在Delphi的For迴圈內更改迴圈值請問要怎麼寫?
如 :
var i : Integer
For i := 0 to 10 do
begin
// i := i 2; // 將 i 的值變更為 2 、4、6、8、10
end;
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-02-24 14:23:53 IP:211.22.xxx.xxx 未訂閱
Delphi的語法在迴圈中更改計數值是不允許的。
var i : Integer

For i := 0 to 10 do
begin
if ( ( i mod 2 ) = 0 ) then
......
else
continue;
end;
aaa33358
一般會員


發表:1
回覆:1
積分:0
註冊:2007-02-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-02-24 23:26:37 IP:219.84.xxx.xxx 訂閱
===================引 用 文 章===================
Delphi的語法在迴圈中更改計數值是不允許的。
var? i : Integer

For? i := 0 to 10 do
?begin
?if ( ( i mod 2 ) = 0 )? then
????? ......
else
?continue;
end;

這樣ㄚ~真可惜~不過還是謝謝大大的回覆
amen
一般會員


發表:4
回覆:8
積分:7
註冊:2006-08-04

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-02-28 19:04:21 IP:125.231.xxx.xxx 訂閱
X := 2;
Memo1.Lines.Clear;
for I := 0 to 10 do begin
Memo1.Lines.Add(IntToStr(X));
Inc(X,2);
end;
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#5 引用回覆 回覆 發表時間:2007-02-28 20:49:43 IP:211.22.xxx.xxx 未訂閱
amen兄,他問的是用以計算迴圈的計數值(Counter),而不是與迴圈計數無關的變數。
系統時間:2024-11-24 23:26:19
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!