Hi,
Ich möchte in einem bereits bestimmten Verzeichnis nach Dateien suchen.
Die Suche soll durch eine Eingabemaske charakterisiert werden. also z.B. *.txt oder eben beliebige andere Eingaben.
Diese Dateien sollen dann später nach strings durchsucht und diese dann ersetzt werden.
Mir fehlt jedoch noch der Ansatz für die Auswertung bzw. den Umgang mit der Eingabemaske.
Soweit bin ich bereits:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18:
| procedure TForm1.DCChoiceEdit1ButtonClick(Sender: TObject); var verzeichnis : string; begin SelectDirectory ('Test', '', verzeichnis); DCChoiceEdit1.text := verzeichnis; end;
procedure TForm1.Button1Click(Sender: TObject); var Mask : string; begin Mask := MaskEdit1.EditText; listbox1.items.add ('Suche nach folgender Maske: ' + Mask); end; |
Vielleicht kann mir jemand weiterhelfen.
mfg
joker
Moderiert von
Klabautermann: BBCode aktiviert.