diff --git a/components/fpspreadsheet/examples/spready/sformatsettingsform.lfm b/components/fpspreadsheet/examples/spready/sformatsettingsform.lfm
index b24d34692..849b1866f 100644
--- a/components/fpspreadsheet/examples/spready/sformatsettingsform.lfm
+++ b/components/fpspreadsheet/examples/spready/sformatsettingsform.lfm
@@ -10,16 +10,16 @@ object FormatSettingsForm: TFormatSettingsForm
   OnCloseQuery = FormCloseQuery
   OnCreate = FormCreate
   Position = poMainFormCenter
-  LCLVersion = '1.2.6.0'
+  LCLVersion = '1.3'
   object PageControl: TPageControl
     Left = 8
     Height = 434
     Top = 8
     Width = 454
-    ActivePage = PgCurrency
+    ActivePage = PgNumber
     Align = alClient
     BorderSpacing.Around = 8
-    TabIndex = 1
+    TabIndex = 0
     TabOrder = 0
     OnChange = PageControlChange
     object PgNumber: TTabSheet
diff --git a/components/fpspreadsheet/examples/spready/sformatsettingsform.pas b/components/fpspreadsheet/examples/spready/sformatsettingsform.pas
index fb158f025..995e59fb3 100644
--- a/components/fpspreadsheet/examples/spready/sformatsettingsform.pas
+++ b/components/fpspreadsheet/examples/spready/sformatsettingsform.pas
@@ -193,7 +193,6 @@ begin
     Left := CbLongDateFormat.Left;
     Width := w;
     Top := CbLongDateFormat.Top;
-    Anchors := Anchors + [akRight];
     TabOrder := 0;
     SeparatorKind := skDecimal;
   end;
@@ -206,7 +205,6 @@ begin
     Left := FCbDecimalSeparator.Left;
     Width := w;
     Top := FCBDecimalSeparator.Top + 32;
-    Anchors := Anchors + [akRight];
     TabOrder := FCbDecimalSeparator.TabOrder + 1;
     SeparatorKind := skThousand;
   end;