Delphi/C++ Builder の TImageList へビットマップの左下を透過色に指定しつつ追加

Delphi/C++ Builder の TImageList へビットマップの左下のピクセル色を透過色に指定しつつ追加

TImageList の AddMasked メソッドを使用する際、第二引数に透過色を指定すればよいが、Canvas プロパティの Pixels を利用すると簡単に可能

左下
ImageList.AddMasked(Bitmap, Bitmap.Canvas.Pixels[0, Bitmap.Height -1]);

右下なら
ImageList.AddMasked(Bitmap, Bitmap.Canvas.Pixels[Bitmap.Width -1, Bitmap.Height -1]);

左上なら
ImageList.AddMasked(Bitmap, Bitmap.Canvas.Pixels[0, 0]);

コメント