修改美化标题字体、界面

MainForm.fmx

@@ -82,7 +82,7 @@ object ToolsForm: TToolsForm
     object Edit2: TEdit
       Touch.InteractiveGestures = [LongTap, DoubleTap]
       TabOrder = 6
-      Position.X = 103.000000000000000000
+      Position.X = 104.000000000000000000
       Position.Y = 104.000000000000000000
       Size.Width = 266.000000000000000000
       Size.Height = 32.000000000000000000

MyDelphi.dproj

@@ -342,23 +342,23 @@
                         <Overwrite>true</Overwrite>
                     </Platform>
                 </DeployFile>
-                <DeployFile LocalName="$(BDS)\bin\Artwork\Android\FM_NotificationIcon_24x24.png" Configuration="Debug" Class="Android_NotificationIcon24">
+                <DeployFile LocalName="Android64\Debug\colors.xml" Configuration="Debug" Class="Android_Colors">
                     <Platform Name="Android64">
-                        <RemoteName>ic_notification.png</RemoteName>
                         <Overwrite>true</Overwrite>
                     </Platform>
                 </DeployFile>
-                <DeployFile LocalName="Android64\Debug\AndroidManifest.xml" Configuration="Debug" Class="ProjectAndroidManifest">
+                <DeployFile LocalName="Android64\Debug\styles.xml" Configuration="Debug" Class="AndroidSplashStyles">
                     <Platform Name="Android64">
                         <Overwrite>true</Overwrite>
                     </Platform>
                 </DeployFile>
-                <DeployFile LocalName="Android64\Debug\colors.xml" Configuration="Debug" Class="Android_Colors">
+                <DeployFile LocalName="$(BDS)\bin\Artwork\Android\FM_NotificationIcon_24x24.png" Configuration="Debug" Class="Android_NotificationIcon24">
                     <Platform Name="Android64">
+                        <RemoteName>ic_notification.png</RemoteName>
                         <Overwrite>true</Overwrite>
                     </Platform>
                 </DeployFile>
-                <DeployFile LocalName="Android64\Debug\styles.xml" Configuration="Debug" Class="AndroidSplashStyles">
+                <DeployFile LocalName="Android64\Debug\AndroidManifest.xml" Configuration="Debug" Class="ProjectAndroidManifest">
                     <Platform Name="Android64">
                         <Overwrite>true</Overwrite>
                     </Platform>

mainform.LgXhdpiPh.fmx

@@ -18,9 +18,13 @@ inherited ToolsForm_LgXhdpiPh: TToolsForm_LgXhdpiPh
   DesignerMasterStyle = 3
   inherited Header: TToolBar
     Size.Width = 450.000000000000000000
+    TintColor = claSnow
     inherited HeaderLabel: TLabel
+      StyledSettings = [Size]
       Size.Width = 450.000000000000000000
-      Text = #25105#30340'DELPHI'#24037#20855#31665
+      TextSettings.Font.Family = 'Comic Sans MS'
+      TextSettings.FontColor = claRoyalblue
+      Text = 'MyDelphi'#24037#20855#31665' Ver 1.5'
     end
   end
   inherited ScaledLayout1: TScaledLayout
@@ -29,6 +33,7 @@ inherited ToolsForm_LgXhdpiPh: TToolsForm_LgXhdpiPh
     Size.Width = 450.000000000000000000
     Size.Height = 647.000000000000000000
     inherited RoundRect2: TRoundRect
+      Corners = [BottomLeft, BottomRight]
       Fill.Color = claWhite
       Opacity = 0.079999998211860660
       Position.X = 25.000000000000000000
@@ -37,6 +42,7 @@ inherited ToolsForm_LgXhdpiPh: TToolsForm_LgXhdpiPh
       Stroke.Thickness = 0.000000000000000000
     end
     inherited RoundRect1: TRoundRect
+      Corners = [TopLeft, TopRight]
       Fill.Kind = Gradient
       Fill.Gradient.Points = <
         item
@@ -68,7 +74,32 @@ inherited ToolsForm_LgXhdpiPh: TToolsForm_LgXhdpiPh
       TextSettings.Font.Size = 24.000000000000000000
       Text = #25628#32034':'
     end
-    inherited Label1: TLabel [3]
+    inherited Button2: TButton
+      StyledSettings = [Family]
+      Position.X = 256.000000000000000000
+      Position.Y = 224.000000000000000000
+      TextSettings.Font.Family = 'SimSun'
+      TextSettings.Font.Size = 24.000000000000000000
+      OnClick = Button2Click
+    end
+    inherited Button1: TButton
+      StyledSettings = [Family]
+      Position.X = 88.000000000000000000
+      Position.Y = 224.000000000000000000
+      TextSettings.Font.Family = 'SimSun'
+      TextSettings.Font.Size = 24.000000000000000000
+      OnClick = Button1Click
+    end
+    inherited Edit2: TEdit
+      Position.Y = 144.000000000000000000
+      Size.Width = 306.000000000000000000
+    end
+    inherited Edit1: TEdit
+      Text = 'www.baidu.com'
+      Position.Y = 80.000000000000000000
+      Size.Width = 306.000000000000000000
+    end
+    inherited Label1: TLabel
       StyledSettings = [Family, Style, FontColor]
       Position.Y = 72.000000000000000000
       Size.Width = 57.000000000000000000
@@ -78,58 +109,33 @@ inherited ToolsForm_LgXhdpiPh: TToolsForm_LgXhdpiPh
       TextSettings.Font.Size = 24.000000000000000000
       Text = #32593#22336':'
     end
-    inherited Button3: TButton [4]
+    inherited Button3: TButton
       Position.X = 92.000000000000000000
       Position.Y = 344.000000000000000000
       Size.Width = 265.000000000000000000
       OnClick = Button3Click
     end
-    inherited Button4: TButton [5]
+    inherited Button4: TButton
       Position.X = 92.000000000000000000
       Position.Y = 432.000000000000000000
       Size.Width = 265.000000000000000000
       OnClick = Button4Click
     end
-    inherited Button5: TButton [6]
+    inherited Button5: TButton
       Position.X = 92.000000000000000000
       Position.Y = 520.000000000000000000
       Size.Width = 265.000000000000000000
       OnClick = Button5Click
     end
-    inherited Label3: TLabel [7]
-      StyledSettings = [Family, Style, FontColor]
-      Position.Y = 8.000000000000000000
-      Text = #25910#34255':'
-    end
-    inherited ComboBox1: TComboBox [8]
+    inherited ComboBox1: TComboBox
       Position.Y = 8.000000000000000000
-      Size.Width = 301.000000000000000000
-      OnChange = ComboBox1Change
-    end
-    inherited Edit1: TEdit [9]
-      Text = 'www.baidu.com'
-      Position.Y = 80.000000000000000000
-      Size.Width = 305.000000000000000000
-    end
-    inherited Edit2: TEdit [10]
-      Position.Y = 144.000000000000000000
       Size.Width = 306.000000000000000000
+      OnChange = ComboBox1Change
     end
-    inherited Button1: TButton [11]
-      StyledSettings = [Family]
-      Position.X = 88.000000000000000000
-      Position.Y = 224.000000000000000000
-      TextSettings.Font.Family = 'SimSun'
-      TextSettings.Font.Size = 24.000000000000000000
-      OnClick = Button1Click
-    end
-    inherited Button2: TButton [12]
-      StyledSettings = [Family]
-      Position.X = 256.000000000000000000
-      Position.Y = 224.000000000000000000
-      TextSettings.Font.Family = 'SimSun'
-      TextSettings.Font.Size = 24.000000000000000000
-      OnClick = Button2Click
+    inherited Label3: TLabel
+      StyledSettings = [Family, Style, FontColor]
+      Position.Y = 8.000000000000000000
+      Text = #25910#34255':'
     end
   end
 end