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 - TColorLineTool draws an extra horizontal line when associated to the bottom axis.
Summary: TColorLineTool draws an extra horizontal line when associated to the bottom a...
Status: RESOLVED FIXED
Alias: None
Product: VCL TeeChart
Classification: Unclassified
Component: Tools (show other bugs)
Version: 131119
Hardware: PC Windows
: High major
Target Milestone: ---
Assignee: Steema Issue Manager
URL: http://www.teechart.net/support/viewt...
Keywords:
: 509 (view as bug list)
Depends on:
Blocks:
 
Reported: 2013-11-22 05:28 EST by narcís calvet
Modified: 2013-12-10 04:50 EST (History)
2 users (show)

See Also:
Chart Series: ---
Delphi / C++ Builder RAD IDE Version:


Attachments

Note You need to log in before you can comment on or make changes to this bug.
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. ***