Einzelnen Beitrag anzeigen

ByteLord

Registriert seit: 13. Jul 2003
40 Beiträge
 
Delphi 6 Personal
 
#1

Alle Dateien aus Verzeichnis öffnen, bearbeiten, speichern

  Alt 21. Jan 2004, 18:19
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]
  Mit Zitat antworten Zitat