Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Uncle Cracker,
22. Dez 2003
Hat auch nicht geholfen, deswegen habe ich es nochmal probiert und jetzt geht's.
Ich weiß zwar nicht wo der Fehler lag, aber so funktioniert es:
var
SRec: TSearchRec;
Stl: TStrings;
begin
Stl := TStringList.Create;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Uncle Cracker,
21. Dez 2003
Wie kann ich Dateien, in diesem Fall Musiktitel, in eine StringList laden, die sich in einem Ordner befinden.
Bisher habe ich folgende Funktion verwendet:
function Inhalt(Pfad, Maske: string; Pfadanzeigen: boolean): TStringlist;
var SRec: TSearchRec;
SL: TStringList;
begin
SL := TStringList.Create;
FindFirst(Pfad + Maske, not faDirectory, SRec);