Merge pull request #184 from ReinierNL/update_demo29

Updates for demo 29

Author: pyscripter

Demos/Demo29/Demo29.dproj

@@ -70,6 +70,7 @@
         <UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
         <UWP_DelphiLogo150>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png</UWP_DelphiLogo150>
         <Icon_MainIcon>$(BDS)\bin\delphi_PROJECTICON.ico</Icon_MainIcon>
+        <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Base_Win64)'!=''">
         <UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
@@ -105,7 +106,6 @@
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2_Win64)'!=''">
         <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
-        <AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1033</VerInfo_Locale>
         <VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>

Demos/Demo29/Unit1.dfm

@@ -2,7 +2,7 @@ object Form1: TForm1
   Left = 218
   Top = 18
   Caption = 'Form1'
-  ClientHeight = 743
+  ClientHeight = 809
   ClientWidth = 668
   Color = clBtnFace
   Font.Charset = DEFAULT_CHARSET
@@ -43,6 +43,11 @@ object Form1: TForm1
     Top = 471
     Width = 657
     Height = 330
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -13
+    Font.Name = 'Consolas'
+    Font.Style = []
     Lines.Strings = (
       '#  This demo requires  the module pillow (PIL)'
 
@@ -68,14 +73,22 @@ object Form1: TForm1
       '  stream = BytesIO()'
       '  image.save(stream, image.format)'
       '  return stream.getvalue()')
+    ParentFont = False
     ScrollBars = ssBoth
     TabOrder = 2
+    WordWrap = False
   end
   object Memo2: TMemo
     Left = 8
     Top = 352
     Width = 657
     Height = 113
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -13
+    Font.Name = 'Consolas'
+    Font.Style = []
+    ParentFont = False
     ScrollBars = ssBoth
     TabOrder = 3
   end
@@ -93,10 +106,6 @@ object Form1: TForm1
   end
   object PythonEngine1: TPythonEngine
     AutoUnload = False
-    DllName = 'python36.dll'
-    APIVersion = 1013
-    RegVersion = '3.6'
-    UseLastKnownVersion = False
     IO = PythonGUIInputOutput1
     Left = 168
     Top = 624