mostrar informes

[oliviagadel]

Gracias a todos, voy a intentar estas cosas que me indicais. Os comunicare los resultados

[oliviagadel]

gracias, con el siguiente codigo que me habeis indicado funciona perfectamente:

frm:=tquickreport1b.create(self);
try
with frm do begin
qtodo.close;
qtodo.sql.Clear;
qtodo.sql.add(s);
qtodo.open;
preview;
end;
finally frm.Free; end;

[[Lepe]]

Vamos a ahorrarnos una variable

Código Delphi [-]
 with tquickreport1b.create(self) do
  try
    qtodo.close;
    qtodo.sql.Clear;
    qtodo.sql.add(s);
    qtodo.open;
    preview;
  finally Free; end;

chau