Changeset 112 for trunk/Forms

Timestamp:

Feb 15, 2022, 9:42:57 AM (3 years ago)

Author:

chronos

Message:

• Fixed: Contact photo was not saved correctly.
• Fixed: URL contact photo was incorrectly encoded with BASE64 encoding.
• Fixed: Disabled not correctly working autodetection of max. line length.
• Fixed: Tab order in Contact name details window.

Location:

trunk/Forms

Files:

• UFormContact.lfm (modified) (14 diffs)
• UFormNameDetails.lfm (modified) (5 diffs)

trunk/Forms/UFormContact.lfm

@@ -90 +90 @@
         Width = 265
         ParentFont = False
-        TabOrder = 2
+        TabOrder = 3
       end
       object EditPhone: TEdit
@@ -98 +98 @@
         Width = 265
         ParentFont = False
-        TabOrder = 4
+        TabOrder = 5
       end
       object Label3: TLabel
@@ -114 +114 @@
         Width = 216
         ParentFont = False
-        TabOrder = 6
+        TabOrder = 7
       end
       object Label4: TLabel
@@ -130 +130 @@
         Width = 216
         ParentFont = False
-        TabOrder = 9
+        TabOrder = 10
       end
       object Label22: TLabel
@@ -182 +182 @@
         Width = 224
         ParentFont = False
-        TabOrder = 1
+        TabOrder = 2
       end
       object Label45: TLabel
@@ -198 +198 @@
         Width = 217
         ParentFont = False
-        TabOrder = 10
+        TabOrder = 11
       end
       object Label9: TLabel
@@ -214 +214 @@
         Width = 265
         ParentFont = False
-        TabOrder = 3
+        TabOrder = 4
       end
       object EditPager: TEdit
@@ -222 +222 @@
         Width = 265
         ParentFont = False
-        TabOrder = 5
+        TabOrder = 6
       end
       object Label10: TLabel
@@ -246 +246 @@
         Width = 666
         ParentFont = False
-        TabOrder = 8
+        TabOrder = 9
       end
       object Label49: TLabel
@@ -262 +262 @@
         Width = 265
         ParentFont = False
-        TabOrder = 7
+        TabOrder = 8
       end
       object Label56: TLabel
@@ -278 +278 @@
         Width = 265
         ParentFont = False
-        TabOrder = 11
+        TabOrder = 12
       end
       object SpeedButtonWeb: TSpeedButton
@@ -335 +335 @@
         Caption = 'Details'
         OnClick = ButtonNameDetailsClick
-        TabOrder = 12
+        TabOrder = 1
       end
     end
@@ -432 +432 @@
         Anchors = [akTop, akLeft, akRight]
         Caption = 'Address'
-        ClientHeight = 259
+        ClientHeight = 285
         ClientWidth = 895
         TabOrder = 6
@@ -674 +674 @@
         Width = 920
         Caption = 'Address'
-        ClientHeight = 255
+        ClientHeight = 281
         ClientWidth = 918
         TabOrder = 9

trunk/Forms/UFormNameDetails.lfm

@@ -21 +21 @@
     Anchors = [akTop, akLeft, akRight]
     ParentFont = False
-    TabOrder = 0
+    TabOrder = 1
   end
   object Label1: TLabel
@@ -46 +46 @@
     Anchors = [akTop, akLeft, akRight]
     ParentFont = False
-    TabOrder = 1
+    TabOrder = 3
   end
   object EditMiddleName: TEdit
@@ -80 +80 @@
     Anchors = [akTop, akLeft, akRight]
     ParentFont = False
-    TabOrder = 3
+    TabOrder = 0
   end
   object Label27: TLabel
@@ -107 +107 @@
     Caption = 'OK'
     ModalResult = 1
-    TabOrder = 5
+    TabOrder = 6
   end
   object ButtonCancel: TButton
@@ -117 +117 @@
     Caption = 'Cancel'
     ModalResult = 2
-    TabOrder = 6
+    TabOrder = 5
   end
 end