Nach Datei mit variablem Namen aber bestimmter Endung suchen

[stonimahoni]

Hi Leute...


meinereiner hat mal wieder ein Problem :

Wie Ihr sicher wisst, kann man ja in Outlook eine Signatur anlegen. Diese nennt jeder anders (denke ich zumindest).
Ich habe es soweit geschafft, das jeweilige Verzeichnis auf den PCs auszulesen, bzw anzusprechen. Doch nun suche ich ne Lösung, um immer die jeweilige .rtf Datei z.B. ansprechen zu können.
Habt ihr da ne Idee?
Bei mir ist es z.b. "meine.rtf". Auf den anderen PCs heisst diese Datei aber anders. Versteht Ihr was ich meine ?


Gibts da ne möglichkeit?


Vielen Dank und MFG


Carsten

[dahead]

Wenn es nur eine Datei mit dieser Endung in dem Ordner geben sollte, ist es - wie du ja bereits mit deinem Thread Titel signalisierst - doch möglich, einfach nach einer Datei mit der Endung *.rtf zu suchen, oder nicht?

Hier im Forum gibts einen Code zum Finden von Dateien, Stichwort: FindAllFiles

Link, Link

Edit: FindFiles durch FindAllFiles ersetzt, war das falsche Such-Stichwort.

[marabu]

Während ihr sucht - das sollte funktionieren:

Delphi-Quellcode:

procedure GetFiles(folder: string; s: TStrings; mask: string = '*.*');
var
  sr: TSearchRec;
begin
  folder := IncludeTrailingPathDelimiter(folder);
  if FindFirst(folder + mask, faArchive, sr) = 0 then
  try
    repeat
      s.Add(folder + sr.Name);
    until FindNext(sr) <> 0;
  finally
    FindClose(sr);
  end;
end;

Grüße vom marabu