我正在尝试使用 Bitmap.Canvas 属性在 TImage 上进行自定义绘图。在 Windows 上,以下代码可以正确使用蓝色填充清除整个位图:
Image1.Bitmap := TBitmap.Create;
with Image1.Bitmap do
begin
width := Round(Image1.Width);
height := Round(Image1.Height);
with canvas do
begin
BeginScene;
Clear(TAlphaColorRec.Blue);
EndScene;
end;
end;
在 Android 上,Bitmap 仍然充满蓝色,但它在 TImage 内尖叫。如何在 Android 设备上执行此操作?