diff --git a/components/tvplanit/examples/fulldemo/demomain.lfm b/components/tvplanit/examples/fulldemo/demomain.lfm
index 4c53af80e..15f4e328e 100644
--- a/components/tvplanit/examples/fulldemo/demomain.lfm
+++ b/components/tvplanit/examples/fulldemo/demomain.lfm
@@ -232,7 +232,7 @@ object MainForm: TMainForm
               Left = 320
               Height = 23
               Top = 8
-              Width = 68
+              Width = 120
               ItemHeight = 15
               ItemIndex = 5
               Items.Strings = (
diff --git a/components/tvplanit/examples/fulldemo/demomain.pas b/components/tvplanit/examples/fulldemo/demomain.pas
index f1fa94628..4965ad9d8 100644
--- a/components/tvplanit/examples/fulldemo/demomain.pas
+++ b/components/tvplanit/examples/fulldemo/demomain.pas
@@ -5,6 +5,9 @@ unit demoMain;
 interface
 
 uses
+ {$IFDEF UNIX}
+  clocale,
+ {$ENDIF}
   Classes, SysUtils, FileUtil, PrintersDlgs, Forms, Controls, Graphics, Dialogs,
   ExtCtrls, StdCtrls, ComCtrls, LCLTranslator, Menus, VpBaseDS, VpDayView,
   VpWeekView, VpTaskList, VpAbout, VpContactGrid, VpMonthView, VpResEditDlg,
diff --git a/components/tvplanit/source/vpwavdlg.lfm b/components/tvplanit/source/vpwavdlg.lfm
index dca5de7c6..742ad2d63 100644
--- a/components/tvplanit/source/vpwavdlg.lfm
+++ b/components/tvplanit/source/vpwavdlg.lfm
@@ -33,7 +33,6 @@ object FrmSoundDialog: TFrmSoundDialog
         Width = 333
         Align = alRight
         BevelOuter = bvNone
-        Caption = 'Nothing to select from...'
         ClientHeight = 446
         ClientWidth = 333
         TabOrder = 2