Alle Dateien aus Verzeichnis öffnen, bearbeiten, speichern

[ByteLord]

Hallo Leute,

ich hab vor kurzer Zeit ein Programm geschrieben mit der man HTML-Dateien bearbeiten kann.
Die beim öffnen einer HTML-Datei immer einen bestimmten Inhalt (der im quelltext makiert ist) in ein TRichEdit einliest.

Delphi-Quellcode:

procedure TMainForm.FileOpen(Sender: TObject);
begin
  CheckFileSave;
  if OpenDialog.Execute then
  begin
    PerformFileOpen(OpenDialog.FileName);
    Editor.ReadOnly := ofReadOnly in OpenDialog.Options;
    Editor.Text:=copy(Editor.Text,pos('', Editor.Text),length(Editor.Text));
    Editor.Text:=copy(Editor.Text, 0, pos('', Editor.Text) -1);
    Editor.lines.delete(0);
  end;
end;

Und jetzt möchte ich das Programm erweitern:
Man wählt ein verzeichnis aus, indem automatisch alle dateien nacheinander geöffnet werden und deninhalt zwischen den beiden makierungen austaucht und dann wieder mit dem selben Namen abspeichert.

Leider weiß ich nicht genau wie das funktioniert, kann mir jemand helfen.
Würde mich sehr freuen.

[edit=sakura] Leerzeichen in Titel eingefügt. Mfg, sakura[/edit]

[Jens Schumann]

Hallo,
schau mal in der OH unter FindFirst und FindNext nach.
Da steht die Lösung

[SirThornberry]

im Anhang ist ne datei die ne klasse beinhaltet zum auflisten eines verzeichnisses inclusive unterverzeichnisse. Kannst diese ja als ausgangspunkt nehmen und daraus entnehmen wie das mit dem auflisten geht

[ByteLord]

tut mir leid,
aber ich verstehs nich so ganz.?

[SirThornberry]

Mit FindFirst und FindNext kannst du dir den Inhalt eines verzeichnisses auflisten lassen. Und falls du keine lust hast das ganze selbst zu machen nimm einfach die unit von mir und die klasse darin um das zu realisieren, da brauchste nur ne instanz zu erstellen und den pfan angeben und ne stringlist wird mit allen Dateien + Verzeichnissen + unterverzeichnissen gefüllt...

[ByteLord]

also ich möchte eine funktion in das Programm einbauen
oder ein neues programmieren,
dass alle dateien in einem verzeichnis bearbeitet:
1.: datei öffnen
2: makierte inhalt durch neuen inhalt erstetzen
3: datei unter selben namen abspeichern

jetzt folgt die nächste datei im verzeichnis.
Das soll alles ganz automatisch funktionieren, indem man nur das verzeichnis angibt.

[SirThornberry]

wo liegt jetzt das problem, an welcher Stelle kommst du nicht weiter??