Самый быстрый способ очистки TCanvas с помощью функции PatBlt. Для очистки необходимо указать размеры удаляемой области, в нашем случае размеры компонента PaintBox:
PatBlt(PaintBox1->Canvas->Handle, 0, 0, PaintBox1->Width, PaintBox1->Height, WHITENESS);
Подготовил материал
Табаков Юрий
Программист
Автор и редактор проекта CuBook.PRO. Главная задача, которую я ставлю перед собой – донести до начинающих программистов удобочитаемый материал. Буду рад выслушать замечания и предложения. Не забываем ставить оценки и делать репосты =)