[cherepets]

там есть функция win2utf (вроде так звалась).
кормишь ей "квадраты", а получаешь текст.
вот так:

curLine:= win2utf(ReadLine(txtFile));