TImageに、TImageListの画像を表示

解決

kuze 2009-09-20 07:12:56 No: 35732

TImageListに複数の画像を保存しておき、条件に応じ、TImageにその内容を表示したいと考えております。
しかし、例えば、TImageListの0番目の画像を、TImageに表示（コピー）するには
どうすればよいのでしょうか？
よろしくお願いします。

igy 2009-09-20 07:24:08 No: 35733

試していませんが、
TImageListのGetBitmap メソッドを使えばできそうな気がしますが、
いかがですか？

kuze 2009-09-20 07:40:07 No: 35734

条件が抜けていましたので、追記します。
Delphi2009を使用。
TImageListには、PNG(透明色あり)のファイルを保存しております。
GetBitmapで、PNGのファイルを取り出せるのでしょうか？
そのあたりがよく分かっていません。

kuze 2009-09-20 07:43:47 No: 35735

igyさんへ
ImageList1.GetBitmap(1, Image1.Picture.Bitmap);
で試してみましたが、透明色は無効になってしまいました。

あれ？ 2009-09-20 07:55:29 No: 35736

ImageListに格納できるのはBitmapだけだと思ったけど、
最近のDelphiでは PNGも格納できるの？
それはどんなメソッド？

kuze 2009-09-20 08:44:14 No: 35737

Delphi2009は、PNGに対応しています。
メソッドは利用していません。
設計時に、Iconをダブルクリックして、使用する画像ファイル郡を１つ１つ読み込みました。

D 2009-09-20 16:54:18 No: 35738

>で試してみましたが、透明色は無効になってしまいました。

TImageのTransparentプロパティをTrueにしてみたらどうでしょうか。

kuze 2009-09-20 17:24:50 No: 35739

Ｄさん
Transparentプロパティで無事、透明色が有効になりました。
ありがとうございました。