diff --git a/components/tachart/demo/listbox/Unit1.lfm b/components/tachart/demo/listbox/Unit1.lfm
index 350e87052b..09da369aa0 100644
--- a/components/tachart/demo/listbox/Unit1.lfm
+++ b/components/tachart/demo/listbox/Unit1.lfm
@@ -215,8 +215,10 @@ object Form1: TForm1
       Height = 21
       Top = 340
       Width = 50
+      MinValue = 1
       OnChange = EdColumnsChange
       TabOrder = 9
+      Value = 1
     end
     object Label2: TLabel
       Left = 152
diff --git a/components/tachart/demo/listbox/Unit1.pas b/components/tachart/demo/listbox/Unit1.pas
index 63069e5286..ea32fbfe78 100644
--- a/components/tachart/demo/listbox/Unit1.pas
+++ b/components/tachart/demo/listbox/Unit1.pas
@@ -210,7 +210,7 @@ begin
   ser := TLineSeries.Create(Chart);
   ser.Source := cs;
   ser.SeriesColor := rgbToColor(Random(255), Random(256), Random(256));
-  ser.Title := Format('Series %d', [Chart.SeriesCount+1]);
+  ser.Title := Format('Series %d', [Chart.SeriesCount + 1]);
   ser.ShowPoints := Odd(Chart.SeriesCount);
   ser.Pointer.Brush.Color := ser.SeriesColor;
   ser.Pointer.Style :=