[NumLock]

там вообще нет потоков

1. переписать функцию как:

Код:

function GetMemo(var S: String): Boolean;

возвращает true если строка вернулась, т.е. была в Мемо. при этом из Мемо удаляет
2. поток проверяет результат функции и если вернет false прекращается