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);