Entwickler-Ecke

Dateizugriff - Dateisuche nach Eingabemaske


JokerXP - Do 31.07.03 10:04
Titel: Dateisuche nach Eingabemaske
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:
//Verzeichnis öffnen
procedure TForm1.DCChoiceEdit1ButtonClick(Sender: TObject);
var
  verzeichnis : string;
begin
  SelectDirectory ('Test', '', verzeichnis);
  DCChoiceEdit1.text := verzeichnis;
end;

//OK-Button - Maske
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 user profile iconKlabautermann: BBCode aktiviert.


matze - Do 31.07.03 11:51

schau mal in die FAQ: http://www.delphi-forum.de/viewtopic.php?t=94


lambruco - Mo 04.08.03 17:15

Schau mal nach der Funktion MatchesMask().

Unit: Masks

function MatchesMask(const Filename, Mask: string
): Boolean;