Steema Issues Database

Note: This database is for bugs and wishes only. For technical support help, if you are a customer please visit our online forums;
otherwise you can use StackOverflow.
Before using this bug-tracker we recommend a look at this document, Steema Bug Fixing Policy.



Bug 465

Summary: TColorLineTool draws an extra horizontal line when associated to the bottom axis.
Product: VCL TeeChart Reporter: narcís calvet <narcis>
Component: ToolsAssignee: Steema Issue Manager <issuemanager>
Status: RESOLVED FIXED    
Severity: major CC: david, ivanff2
Priority: High    
Version: 131119   
Target Milestone: ---   
Hardware: PC   
OS: Windows   
URL: http://www.teechart.net/support/viewtopic.php?f=3&t=14525&p=63983#p63982
Chart Series: --- Delphi / C++ Builder RAD IDE Version:

Description narcís calvet 2013-11-22 05:28:22 EST
There is an extra horizontal "Ghost" line the chart if I set TColorLineTool's axis to bottom, and there will be no line if I set axis to right. This only occurs in 2D chart. An image demonstrating the issue is available at http://www.teechart.net/support/viewtopic.php?f=3&t=14525&p=63983#p63982 

Code to reproduce:

uses TeeTools, Series;

procedure TForm1.FormCreate(Sender: TObject);
var ColorLine1  : TColorLineTool;
begin
  Chart1.View3D:=False;
  Chart1.AddSeries(TFastLineSeries.Create(Self)).FillSampleValues;

  ColorLine1:=TColorLineTool.Create(Self);
  ColorLine1.Axis:=Chart1.Axes.Bottom;
  ColorLine1.Pen.Color:=clLime;
  ColorLine1.Pen.Width:=3;
  ColorLine1.Value:=Chart1[0].Count / 2;
end;
Comment 1 david berneda 2013-11-22 07:53:44 EST
Fixed.
Comment 2 narcís calvet 2013-11-25 05:21:35 EST
Still not working when associating the ColorLine to the left axis: http://www.teechart.net/support/viewtopic.php?f=3&t=14525&p=64013#p64013

Code to reproduce:

uses TeeTools, Series;

procedure TForm1.FormCreate(Sender: TObject);
var ColorLine1  : TColorLineTool;
begin
  Chart1.View3D:=False;
  Chart1.AddSeries(TFastLineSeries.Create(Self)).FillSampleValues;

  ColorLine1:=TColorLineTool.Create(Self);
  ColorLine1.Axis:=Chart1.Axes.Left;
  ColorLine1.Pen.Color:=clLime;
  ColorLine1.Pen.Width:=3;
  Chart1.Draw;
  ColorLine1.Value:=ColorLine1.Axis.Minimum + (ColorLine1.Axis.Maximum - ColorLine1.Axis.Minimum) / 2;
end;
Comment 3 david berneda 2013-11-25 08:37:02 EST
Fixed. Hope now it works fine in all cases.
Comment 4 sandra pazos 2013-12-10 04:50:31 EST
*** Bug 509 has been marked as a duplicate of this bug. ***