diff --git a/components/tvplanit/examples/fulldemo/demomain.lfm b/components/tvplanit/examples/fulldemo/demomain.lfm
index 9e98a0a3c..0eed47d32 100644
--- a/components/tvplanit/examples/fulldemo/demomain.lfm
+++ b/components/tvplanit/examples/fulldemo/demomain.lfm
@@ -57,7 +57,7 @@ object MainForm: TMainForm
       Height = 528
       Top = 48
       Width = 834
-      PageIndex = 3
+      PageIndex = 4
       Align = alClient
       TabOrder = 1
       TabStop = True
diff --git a/components/tvplanit/examples/fulldemo/demomain.pas b/components/tvplanit/examples/fulldemo/demomain.pas
index 54ca216e5..0ffbcb555 100644
--- a/components/tvplanit/examples/fulldemo/demomain.pas
+++ b/components/tvplanit/examples/fulldemo/demomain.pas
@@ -615,8 +615,8 @@ begin
     end;
 
     CbLanguages.Items.Assign(po);
-    SetLanguage(lang);
-//    SetLanguage(GetDefaultLang);
+//    SetLanguage(lang);
+    SetLanguage(GetDefaultLang);
 
   finally
     po.Free;
@@ -779,7 +779,7 @@ begin
     if WindowState = wsNormal then begin
       ini.WriteInteger('Form', 'Width', Width);
       ini.WriteInteger('Form', 'Height', Height);
-      ini.WriteInteger('Left', 'Left', Left);
+      ini.WriteInteger('Form', 'Left', Left);
       ini.WriteInteger('Form', 'Top', Top);
     end;
     if FActiveView = 0 then begin