|
이곳에 들러시는 모든분들 안녕하십니까?
항상 많은 도움을 받아 갑니다. 늘 감사 드리구요.
2일전에 Image1->Canvas->Pen->?에서 선의 색깔을 변경하는 방법에 대해
질의를 드렸고 몇분이 답을 주셨습니다만 여전히 선의 색깔이 변하지 않아
다시 문의 드립니다. 저는 Image Component를 가지고 작업하는것이 처음이라
많이 막힙니다. 부디 도움 주시기를 부탁드립니다.
저번에 불사새님의 도움으로 무사히 TImage에서 도형과 선을 그렸습니다.
그런데 또 막혔습니다. 막힌곳은 이벤트에 따라 기존에 그려진 선의 색깔을
변경하고 싶어서 선의 색상을 달리 했는데 변경된 선의 색상으로 나타나지 않고
기존 색과 겹쳐진 색으로 나옵니다. 이를 해결할 방법은 없나요?
없다면 기존 선을 지우고 다시 그리면 될것 같은데 지울 수는 없나요?
일단 Form에 image component를 두고 이의 Align 특성을 Client로 했습니다.
그리고 bmp로 된 그림을 로드하였고 로드된 이미지 그림 위에 다시 몇개의
Image component를 올려 놓고 이들 이미지를 서로 연결하는 선을 그렸습니다.
각 연결된 선의 색깔을 어떤 이벤트에 따라 변경하고자 합니다.
저의 코드 일부가 다음과 같이 했습니다.
----------------------------------------
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;
Image1->Canvas->MoveTo(X, Y);
Image1->Canvas->LineTo(X+100, Y+100);
}
-----------------------------------------------
위와 같이 했는데 선의 색깔이 붉은색으로 안 나옵니다.
어떻게 하면 되는지요.
많은 조언 부탁 드립니다.
그럼 모든분들 오늘도 즐거운 하루가 되시길....
|