При работе программы постоянно увеличивается объем используемой памяти. Происходит это очень медленно, но все же где-то есть утечка. Не могу понять в чем проблема. Ниже код потока. Там где код1 и код2 нет никаких объявлений переменных, только использование методов класса AnsiString (::Pos(), :elete(), ::SubString()) и несколько циклов while();