Convertir un image PNG en Bitmap
Bonjour,
J'ai un TImage dans lequel je charge un fichier PNG (avec transparence).
Je souhaite convertir cette image en Bitmap et garder la transparence sur mon TImage.
Si je fait cela, le fond de mon image est de couleur noir ..
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
Tmp := TBitmap.Create;
try
Tmp.Transparent := True;
Tmp.Width := Image2.Picture.Width;
Tmp.Height := Image2.Picture.Height;
Tmp.Assign(Image2.Picture.Graphic);
Image2.Picture.Assign(tmp);
finally
Tmp.Free;
end; |
Si je change le Assign par Draw, le fond de l'image est blanc.
Code:
tmp.Canvas.Draw(0, 0, Image2.Picture.Graphic);
Savez vous comment retrouver la transparence de l'image une fois converti ?
Merci
