掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TImageをマウスで移動するには？ (ID：29988)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
変数の宣言については、やはり入門書を読むことをお勧めします。 入門書が理解できていれば、この問題はすんなり解決するでしょう。 procedureの中でI:integerを宣言すること自体は全く問題ありません。 ためしに、新規プロジェクトを作って、MouseDownでIを参照させてみてください。 procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var I:Integer; begin //以下二つの動作がないと警告、ヒントがでるはずです。 I:=10; //Iの初期化 caption:=IntToStr(I); //Iの参照 end; >>[警告] Unit1.pas(55): 変数 'I' は初期化されない場合があります Iの値が決められていない状態でIの値を参照しているのは大問題です。 >>[ヒント] Unit1.pas(67): 'I' に代入された値は使われていません Iを一度も使用しないでいることです。 つまり、Iはあってもなくてもプログラムは同じ動作をすることを意味します。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.