全部博文(788)
分类:
2008-11-05 09:52:20
C#
可以给你个例子但是delphi的没有
要用到什么函数吗?有那些关于画图的简单函数啊?
gdi 函数 SetPixel 。。
能给我一个例子吗?thx!
在image的10,10上画一个红点
Image1.Canvas.Pixels[10,10]:=clRed;
thx!还有一个问题,请问怎样消除刚才在image所画的线呢?
..没有擦除 只能重绘 或者记录 信息 undo..
图象对于计算机来说 就是 数组。。 你改变了 要改回来 就是要记住以前的 数组元素信息。。
Image1.Canvas.Pen.Mode := pmNotXor;
Image1.Canvas.Pixels[10,10]:=clRed;
调用1次绘制,第2次清除
擦除的话,可用底色重画一下:
Image1.Canvas.Pen.Color:=clRed;
Image1.Canvas.LineTo(100,100);
...
Image1.Canvas.Pen.Color:=clWhite;
Image1.Canvas.MoveTo(0,0);
Image1.Canvas.LineTo(100,100);
SetPixel