добавил режим изменения

uCreateNotify.fmx

@@ -8,6 +8,7 @@ object fCreateNotify: TfCreateNotify
   FormFactor.Height = 480
   FormFactor.Devices = [Desktop]
   OnCreate = FormCreate
+  OnShow = FormShow
   DesignerMasterStyle = 0
   object btnESImageOpen: TButton
     Hint = #1050#1072#1088#1090#1080#1085#1082#1080'|*.jpg; *.jpeg; *.gif; *.webp'
@@ -73,6 +74,12 @@ object fCreateNotify: TfCreateNotify
     Size.Width = 311.000000000000000000
     Size.Height = 258.000000000000000000
     Size.PlatformDefault = False
+    inherited ccbStyleBorderColor: TColorComboBox
+      TabOrder = 36
+    end
+    inherited Label42: TLabel
+      TabOrder = 37
+    end
     inherited Label44: TLabel
       TabOrder = 38
     end
@@ -139,7 +146,7 @@ object fCreateNotify: TfCreateNotify
       Position.X = 8.000000000000000000
       Position.Y = 135.000000000000000000
       Text = #1057#1086#1073#1099#1090#1080#1077
-      TabOrder = 59
+      TabOrder = 51
     end
     object cbEventsType: TComboBox
       Items.Strings = (
@@ -153,17 +160,17 @@ object fCreateNotify: TfCreateNotify
       Size.Width = 192.000000000000000000
       Size.Height = 22.000000000000000000
       Size.PlatformDefault = False
-      TabOrder = 60
+      TabOrder = 52
     end
     object Label3: TLabel
       Position.X = 8.000000000000000000
       Position.Y = 190.000000000000000000
       Text = #1059#1089#1083#1086#1074#1080#1077' '#1089#1091#1084#1084#1099
-      TabOrder = 61
+      TabOrder = 53
     end
     object edtIF: TEdit
       Touch.InteractiveGestures = [LongTap, DoubleTap]
-      TabOrder = 62
+      TabOrder = 54
       Position.X = 8.000000000000000000
       Position.Y = 215.000000000000000000
       Size.Width = 192.000000000000000000
@@ -217,6 +224,9 @@ object fCreateNotify: TfCreateNotify
       Size.Width = 241.000000000000000000
       Size.Height = 115.000000000000000000
       Size.PlatformDefault = False
+      inherited Label41: TLabel
+        TabOrder = 6
+      end
       inherited Label46: TLabel
         TabOrder = 39
       end
@@ -239,11 +249,8 @@ object fCreateNotify: TfCreateNotify
       Size.Width = 241.000000000000000000
       Size.Height = 115.000000000000000000
       Size.PlatformDefault = False
-      inherited ccbFontColor: TColorComboBox
-        TabOrder = 37
-      end
-      inherited Label49: TLabel
-        TabOrder = 36
+      inherited Label41: TLabel
+        TabOrder = 6
       end
       inherited Label46: TLabel
         TabOrder = 38