Das bringt leider auch nicht viel. Der Code sind jetzt aus wie folgt, aber dennoch kommt es immer noch zu den altbekannten Memory Leaks.
Delphi-Quellcode:
procedure TForm1.alsXLS1Click(Sender: TObject);
var
ExportFilter : TQRXLSFilter;
begin
if savedialog2.Execute then
begin
ExportFilter := TQRXLSFilter.Create(savedialog2.FileName);
try
try
form5.QuickRep1.ExportToFilter(ExportFilter);
except
messagedlg('Es ist ein Fehler beim Exportieren aufgetreten.',mtError,[mbOK],0);
end;
finally
ExportFilter.Free;
end;
end;
end;
Das Gleiche im Übrigen bei PDF.