제가 한 방법은 image Width, Height를 구하여..
Rectangle로 하여 white로 하는 겁니다.

Windows::TRect rect;

    rect.Left = 0;
    rect.Top = 0;
    rect.Right = Image1->Width;
    rect.Bottom = Image1->Height;

    Image1->Picture->Bitmap->Width = rect.Width();
    Image1->Picture->Bitmap->Height = rect.Height();
    Image1->Picture->Bitmap->Canvas->Brush->Color = clWhite;
    Image1->Picture->Bitmap->Canvas->Brush->Style = bsSolid;
    Image1->Picture->Bitmap->Canvas->FillRect(rect);

함수로 만들어 사용하면 괜찮을 듯 싶습니다.
도움이 되었음 하네요.


정기원 님이 쓰신 글 :
: 조언 감사합니다.
: 가르켜주신데로 하였는데도 선의 색깔이 원하는데로 그려지지 않네요?
: 다른 방법은 없나요?
:
: 닐리리 님이 쓰신 글 :
: : Pen의 Mode를 pmNotXor로 바꾸신담에 그래도 똑같이 그려주시면 없어집니다..
: :
: :
: :
: :
: : 정기원 님이 쓰신 글 :
: : : 이곳에 들러시는 모든분들 안녕하십니까?
: : : 오늘도 그림 그리다 막혀서 들렀습니다.
: : : 저번에 불사새님의 도움으로 무사히 TImage에서 도형과 선을 그렸습니다.
: : : 그런데 또 막혔습니다. 막힌곳은 이벤트에 따라 기존에 그려진 선의 색깔을
: : : 변경하고 싶어서 선의 색상을 달리 했는데 변경된 선의 색상으로 나타나지 않고
: : : 기존 색과 겹쳐진 색으로 나옵니다. 이를 해결할 방법은 없나요?
: : : 없다면 기존 선을 지우고 다시 그리면 될것 같은데 지울 수는 없나요?
: : : 저의 코드 일부가 다음과 같이 했습니다.
: : : ----------------------------------------
: : :     Image1->Canvas->Pen->Color = clBlack;
: : :     Image1->Canvas->Pen->Width = 1;
: : :     Image1->Canvas->MoveTo(X, Y);
: : :     Image1->Canvas->LineTo(X+100, Y+100);
: : :
: : :     if(event) {
: : :            Image1->Canvas->Pen->Color = clRed;
: : :            Image1->Canvas->Pen->Width = 2;
: : :     }
: : : -----------------------------------------------
: : : 위와 같이 했는데 선의 색깔이 제대로 안 나옵니다.
: : : 어떻게 하면 되는지요.
: : : 많은 조언 부탁 드립니다.
: : : 그럼 모든분들 오늘도 즐거운 하루가 되시길....