1. Общим циклом перебираем StringList1
2.
Код:
StringList2.IndexOf(StringList1[index]);
- если не найдено - добавляем (SL3.Add...)
3. Повторяем всё точно так же для SL2...
Это в случае, если по одному имени на строку.
Если они через запятую, или ещё как - гугол, как ни странно, работает, ищи "Разделение текста StringList Delphi"