den4b Forum

Spike

Member

Registered: 2008-01-05

Posts: 2

Meta tags from files to folders

It would be nice when renaming folders to be able to use meta tag info from the first file in the folder. For example I have mp3 folders in the format

Artist - Album

and wish to rename them

Artist - Album (year)

den4b

Administrator

From: den4b.com

Registered: 2006-04-06

Posts: 3,370

Re: Meta tags from files to folders

Good news for you - it is possible!

For the starters, you can have a look at the similar problem and solution here:
Same name for all files as an existing file in the folder

And then, here is the modified script from the topic above, to suite your needs (look below). This code will find a first file in the folder which matches MASK, and will append value of a TAG of that file to the folder's name.

const
  MASK = '*.mp3';
  TAG = 'ID3_Year';

var
  MasterFile: WideString;

function FindMasterFile(const Folder: WideString): WideString;
var
  Files: TStringsArray;
begin 
  Result := '';
  SetLength(Files, 0);
  WideScanDirForFiles(Folder, Files,
    False, False, False, MASK);
  if Length(Files) > 0 then
    Result := Files[0];
end;

begin
  if WideDirectoryExists(FilePath) then
  begin
    MasterFile := FindMasterFile(FilePath);
    if MasterFile <> '' then
      FileName := FileName + CalculateMetaTag(MasterFile, TAG);
  end;
end.

---

A story of software development, and how it all evolves into Live vs Pro
Request a Wiki account | Reporting spam and abuse | Why did I get banned?

Spike

Member

Registered: 2008-01-05

Posts: 2

Re: Meta tags from files to folders

Ah thank you very much. Super program btw, puts others to shame