我在image控件中画线和输出文字      画线用Image1.Canvas.MoveTo(Origin.X, Origin.Y);
                        Image1.Canvas.LineTo(MovePt.X, MovePt.Y);
输出文字用的Image1.Canvas.TextOut完成以上操作之后我想把画的线和文字都保存下来,我想这是一个不能再简单的问题了吧,呵呵,却给我挺大的困扰,各位大哥帮帮忙了,在线等解决马上结贴!

解决方案 »

  1.   

    简单的做法是记录操作步骤另外一个办法是画线用Shape,文字用Label这样读取,移动,调整大小都好操作
      

  2.   

    你要保存什么,保存你画的图形?
    SAVETOFILE()
      

  3.   

    在调用TextOut之前加上一句:
    Image1.Canvas.Brush.style:=bsClear;
    然后再:
    Image1.Canvas.TextOut(x,y,'....');
      

  4.   

    CareYouOnly(只在乎你)你好,你说的并不能解决我的问题啊,希望各位能多给些建议,能解决我加100分
      

  5.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
         Image1.Canvas.MoveTo(10, 10);
         Image1.Canvas.LineTo(20, 20);
         Image1.Canvas.TextOut(20, 20, '...');
         Image1.Picture.SaveToFile(FileName);
    end;