How to find all MP3 files in a directory?

Question

I recently started with delphi, and now I want to get all mp3 files from the directory. I want something like glob () php function.

Answer 1

Old way to do this: approx:

var
  status : dword;
  sr : TSearchRec;
begin
  status := FindFirst('*.mp3',faAnyFile,sr);
  while status = 0 do
  begin

     // sr.Name is the filename; add it to a list
     // or something. Note there is no path so you
     // may need to add that back on somewhere

     status := FindNext(sr);
  end;
  SysUtils.FindClose(sr);

  // ...
end;

Answer 2

Try IOUtils.TDirectory.

Answer 3

, .

\JclFileUtils :

function BuildFileList(const Path: string; 
  const Attr: Integer; const List: TStrings; 
  IncludeDirectoryName: Boolean = False): Boolean;

JCL IDE. JCL ( ) http://sourceforge.net/projects/jcl/

Answer 4

TFileListBox Delphi FileCtrl .

, Delphi 1 About Delphi , .

, Visible = False .

(, ), *.mp3.

-

Answer 5

- TFindFile Delphi Area: http://www.delphiarea.com/products/delphi-components/findfile/

/,