diff --git a/components/tachart/demo/area/areaseriesdemo.lpi b/components/tachart/demo/area/areaseriesdemo.lpi index 1b9a66bf33..cfe291fae2 100644 --- a/components/tachart/demo/area/areaseriesdemo.lpi +++ b/components/tachart/demo/area/areaseriesdemo.lpi @@ -52,6 +52,7 @@ + @@ -59,6 +60,7 @@ + diff --git a/components/tachart/demo/area/frmerrorrange.lfm b/components/tachart/demo/area/frmerrorrange.lfm index 21c89649a8..c55dbd0647 100644 --- a/components/tachart/demo/area/frmerrorrange.lfm +++ b/components/tachart/demo/area/frmerrorrange.lfm @@ -8,21 +8,10 @@ object ErrorRangeFrame: TErrorRangeFrame TabOrder = 0 DesignLeft = 587 DesignTop = 268 - object Label1: TLabel - Left = 8 - Height = 15 - Top = 8 - Width = 401 - Align = alTop - Alignment = taCenter - BorderSpacing.Around = 8 - Caption = 'This functionality requires at least Lazarus version 1.9' - Visible = False - end object Chart: TChart Left = 0 - Height = 233 - Top = 31 + Height = 264 + Top = 0 Width = 417 AxisList = < item diff --git a/components/tachart/demo/area/frmerrorrange.pas b/components/tachart/demo/area/frmerrorrange.pas index 6354f7a327..fd4e810c15 100644 --- a/components/tachart/demo/area/frmerrorrange.pas +++ b/components/tachart/demo/area/frmerrorrange.pas @@ -16,7 +16,6 @@ type ChartAreaSeries2: TAreaSeries; ChartLineSeries1: TLineSeries; ChartLineSeries2: TLineSeries; - Label1: TLabel; ChartSourceLine1: TUserDefinedChartSource; ChartSourceArea1: TUserDefinedChartSource; ChartSourceLine2: TUserDefinedChartSource; diff --git a/components/tachart/demo/area/main.pas b/components/tachart/demo/area/main.pas index 1a3f870696..de2ad072c1 100644 --- a/components/tachart/demo/area/main.pas +++ b/components/tachart/demo/area/main.pas @@ -5,10 +5,7 @@ unit main; interface uses - LCLVersion, - Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, Spin, - ComCtrls, ExtCtrls, - TAGraph, TASeries, TASources, TAStyles, TACustomSeries, TACustomSource, + Classes, SysUtils, Forms, Controls, ComCtrls, frmGeneral, frmErrorRange; type @@ -35,9 +32,6 @@ implementation {$R *.lfm} -uses - Math, TAChartUtils, TATextElements; - procedure TForm1.FormCreate(Sender: TObject); begin FGeneralFrame := TGeneralFrame.Create(Self);