장성호 님이 쓰신 글 :
:
: void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
: int X, int Y)
: {
: if (Shift.Contains(ssLeft))
: {
: // 여기서 Canvas는 Form1->Canvas가 됩니다.
: Canvas->LineTo(X, Y);
:
: //그냥 Image1->Canvas->LineTo ... 하시면 됩니다.
: Image1->Canvas->LineTo(X, Y);
: }
: }
:
:
: 그럼..
:
: 햇님 님이 쓰신 글 :
: : 안녕하세요
: :
: : 이미지위에 마우스 좌측을 눌러 움직이면 그림을 그리도록 하였습니다
: :
: : 근데 이미지 위에 그려지는 것이 아니라 엉뚱한 위치에 그려지네요
: :
: : Form 0,0좌표를 기준으로 그리고 잇는 거 같은데 어떻게 하면 해결이 될까요 ??
: :
: : 이상현상은 첨부파일로 올렸습니다.
: :
: : 초보자 입니다 쉬운 설명 부탁드릴께요 ^^
: :
: : void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
: : int X, int Y)
: : {
: : if (Shift.Contains(ssLeft))
: : {
: : Canvas->LineTo(X, Y);
: : }
: :
: :
: : Image1->Canvas->Pen->Color=clWhite;
: : Image1->Canvas->Pen->Width=1;
: : Image1->Canvas->MoveTo(10,Y);
: : Image1->Canvas->LineTo(10,Y);
|