Gracias Lepe por contestar.
Tengo una lista de reportes en un stringgrid donde la col1 es el nombre del formulario y la col2 el nombre del reporte.
Lo que quiero es poder seleccionar de la lista el formulario y poder imprimirlo con un procedimiento generico para todos los reportes y no declarar cada reporte como actualmente lo hago.
Código:
procedure imprimir(formulariox,formatox: string);
var cont: integer;
xreporte: TQuickRep;
begin
if formulariox='reportes' then
begin
with reportes do
begin
if formatox='QuickReprecibo' then
xreporte:=QuickReprecibo;
if formatox='QuickRepFactura' then
xreporte:=QuickRepFactura;
if formatox='QuickRepOrden' then
xreporte:=QuickRepOrden;
end;
end;
xreporte.Preview;
end;
Gracias