Hi,
ich nutze diese Funktion:
Delphi-Quellcode:
procedure ListDirFiles(sDir: string; const sList: TStrings);
var Rec: TSearchRec;
begin
sList.BeginUpdate;
try
sList.Clear;
if FindFirst(IncludeTrailingPathDelimiter(sDir) + '*.*', faAnyFile or faReadOnly or faHidden or faArchive, Rec) = 0 then
begin
repeat
if (((Rec.Attr and faDirectory) = 0) and (Rec.Name <> '.') and (Rec.Name <> '..')) then sList.Add(Rec.Name);
until FindNext(Rec) <> 0;
SysUtils.FindClose(Rec);
end;
finally
sList.EndUpdate;
end;
end;
Sie liefert mir alle Namen von Dateien in einem Ordner. Wenn der Pfad allerdings Umlaute beinhaltet, bekomme ich eine leere Liste zurück. Kann ich bei der Pfadübergabe iwas machen, damit die Umlaute erkannt werden? (auch "ß" wirdf nicht erkannt)
Grüße