Вот если бы эта точка работала по действительной занятости, то создав кольцо опроса, мы могли бы свободно обращаться к данным параллельных потоков, пока те спят, и не было никаких перекрестных обращений.
КМК, то вот это должно работать как-то так
th.Tag := 0;
sleep(_prop_delay);
th.Tag := 1;