Call ArrayCopy A B 'AB' ARRAY_UNION,
     ArraySort AB 'Strings'

Call StrReplace Strings.i Text '' 'Strings.i' STR_ANY_CASE
Where i = 1 to Strings._
