[[Luis M.]]

Hola.
Si entendí bien, quieres dos copias de cada hoja de la factura.
En el botón que mandes a imprimir sería algo así:

Código Delphi [-]
procedure TFormFactura.BTImprimirClick(Sender: TObject);
var
  cPath: string;
begin
  cPath := ExtractFilePath(Application.ExeName);
  QCFactura.Close;
  QCFactura.SQL.Text := 'Select * from cfactura where numero = '+
                                    QuotedStr(FacturaNUMERO.AsString);
  frxReport1.LoadFromFile(cPath + 'REPORTS\Factura.fr3');
  frxReport1.PrintOptions.Copies := 2;
  frxReport1.PrepareReport(True);
  frxReport1.Print;
end;

Un saludo.