Dilma, а ты чего StrList переправил, я специально сделал перечитывание индексов и строк, чтобы не сохранять исходные значения, а получить действующие, сохраняя совместимость с ListBox