Separate names with a comma.
Так я ж переписал, или моя версия не работает?
Почему именно на дельфях?
Если кому еще интересно, я попытался актуализировать код. Изменения старался вносить по минимуму, проверял на двух своих мэйловских ящиках....