Эдик, на самом деле это ты ко мне пристал.
Ну нет моей вины, что в схеме есть недостатки
Ну имею я право на них указать, хотя бы для того, чтобы у новичка в последствии не было аргументов типа "Ну вы же сами мне показали как надо делать"


я могу дать схему, но не давал, считая ее несколько глупой - перемещение Progress-а по каждой замене наверное значительно дольше чем сама замена.
Здесь надо серьезно уточнять задачу - на что тратится основное время.
Но если всенепременно хочется посмотреть на глупую - пожалуйста: code_1219.txt

Впрочем, нижняя точка CurentPos доступна для чтения из параллельного потока (но не вместе с CurentStr, пожалуй)