![]() | Steema Issues DatabaseNote: 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. |
| Summary: | TFastLineSeries don't draw some points in different X position when DrawAllPointsStyle is daMinMax | ||
|---|---|---|---|
| Product: | VCL TeeChart | Reporter: | yeray alonso <yeray> |
| Component: | Series | Assignee: | Steema Issue Manager <issuemanager> |
| Status: | RESOLVED FIXED | ||
| Severity: | enhancement | CC: | narcis |
| Priority: | Normal | ||
| Version: | 140923 | ||
| Target Milestone: | --- | ||
| Hardware: | PC | ||
| OS: | Windows | ||
| URL: | http://www.teechart.net/support/viewtopic.php?f=3&t=15302 | ||
| Chart Series: | FastLine | Delphi / C++ Builder RAD IDE Version: | |
This works fine with TeeChart.NET:
public Form1()
{
InitializeComponent();
InitializeChart();
}
private void InitializeChart()
{
tChart1.Legend.Visible = false;
tChart1.Aspect.View3D = false;
Steema.TeeChart.Styles.FastLine fastline1 = new Steema.TeeChart.Styles.FastLine(tChart1.Chart);
for (int i = 0; i < 50000; i++)
{
switch (i)
{
case 25000:
fastline1.Add(1);
break;
case 25002:
fastline1.Add(-1);
break;
default:
fastline1.Add(0);
break;
}
}
fastline1.DrawAllPoints = false;
fastline1.DrawAllPointsStyle = Steema.TeeChart.Styles.DrawAllPointsStyle.MinMax;
}
private void button1_Click(object sender, EventArgs e)
{
tChart1.Axes.Bottom.SetMinMax(24950, 25050);
}
private void button2_Click(object sender, EventArgs e)
{
tChart1.Axes.Bottom.Automatic = true;
}
|
In the following example, the chart is shown correctly until you zoom it clicking the button. At that moment, the point (25000, 1) isn't drawn any more. uses Series; procedure TForm1.FormCreate(Sender: TObject); var i: Integer; begin Chart1.Legend.Visible:=false; Chart1.View3D:=false; with Chart1.AddSeries(TFastLineSeries) as TFastLineSeries do begin for i:=0 to 50000 do case i of 25000: Add(1); 25002: Add(-1); else Add(0); end; DrawAllPoints:=false; DrawAllPointsStyle:=daMinMax; end; end; procedure TForm1.Button1Click(Sender: TObject); begin Chart1.Axes.Bottom.SetMinMax(24950, 25050); end; procedure TForm1.Button2Click(Sender: TObject); begin Chart1.Axes.Bottom.Automatic:=true; end;