Listbox mit Lieder füllen funktioniert nicht

[FrankJ28]

schon klar, "bullshit in = bullshit out", ohne Backslash halt leere Liste ;-)

[DeddyH]

Siehste, deshalb stell ich sicher, dass das Dingen mit Backslash abschließt. Man muss ja immer mit dem Schlimmsten rechnen, am Ende gar mit Usern :lol:

[Luckie]

Zitat:

Zitat von DeddyH (Beitrag 1101315)

Man muss ja immer mit dem Schlimmsten rechnen, am Ende gar mit Usern :lol:

Die versuche ich eigentlich immer auszuschließen. Aber irgendwie setzt die mein Chef mit Kunden gleich. Keine Ahnung, wie der auf dieses abgefahrene Konzept kommt.

[DeddyH]

Achja, was mir gerade einfällt: eine Listbox kann man auch prima per API (LB_DIR) mit Dateinamen befüllen.

[FrankJ28]

Zitat:

Zitat von DeddyH (Beitrag 1101315)

am Ende gar mit Usern :lol:

Wenn man die User an die manuelle, ungeprüfte Eingabe lässt, muss man natürlich später dafür Sorge tragen :lol:

[Metallicwar]

Also ich möchte gerne bei dieser Methode bleiben, nicht über API.

hab den geposteten Code von DeddyH ausprobiert und zusätzlich noch im FindFirst das Backslash eingebaut, Liste wird aber nach wie vor nicht gefüllt.

Delphi-Quellcode:

procedure MP3ListeFuellen(Folder: string; sl: TStrings);
var
  Rec : TSearchRec;
begin
  Assert(Assigned(sl));
  sl.BeginUpdate;
  try
    Folder := IncludeTrailingPathDelimiter(Folder);
    sl.Clear;
    if FindFirst(Folder + '/*.mp3', faAnyFile, Rec) = 0 then
      try
        repeat
          sl.Add(Rec.Name);
        until FindNext(Rec) <> 0;
      finally
        FindClose(Rec);
      end;
  finally
    sl.EndUpdate;
  end;
end;

Zitat:

FrankJ28:
Hallo,
bei mir funktioniert auch der OriginalCode..

hmn versteh ich nicht ...

[FrankJ28]

Hallo,
nun hast Du ja 2 \. Eines manuell in deinem FindFirst und das 2. über IncludeTrailingPathDelimiter.
Entscheide dich für eines. Empfehlung: entferne es aus dem FindFirst.
Ciao
Frank

[Metallicwar]

aahhh, danke !
hab mal einen anderen Musikordner genommen und es funktioniert .. jetzte müsste ich noch herausfinden wieso es bei manchen Ordnern funktioniert, bei manchen jedoch nicht ...

[FrankJ28]

Hallo,
bemühe doch einmal den Debugger und steppe durch die Routine. Ich tippe einmal auf deine Folder-Variable.
Ciao
Frank

[rollstuhlfahrer]

Zitat:

Zitat von Metallicwar (Beitrag 1101414)

aahhh, danke !
hab mal einen anderen Musikordner genommen und es funktioniert .. jetzte müsste ich noch herausfinden wieso es bei manchen Ordnern funktioniert, bei manchen jedoch nicht ...

Ich würde mal eiskalt darauf tippen, dass in diesem Musik-Ordner einfach keine MP3s waren. :twisted::twisted:

Nein, echt. Ich benutze exakt diesen Code, wenn ich Verzeichnisse auflisten will.

Bernhard