Criar TQrShape em tempo de execução

Ola pessoal,
Estou precisando criar um QrShape em tempo de execução para um relatorio.
Tem que ser em tempo de execução pois não sei a quantidade exata que o formulario irá precisar.

ja tentei fazer desse jeito aqui mais não deu certo.

(no evento beforeprint da banda)

Var
Shape : TQRShape;

Begin
Shape := TQRShape.Create(FRelatorio);
With Shape do
begin
Parent := Banda_Detalhes;
Enabled := True;
Brush.Color := clLime;
Height := 20;
Width :=20;
Left := 10;
Pen.Width := 2;
end;
end;

Me desculpe se ja existir algum topico sobre isso, mas sou novo no forum e não consegui achar nada sobre isso na pesquisa.
desde ja agradeço =D