Hallo Zusammen,
das Create ist vorhanden. Interessant ist, NUR wenn im QuellPfad keine PDFs vorhanden sind kommt die
Exception ansonsten nicht!
Die Ursache ist vermutlich eine andere. Ich werde weiter schauen. Danke für die Bestätigung.
Delphi-Quellcode:
...
MyFileList:=TStringList.Create;
try
QuellPfad := IncludeTrailingBackslash(deQuelle.Text);
if not GetDirFilesEx(QuellPfad, '*.pdf', MyFileList, TSearchOption.soTopDirectoryOnly, false)then exit;
...
finally
MyFileList.free;
end;{try}