Rekursiv Suchen

[GroZ]

@Mod Erledigt hoffe das reicht so. Was anderes ist mir nicht eingefallen

@SirRufo mein Problem besteht ja darin das auch weiterhin nur einzelene Dateien konvertierbar sein müssen. Kann ich trotzdem eine generelle nehmen?

[Sir Rufo]

Zitat von GroZ:

@SirRufo mein Problem besteht ja darin das auch weiterhin nur einzelene Dateien konvertierbar sein müssen. Kann ich trotzdem eine generelle nehmen?

Wenn ich das richtig verstanden habe, dann willst du alle *.frp Dateien im Verzeichnis C:\WoAuchImmer umwandeln. Richtig?

Delphi-Quellcode:

procedure ConvertFrpToPdf( const AFilename: string );
begin
  FrpToPdf( AFilename, ChangeFileExt( AFilename, '.pdf' ) );
end;

procedure DoIt;
begin
  ProcessFiles( 'C:\WoAuchImmer', '*.frp', ConvertFrpToPdf );
end;

Fertig => Ja, kann man (und vor allem sehr übersichtlich)

[GroZ]

Zitat von Sir Rufo:

Zitat von GroZ:

@SirRufo mein Problem besteht ja darin das auch weiterhin nur einzelene Dateien konvertierbar sein müssen. Kann ich trotzdem eine generelle nehmen?

Wenn ich das richtig verstanden habe, dann willst du alle *.frp Dateien im Verzeichnis C:\WoAuchImmer umwandeln. Richtig?

Delphi-Quellcode:

procedure ConvertFrpToPdf( const AFilename: string );
begin
  FrpToPdf( AFilename, ChangeFileExt( AFilename, '.pdf' ) );
end;

procedure DoIt;
begin
  ProcessFiles( 'C:\WoAuchImmer', '*.frp', ConvertFrpToPdf );
end;

Fertig => Ja, kann man (und vor allem sehr übersichtlich)

Genau. Das Verzeichnis möchte ich dann via Konsole angeben. Das geht alles auch schon wie ich das möchte. Lediglich die Endlosschleife krieg ich nicht gelöst. Aber ich werde jetzt deinen Vorschlag mal ausprobieren und werde berichten.

[p80286]

Zitat von GroZ:

Lediglich die Endlosschleife krieg ich nicht gelöst. Aber ich werde jetzt deinen Vorschlag mal ausprobieren und werde berichten.

Darf ich Deine Aufmerksamkeit auf #2 lenken, du solltest auf <>0 testen und nicht auf =1 und als Überschrift wäre "Dateien rekursiv suchen" noch besser.

Gruß
K-H

[GroZ]

Zitat von p80286:

Zitat von GroZ:

Lediglich die Endlosschleife krieg ich nicht gelöst. Aber ich werde jetzt deinen Vorschlag mal ausprobieren und werde berichten.

Darf ich Deine Aufmerksamkeit auf #2 lenken, du solltest auf <>0 testen und nicht auf =1 und als Überschrift wäre "Dateien rekursiv suchen" noch besser.

Gruß
K-H

Das hab ich probiert nur wird da die Funktion komplett übersprungen. Also er schreibt dann 'Konvertierung erfolgreich' aber Dateien wurden nicht konvertiert. Und gleich danach Fehler 1 das bedeutet dass das Verzeichnis falsch ist....

[baumina]

Du warst nie und nimmer in einer Endlosschleife drin, denn deine if-Abfrage auf "PFAD/dir" hat verhindert, dass du jemals in die repeat-Schleife reinkommst, außer deine Eingabe lautete tatsächlich "PFAD/dir" und dieses Verzeichnis wird's wohl nicht geben.

[GroZ]

Zitat von baumina:

Du warst nie und nimmer in einer Endlosschleife drin, denn deine if-Abfrage auf "PFAD/dir" hat verhindert, dass du jemals in die repeat-Schleife reinkommst, außer deine Eingabe lautete tatsächlich "PFAD/dir".

Doch ich war in einer drin. Also die CPU auslastung ist von 3% auf 95% hochgegangen
und "PFAD" ist zum Beispiel "C:\Programme\Foo\Alt\usw" nicht das Wort Pfad

[baumina]

Wie kannst du in der Endlosschleife drin sein, wenn er angeblich schreibt "Konvertierung erfolgreich".

[GroZ]

Das "Konvertierung erfolgreich" kommt nur wenn ich <> 0 habe. Sprich da ist keine Endlosschleife. Die Endlosschleife kommt nur wenn ich = 0 nutze.

[baumina]

Dann hab ich wohl deinen Post #4 falsch interpretiert.