diff --git a/Demos/Demo01/Project1.dproj b/Demos/Demo01/Project1.dproj index 359c290a..b1e385cc 100644 --- a/Demos/Demo01/Project1.dproj +++ b/Demos/Demo01/Project1.dproj @@ -4,7 +4,7 @@ Project1.dpr Debug DCC32 - 16.1 + 19.1 VCL True Win64 @@ -29,11 +29,29 @@ Base true + + true + Cfg_1 + true + true + + + true + Cfg_1 + true + true + true Base true + + true + Cfg_2 + true + true + true Cfg_2 @@ -51,16 +69,20 @@ true - Project1_Icon.ico System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) 1033 $(BDS)\bin\default_app.manifest + true + $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png + $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png true $(BDS)\bin\default_app.manifest System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) - Project1_Icon.ico + true + $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png + $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png false @@ -68,12 +90,23 @@ 0 0 + + Debug + + + Debug + DEBUG;$(DCC_Define) + + Debug + - $(BDS)\bin\delphi_PROJECTICON.ico true + Debug + true + PerMonitorV2 @@ -135,10 +168,7 @@ 1.0.0.0 - - Microsoft Office 2000 Sample Automation Server Wrapper Components - Microsoft Office XP Sample Automation Server Wrapper Components - + True diff --git a/Demos/Demo01/Project1.res b/Demos/Demo01/Project1.res index 3f7606cf..9ea7e5f4 100644 Binary files a/Demos/Demo01/Project1.res and b/Demos/Demo01/Project1.res differ diff --git a/Demos/Demo01/Unit1.dfm b/Demos/Demo01/Unit1.dfm index bcbfffc0..81e0adeb 100644 --- a/Demos/Demo01/Unit1.dfm +++ b/Demos/Demo01/Unit1.dfm @@ -33,8 +33,15 @@ object Form1: TForm1 Width = 528 Height = 136 Align = alClient + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'Consolas' + Font.Pitch = fpVariable + Font.Style = [] Lines.Strings = ( 'print(2+2)') + ParentFont = False ScrollBars = ssBoth TabOrder = 1 end @@ -80,6 +87,13 @@ object Form1: TForm1 Width = 528 Height = 153 Align = alTop + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'Consolas' + Font.Pitch = fpVariable + Font.Style = [] + ParentFont = False ScrollBars = ssBoth TabOrder = 2 end