[jachguate]

No estoy seguro de haber entendido bien, pero quizas te sirva el ejemplo:

Código Delphi [-]
if cbReporteClientes.Checked then
begin
  rClientes := TqrClientes.Create;
  try
    rClientes.Print;
  finally
    rClientes.Free;
  end;
end;

if cbReporteProveedores.Checked then
begin
  rProveedores := TqrProveedores.Create;
  try
    rProveedores.Print;
  finally
    rProveedores.Free;
  end;
end;

if cbReporteFacturas.Checked then
begin
  rFacturas := TqrFacturas.Create;
  try
    rFacturas.Print;
  finally
    rFacturas.Free;
  end;
end;

Hasta luego.