Page 1 of 1

Actor List by Alpha, then all actors from metadata

Posted: Sun Jun 02, 2013 11:15 pm
by NYNMCA
Eugene - You posted an answer to the "Actor List too long" of:

Post subject: Re: Actor List too longPostPosted: Tue Jan 22, 2013 9:26 am

UpperCase(Copy(mpActor, 1, 1)) + '\' + ExtractWord(1, mpActor, ',')


and this worked great to create an alpha listing (a, b, c, etc.) with actors listed by first name and then their movies under each actor listed. But, it only pulls the first actor listed in the list of actors for a respective movie, all other actors in that list are ignored. Is it possible to have a script pull each actor listed for a movie pulled and placed within the a-b-c structure created above? I tried to experiment with the 'ExtractSubstr' function but can't get it to work (I'm not familiar with Pascal, so I'm just guessing at this).

Thanks!

Re: Actor List by Alpha, then all actors from metadata

Posted: Mon Jun 03, 2013 6:51 pm
by Eugene
The folder "Collections" - Actor (or similar) - Grouping - Expression - right click - Edit - "Expression grouping" - Edit

Code: Select all

var
  ActorList: TStringList;  
  i: Integer;
begin
  ActorList := TStringList.Create;  
  try  
    ActorList.Text := ReplaceStr(mpActor, ',', #13#10);
    for i := 0 to ActorList.Count - 1 do
      ActorList[i] := Copy(Trim(ActorList[i]), 1, 1) + '\' + Trim(ActorList[i]);     
    FolderPath := ActorList.Text        
  finally    
    ActorList.Free
  end  
end.