Manual, AMG composer, Search and Replace Tag

[Mus]

Hi y'all,

Have I missed something obvious or is there a Help Manual with what looks to be a great program?

Also is it possible to batch scan and remove text within the Album tag (I embedded the year in brackets and want to remove e.g. "Help! (1965)")

And, is it possible to try and batch update the Composer tag from AMG?

Many thanks

M

[jtclipper]

There is a help file you can use F1 to display it.

Yes you can remove the text you want in the album field using a modified script of the build in regex example

Code: Select all

program regex;

var
  sTmp: string;
  bUpdated: boolean;

begin

  if not tg_Init then exit; // no rows get out

  repeat

    bUpdated := false;

    sTmp := tg_GetField( 'Album' );

    if sys_RegexFind( sTmp, '(\(\d{1,4}\))' ) then begin
       tg_setField( 'Album', sys_RegexReplace( sTmp, '(\(\d{1,4}\))', [1,''] ) );
       bUpdated := true;
    end;

    if bUpdated then begin
       tg_setSkip( false );
       tg_SetResult( 'OK' );
    end else begin
       tg_setSkip( true );
    end;

  until not tg_Skip;

end.

This will remove the year from the album field and mark as skip any files that are not affected.

You can update the composer field per album but not for your entire collection.

[Mus]

That's great! Many thanks for the reply and excellent support.

Would it then be possible to populate the Year tag with the contents of the year between the Album brackets before removing the latter?

Regards
M

[jtclipper]

You can use this to have the year field updated also.

Code: Select all

program regex;

var
  sTmp, sTmp1: string;
  bUpdated: boolean;

begin

  if not tg_Init then exit; // no rows get out

  repeat

    bUpdated := false;

    sTmp := tg_GetField( 'Album' );

    if sys_RegexFind( sTmp, '(\(\d{1,4}\))' ) then begin
       tg_setField( 'Album', sys_RegexReplace( sTmp, '(\(\d{1,4}\))', [1,''] ) );
       sTmp1 := sys_RegexFindStr( sTmp, '(\(\d{1,4}\))', 1 );
       sTmp1 := AnsiReplaceText( sTmp1, '(',  '' );
       sTmp1 := AnsiReplaceText( sTmp1, ')',  '' );
       tg_setField( 'Year' , sTmp1 );
       bUpdated := true;
    end;

    if bUpdated then begin
       tg_setSkip( false );
       tg_SetResult( 'OK' );
    end else begin
       tg_setSkip( true );
    end;

  until not tg_Skip;

end.

Remember to click the update button to have the values saved to the files after you isnpect the results.

[Mus]

Thank you very much