diff --git a/components/tvplanit/examples/mormot/simpledemo/VpClient.lpi b/components/tvplanit/examples/mormot/simpledemo/VpClient.lpi
index 56c39cdac..7c6f35bc4 100644
--- a/components/tvplanit/examples/mormot/simpledemo/VpClient.lpi
+++ b/components/tvplanit/examples/mormot/simpledemo/VpClient.lpi
@@ -27,10 +27,13 @@
         <FormatVersion Value="1"/>
       </local>
     </RunParams>
-    <RequiredPackages Count="1">
+    <RequiredPackages Count="2">
       <Item1>
-        <PackageName Value="LCL"/>
+        <PackageName Value="laz_visualplanit"/>
       </Item1>
+      <Item2>
+        <PackageName Value="LCL"/>
+      </Item2>
     </RequiredPackages>
     <Units Count="2">
       <Unit0>
@@ -54,8 +57,8 @@
       <Filename Value="VpClient"/>
     </Target>
     <SearchPaths>
-      <IncludeFiles Value="$(ProjOutDir);..\..\..\source;..\mORMotSourceHere"/>
-      <OtherUnitFiles Value="..\..\..\source;..;..\mORMotSourceHere;..\mORMotSourceHere\SQLite3"/>
+      <IncludeFiles Value="$(ProjOutDir);..\mORMotSourceHere;..\..\..\source"/>
+      <OtherUnitFiles Value="..;..\mORMotSourceHere;..\mORMotSourceHere\SQLite3"/>
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Parsing>
diff --git a/components/tvplanit/examples/mormot/simpledemo/VpClient.lpr b/components/tvplanit/examples/mormot/simpledemo/VpClient.lpr
index a5e9284d2..833f67bb2 100644
--- a/components/tvplanit/examples/mormot/simpledemo/VpClient.lpr
+++ b/components/tvplanit/examples/mormot/simpledemo/VpClient.lpr
@@ -7,7 +7,7 @@ uses
   cthreads,
   {$ENDIF}{$ENDIF}
   Interfaces, // this includes the LCL widgetset
-  Forms, Unit1;
+  Forms, laz_visualplanit, Unit1;
 
 {$R *.res}
 
diff --git a/components/tvplanit/examples/mormot/simpledemo/unit1.lfm b/components/tvplanit/examples/mormot/simpledemo/unit1.lfm
index d180fc4fc..df9fbb2a3 100644
--- a/components/tvplanit/examples/mormot/simpledemo/unit1.lfm
+++ b/components/tvplanit/examples/mormot/simpledemo/unit1.lfm
@@ -16,42 +16,6 @@ object Form1: TForm1
     Align = alTop
     TabOrder = 0
   end
-  object Panel2: TPanel
-    Left = 784
-    Height = 399
-    Top = 42
-    Width = 150
-    Align = alRight
-    Caption = 'Panel2'
-    ClientHeight = 399
-    ClientWidth = 150
-    TabOrder = 1
-    object Memo1: TMemo
-      Left = 8
-      Height = 353
-      Top = 32
-      Width = 133
-      Anchors = [akTop, akLeft, akRight, akBottom]
-      TabOrder = 0
-    end
-    object Label1: TLabel
-      Left = 8
-      Height = 15
-      Top = 8
-      Width = 51
-      Caption = 'LOGGING'
-      ParentColor = False
-    end
-    object Button1: TButton
-      Left = 80
-      Height = 21
-      Top = 6
-      Width = 57
-      Caption = 'Button1'
-      OnClick = Button1Click
-      TabOrder = 1
-    end
-  end
   object Timer1: TTimer
     Enabled = False
     Interval = 250
diff --git a/components/tvplanit/examples/mormot/simpledemo/unit1.pas b/components/tvplanit/examples/mormot/simpledemo/unit1.pas
index d348a8982..cab3b88d4 100644
--- a/components/tvplanit/examples/mormot/simpledemo/unit1.pas
+++ b/components/tvplanit/examples/mormot/simpledemo/unit1.pas
@@ -16,11 +16,7 @@ type
   { TForm1 }
 
   TForm1 = class(TForm)
-    Button1: TButton;
-    Label1: TLabel;
-    Memo1: TMemo;
     Panel1: TPanel;
-    Panel2: TPanel;
     Timer1: TTimer;
     procedure Button1Click(Sender: TObject);
     procedure FormCreate(Sender: TObject);