كيف ارسم على صورة أنشأتها وقت التنفيذ

[SMP3]

عن طريق ال Canvas الخاصة بال Bitmap

PHP كود :

var
  bmp: TBitmap;
begin
  bmp := TBitmap.Create;
  bmp.SetSize(100, 100);
  bmp.Canvas.Brush.Color := clRed;
  bmp.Canvas.FillRect(Rect(10, 10, 50, 50));
  Canvas.Draw(0, 0, bmp);
  bmp.Free;
end;