TDrawLine.CreateXY
TDrawLine
constructor CreateXY(Collection: TCollection; Const X0, Y0, X1, Y1: Double);
Unit
TeeTools
Description
Use this constructor to add new lines to the TDrawLineTool component:
procedure TForm1.FormCreate(Sender: TObject);
var Middle : Double;
begin
Series1.FillSampleValues(100);
with Series1.YValues do
Middle := (MaxValue + MinValue) / 2;
TDrawLine.CreateXY(ChartTool1.Lines,0,Middle-100,100,Middle+100);
end;