[Вова]

попробуй просто весь екран зарисовать белым прямоугольником
вот пример кода

PROGRAM ClearScreen;

BEGIN
	DrawText('Hello World', 0, 0);//Рисуем начальный текст
	Repaint;
	Delay(1000);
	
	DoSomething;//Что-то делаем
	
	SetColor(255, 255, 255);//Устанавливаем белый цвет
	FillRect(0, 0, GetWidth, GetHeight);//Рисуем белый заполненый прямоугольник размером с екран
	Repaint;
	
	SetColor(0, 0, 0);//Возвращаем назад черный цвет что-бы  текст был видим (а то щас то цвет белый)
	DrawText('Goodbye World', 0, 0);//Рисуем окончательный текст
	Repaint;
	Delay(1000);
END.

если что не понятно пиши
хотя мне кажеться вопросов быть не должно