Welche Zeile / Anweisung? Wie sind die Werte der Parameter? An welchem Datum ist Weihnachten?
Delphi-Quellcode:
repeat
if (X.Name <> '.') and (X.Name <> '..') and ((X.Attr and faDirectory) <> 0) then
begin //Geht hier nicht rein
Result:=VerzeichnisMitFRPzuPDF(ExtractFilePath(PfadUndDateimaske)+X.Name+'\'+ExtractFileName(PfadUndDateimaske),SubDirs);
if not Result then
break;
end;
until FindNext(X) <> 0;
Hier springt er im Debugmodus von repeat zu until.
Dann kommt halt die
Exception.
Die Parameterwerte sind ein einfaches Verzeichnis 'C:\Files\FRP\2010\September' beispielsweise.
Der Ordner besteht aus 8 FRP Dateien 1 Ordner in dem befinden sich 3 FRP Dateien und noch 1 Ordner der auch 3 FRP Dateien beinhaltet.
Weihnachten ist am 24.12.
