[Страдалецъ]

1. Это-же вроде паскаль, а не дельфи.
2. Это-же вроде не консоль
3. ClrSrc - каждый раз вызывать плохо т.к. будет мерцать.
4. Добавьте в модули Crt. Будет существенно быстрее выводить на экран.