mostrar informes

[[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