tvplanit: Activate LCLScaling in translations_demo.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8558 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/tvplanit/examples/localization/translations_demo.lpi

@@ -9,8 +9,12 @@
       </Flags>
       <SessionStorage Value="InProjectDir"/>
       <Title Value="translations_demo"/>
+      <Scaled Value="True"/>
       <ResourceType Value="res"/>
       <UseXPManifest Value="True"/>
+      <XPManifest>
+        <DpiAware Value="True"/>
+      </XPManifest>
     </General>
     <i18n>
       <EnableI18N Value="True"/>

components/tvplanit/examples/localization/translations_demo.lpr

@@ -7,12 +7,13 @@ uses
   cthreads,
   {$ENDIF}{$ENDIF}
   Interfaces, // this includes the LCL widgetset
-  Forms, tdmain, laz_visualplanit;
+  Forms, tdmain;
 
 {$R *.res}
 
 begin
   RequireDerivedFormResource := True;
+  Application.Scaled:=True;
   Application.Initialize;
   Application.CreateForm(TMainForm, MainForm);
   Application.Run;