Cadastrar o local das musicas no banco de dados.

VictorMatheus · 2 de maio de 2010

Gostaria de uma rotina que buscasse e cadastrasse automaticamente meus arquvos mp3 num banco de dados com os campos (codigo, nome, artista, local do arquvo). Eu sei que todos os arquivos de musica já tem esses dados, porém eu não sei como ecessá-los. Eu já consegui listar os arquivos .mp3 de uma determinada pasta, agora só falta fazer o programa cadastra-los no banco e depois buscar de dentro do arquivo as informaçoes necessárias (codigo, nome, artista, local do arquvo).

Listando aquivos de uma determinada pasta.

procedure TFFolders.LocalizarMusica(Local: string; Arquivo : string; ListBox: TListBox);
var
  SearchRec: TSearchRec;
begin
  Local:= Trim(Local);
  if Local[length(Local)] <> '' then
    Local:= Local + '';
    SetCurrentDir(Local);
  if FindFirst(arquivo+'*.mp3', faAnyFile, SearchRec) = 0 then // modifica aqui Ex: para mp3 '*.mp3'
    Repeat
    ListBox.Items.Add(SearchRec.Name);
    Until FindNext(SearchRec) <> 0;
    FindClose(SearchRec);
end;