Как высебе представляете очистку рисунка? Я представляю как рисование заполненного фоновым цветом прямоугольника размером во всю картинку. Free(), FreeImage() освобождают память, занятую под картинку, аналогично delete, но позволяют повторно использовать класс TPicture.
Код:
Canvas->Brush->Color = clWhite;
TRect r(0, 0, Image1->Width, Image1->Height);
Canvas->FillRect(r);
