掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
for文で値が不正になる (ID：11025)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
フォームにmemo１つとボタン２つを貼り付けて、以下のようにします。 ボタン１とボタン２の違いはmemo1.lines.add〜の一行のみです。 beginのあたりにブレークポイントを設置してループ変数i,jの値を見ていくと、 ボタン２の方は何故かi,jともに「3」からスタートしてしまうのです。 その後もi,jの数値は増えるどころか減ったりします。 ボタン１の方はちゃんと0からスタートして2で終わっているのに、何故かわかりません。もしかしてバグなんでしょうか？ こちらの環境はXPHomeとDelphi6Personalです。 //正常に動く方 procedure TForm1.Button1Click(Sender: TObject); var i,j:integer; begin for i:= 0 to 2 do for j:= 0 to 2 do begin memo1.Lines.Add(inttostr(i) + ',' + inttostr(j)); end; end; //妙な動きをする方 procedure TForm1.Button2Click(Sender: TObject); var i,j:integer; begin for i:= 0 to 2 do for j:= 0 to 2 do begin memo1.lines.Add('Test'); end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.