掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
条件によりイメージを変える (ID:25188)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 設定した数値により、FormのImage.Canvasに表示する画像を変えたいと思い、 FormにImage1,Image4を貼り付け、それぞれPictureを設定します。 var C : Array[0..4] of ???; ←ここでどの型を書いていいのかわかりません。 I : integer; begin with Image0.Canvas do begin C[0] := Image1.Picture.Graphic; C[1] := Image2.Picture.Graphic; C[2] := Image3.Picture.Graphic; C[3] := Image4.Picture.Graphic; if sbp <110 and smk = 0 then I := 0 else if sbp > 250 and smk = 0 then I:= 1 else if sbp <110 and smk = 1 then I:=2 else if sbp > 250 and smk = 1 then I:=3; Draw(10,10,C[I]); end; end; 上記のようなプログラムで、条件により、表示するImageを変えられると思いますが、 配列を宣言した際、どの型を選んでいいのかが分かりません。 どなたかご教示願えませんでしょうか？ また、Image１..Image4はTransparentをTrueにしているのですが、Canvasですでに描画している上に表示をさせると、Imageの周りが白くなり、ベースの色(例えば青) が見えません(透過していない)。これもあわせてご教授いただけると助かります。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.