在一个TImage控件里画四条曲线

求助：在一个TImage控件里画四条曲线
在同一个image控件里画四条不同颜色的曲线，大家可有好的方法？请赐教，谢谢。

------解决方案--------------------

C# code


procedure TForm1.Button1Click(Sender: TObject);
var
  graphic:TControlCanvas;
begin
  graphic := TControlCanvas.Create;
  graphic.Control := Image1;
  graphic.Pen.Color := clRed;
  graphic.MoveTo(0,0);
  graphic.LineTo(100,0);
  graphic.Pen.Color := clBlue;
  graphic.MoveTo(10,10);
  graphic.LineTo(100,0);
  graphic.Pen.Color := clYellow;
  graphic.MoveTo(20,20);
  graphic.LineTo(100,0);
  graphic.Pen.Color := clGreen;
  graphic.MoveTo(30,30);
  graphic.LineTo(100,0);
end;

------解决方案--------------------
改变Pen颜色，用moveto，lineto就画吧

在一个TImage控件里画四条曲线

相关推荐