请高手指教,最好能给个例子吧,^_^,不胜感激

解决方案 »

  1.   

    C#
    可以给你个例子但是delphi的没有
      

  2.   

    gdi 函数 SetPixel 。。
      

  3.   

    在image的10,10上画一个红点
      Image1.Canvas.Pixels[10,10]:=clRed;
      

  4.   

    thx!还有一个问题,请问怎样消除刚才在image所画的线呢?
      

  5.   

    ..没有擦除 只能重绘 或者记录 信息 undo..
      

  6.   

    Image1.Canvas.Pen.Mode := pmNotXor;
    Image1.Canvas.Pixels[10,10]:=clRed;
    调用1次绘制,第2次清除
      

  7.   

    擦除的话,可用底色重画一下:
      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);