Puedes utilizar el método FillRect del canvas que lo que hace es pintar la region que le pases de el color que tu quieras. Por ejemplo si quieres borrar todo el canvas en blanco TImage->Canvas->Brush->Color = clWhite;
TImage->Canvas->FillRect(Canvas->ClipRec );