Функция ReadLnWait
function ReadLnWait(AFailCount: Integer = MaxInt): string;
Функция ReadLnWait подобна функции ReadLn с одним исключением, что она не возвращает результат, пока не примет, не пустую строку. Она также вернет количество принятых пустых строк.