Hi, I am testing bgra bitmap canvas2d transform, but it does not work, as you can see in the screenshot that I attached, I set translate to (100, 100), but it does not work, any suggestion?
Regards
procedure TForm1.FormCreate(Sender: TObject);
begin
bmp := TBGRABitmap.Create(100, 100, BGRA(255, 0, 0));
with bmp.Canvas2D do
begin
save;
translate(100, 100);
restore;
end;
end;
procedure TForm1.FormPaint(Sender: TObject);
begin
bmp.Draw(Canvas, 0, 0);
end;