Tad, спасибо, я попробовал. Всё работает.
Просто в Паскале полный ноль - смотрю как баран на новые ворота.