fbpsok 님이 쓰신 글 :
: fbpsok 님이 쓰신글
: 이렇게 해보세요
: Image1->Canvas->Brush->Color = clWhite;
: Image1->Canvas->FillRect(Image1->ClientRect);
:
: --------------------------------------------------------------------
: 미혜 님이 쓰신 글 :
: : 제가 한 방법은 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;
: : : : :     }
: : : : : -----------------------------------------------
: : : : : 위와 같이 했는데 선의 색깔이 제대로 안 나옵니다.
: : : : : 어떻게 하면 되는지요.
: : : : : 많은 조언 부탁 드립니다.
: : : : : 그럼 모든분들 오늘도 즐거운 하루가 되시길....