R rxh Unregistered / Unconfirmed GUEST, unregistred user! 1999-05-27 #1 我在paintbox的canvas下画一条曲线,我想用 异或的方法消隐此曲线,为何无法实现? 多谢!
M menxin Unregistered / Unconfirmed GUEST, unregistred user! 1999-05-27 #2 用pmnot好象无问题啊。 with PaintBox1.Canvas do begin Pen.Mode:=pmnot; MoveTo(10,10); LineTo(100,100); end;
B Blade Unregistered / Unconfirmed GUEST, unregistred user! 1999-05-27 #3 设置Pen.Mode = pmNotXor。 with PaintBox1 do begin Pen.Mode = pmNotXor; MoveTo(OriginPt.X, OriginPt.Y); LineTo(MovePt.X, MovePt.Y); MovePt := Point(X, Y); MoveTo(OriginPt.X, OriginPt.Y); LineTo(MovePt.X, MovePt.Y); end;
设置Pen.Mode = pmNotXor。 with PaintBox1 do begin Pen.Mode = pmNotXor; MoveTo(OriginPt.X, OriginPt.Y); LineTo(MovePt.X, MovePt.Y); MovePt := Point(X, Y); MoveTo(OriginPt.X, OriginPt.Y); LineTo(MovePt.X, MovePt.Y); end;