Delphi で配列を使ったimageを表示

質問

Delphi初心者です。
Form上に同じ内容のbmpファイル(写真)を10回表示したいのですが、手順が全く判りません。
配列の宣言からimageの表示までの手順を教えて頂けないでしょうか。

よろしくお願いします。

回答No.1

SHIMAPEE · ベストアンサー

Delphiのimageの表示に詳しくはないので最後までお付き合いできるかわかりませんが、もう少しShiroNekoさんがやりたい／手順でわからないことの情報がないと、調べて回答するのが難しいです。

作ろうとしているのはWindowsアプリケーションでしょうか。お使いのバージョンは。

10回というのは回数ではなく、表示する個数ですね？

TImageなどをFormに1個置いて、その中に10個の写真を並べたいのか、又はTImageなどを10個置いて、それぞれ表示したいのか。配列と書かれているので後者かと思いますが、リソースが少なく、簡単なのは前者でしょう。

宣言と書かれていますが、簡単な方法は設計時にTImageなどをFormに置くことです。それともプログラム実行時に配置したいのでしょうか。

Visual Basicのコントロール配列のような、実行時にまとめて処理する方法がわからないということでしたら、検索すると下記のようなものがたくさん現れます。

[Ｑ]ＶＢのコントロール配列はDelphiではどうやって実現すればいいのでしょうか？
http://forum.nifty.com/fdelphi/faq/00115.htm

お礼

お返事　遅くなり申し訳ございません。色々なサイトや資料を参考にさせて頂き、まずは解決いたしました。
ありがとうございます。Delphiは難しいですね！

var
i:integer;
xBMP:TBitmap;
xImage: array [1..16] of Timage;

begin
xBMP := TBitmap.Create;
xBMP.LoadFromFile('D:\写真.bmp');
//
for i := 0 to 3 do begin
xImage[i+ 1] := Timage.Create (Self);
xImage[i+ 1].Parent := Form1;
xImage[i+ 1].Left := (i * 24) + 8;
xImage[i+ 1].Top := 16;
xImage[i+ 1].Picture.Assign (xBMP);
end;
end;