Rekursiv Suchen

[baumina]

Also ich denke, dass wenn du z.B. nach "C:\temp\*.FRP" mit FindNirst/FindNext suchst, dass du die Unterverzeichnisse damit nicht erwischen kannst.

Deine repeat-Schleife müsst eigentlich ohne Exception durchlaufen.

Die Exception kann ich mir eigenlich nur bei diesem Block vorstellen:

Delphi-Quellcode:

  try
     PDFExport.ShowDialog := false;
     frReport.ShowProgress := false;
     try
       frReport.LoadPreparedReport(AFRPFile);
       frReport.ExportTo(PDFExport, APDFFile);
     except
       exit;
     end;

   finally
     PDFExport.Free;
     frReport.Free;
   end;

Hier mal nen Haltepunkt und mit F8 durchsteppen.

[GroZ]

FRPzuPDF(C:\PFAD','C:\PFAD.pdf')
VerzeichnisMitFRPzuPDF('C:\PFAD\*.FRP',True) Das True bedeutet rekursiv also das die Unterordner mitdurchsucht werden sollen.
FRPtoPDF
Das steht jetzt im Aufrufstack.

Wenn die Exception kommt steht nix im AufrufStack...

[Sir Rufo]

Zitat von GroZ:

FRPzuPDF( 'C:\PFAD', 'C:\PFAD.pdf' )

Da scheint deine Routine wohl Schwierigkeiten zu haben diese FRP-Datei C:\PFAD in C:\PFAD.pdf umzuwandeln.

Klingelt da jetzt was?

[baumina]

** gelöscht **

[TiGü]

Zur Not:
Tischler, Goldschmied, Gärtner...es gibt noch andere Optionen!
Da haste hinterher zumindest was in der Hand.

[Dejan Vu]

Zitat von TiGü:

Zur Not:
Tischler, Goldschmied, Gärtner...es gibt noch andere Optionen!
Da haste hinterher zumindest was in der Hand.

Wie wäre es, wenn Du deinen Lebensfrust für Dich behältst?

[mkinzler]

Zitat:

Wie wäre es, wenn Du deinen Lebensfrust für Dich behältst?

Da kann ich nur Zustimmen.

[TiGü]

Zitat von Dejan Vu:

Zitat von TiGü:

Zur Not:
Tischler, Goldschmied, Gärtner...es gibt noch andere Optionen!
Da haste hinterher zumindest was in der Hand.

Wie wäre es, wenn Du deinen Lebensfrust für Dich behältst?

Okay, war vielleicht etwas grob.
Tut mir leid!

Ist halt nur etwas frustrierend anzuschauen, wenn soviele Leute schon Lösungen gepostet haben, aber komplett von Groz ignoriert werden.

[GroZ]

So nach langem Suchen war es ein Fehler im internen System.
frReport.PrintToDefault := true; hat die ganze Exception behoben. Danke an alle die mir geholfen haben.