pascal - 无法为 TBitmap 获取透明颜色

Question

我有一个要在 TPaintBox 上绘制的位图。问题是我之前必须将其旋转到特定角度。我决定使用 TBitmap32。
我是这样做的:我首先创建一个 TBitmap，然后将其传输到 TBitmap32，进行转换并将 TBitmap32 再次移动到 TBitmap。我正在 TPaintBox 上绘制最后一个 TBitmap。问题是我无法获得透明度。
位图有一个红色背景，我想让它透明。你会帮忙吗？我究竟做错了什么？

carImage32 := TBitmap32.Create;

carImage32.Width := carImageTMP.Width;
carImage32.Height := carImageTMP.Height;

carImage32.Canvas.Draw(0, 0, carImageTMP); //assign TBitmap

carImage := TBitmap.Create;
carImage.Width := carImageTMP.Width;
carImage.Height := carImageTMP.Height;


RotateBitmap(carImage32,angle,false,clNone,True);

carImage.Transparent:=True;
carImage.TransparentColor:=clRed;

carImage.Assign(carImage32);

paintBox.Canvas.Draw(0,0,carImage);

Answer 1

我解决了我的问题。
我也应该将这部分代码用于 TBitmap32:

auto.carImage32.DrawMode:=dmTransparent;
auto.carImage32.OuterColor:=clRed32;

并工作:)