Canvas Draw Tbitmap Multiple Images

Question

Would you like to capture several images and "join" them all in one without having to save them first, I capture 6 images put one over the other according to the position on the screen and saved in a single image, would anyone have any idea? I’m using Delphi XE7

function Unir(G1, G2, G3: TGraphic): TBitmap;

begin
  Result := TBitmap.Create;
  with Result do
  try
    Width := Screen.Width;
    Height := Screen.Height;
    Canvas.Draw(0, 0, G1);
    Canvas.Draw(80, 90, G2);
    Canvas.Draw(100, 150, G3);
  except
    FreeAndNil(Result);
    raise;
  end;
end;

That way I can put together 3 images, but I don’t have a fixed amount of images, because they are variable, so in this case the ideal would be to use a array images. I am trying to use the function below, but it gives error when calling them:

Incompatible type Array and Dynamic Array

function UnirTudo(Imagens : array of TGraphic): TBitmap;
var
i : Integer;
begin
  Result := TBitmap.Create;
  with Result do
  try
    Width := Screen.Width;
    Height := Screen.Height;
    for i := 0 to Length(Imagens) - 1 do begin
      Canvas.Draw(0, 0, Imagens[i]);
    end;
  except
    FreeAndNil(Result);
    raise;
  end;
end;