[wh1ga]

Спасибо за ответ, всё получилось. И ещё один вопрос не по теме.
Как можно удалить из ListBox все элементы, которые не встречаются в Memo?
Например удалить элемент "Вася" если в Memo не встречается строка "Вася".