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 2734

Summary:	Area series with Stairs and null points draws a strange vertical line
Product:	VCL TeeChart	Reporter:	yeray alonso <yeray>
Component:	Series	Assignee:	yeray alonso <yeray>
Status:	RESOLVED FIXED
Severity:	enhancement	CC:	yeray
Priority:	---
Version:	39.231109
Target Milestone:	---
Hardware:	PC
OS:	Windows
Chart Series:	---	Delphi / C++ Builder RAD IDE Version:

Description yeray alonso 2024-07-26 03:20:58 EDT

In the following example, a vertical line at the x=4 is drawn down to the zero value.

uses Chart, Series;

var Chart1: TChart;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart1:=TChart.Create(Self);

  with Chart1 do
  begin
    Parent:=Self;
    Align:=alClient;
    Color:=clWhite;
    Gradient.Visible:=False;
    Walls.Back.Color:=clWhite;
    Walls.Back.Gradient.Visible:=False;
    Legend.Hide;
    View3D:=False;

    Axes.Left.StartPosition:=20;
    Axes.Left.EndPosition:=80;
    Axes.Left.SetMinMax(60, 100);
    Axes.Left.Increment:=10;
    Axes.Left.Axis.Color:=OperaPalette[0];

    Axes.Left.Grid.Hide;
    Axes.Bottom.Grid.Hide;

    with TAreaSeries(AddSeries(TAreaSeries)) do
    begin
      AddY(70);
      AddY(80);
      AddY(90);

      AddNull;

      AddY(70);
      AddY(80);
      AddY(90);

      Pen.Width:=2;
      Stairs:=True;
      AreaLinesPen.Hide;
      Pen.Color:=Color;
    end;
  end;
end;