Changeset 113 for branches/generator/Forms/UFormRule.lfm

Timestamp:

Aug 9, 2017, 10:14:31 PM (7 years ago)

Author:

chronos

Message:

• Added: Allow to move up/down rule items.
• Fixed: Store rule operator to XML file.

File:

• branches/generator/Forms/UFormRule.lfm (modified) (3 diffs)

branches/generator/Forms/UFormRule.lfm

@@ -114 +114 @@
       Action = ARemove
     end
+    object ToolButton4: TToolButton
+      Left = 70
+      Top = 2
+      Action = AMoveUp
+    end
+    object ToolButton5: TToolButton
+      Left = 93
+      Top = 2
+      Action = AMoveDown
+    end
   end
   object ActionList1: TActionList
@@ -134 +144 @@
       OnExecute = ARemoveExecute
     end
+    object AMoveUp: TAction
+      Caption = 'Move up'
+      ImageIndex = 7
+      OnExecute = AMoveUpExecute
+    end
+    object AMoveDown: TAction
+      Caption = 'Move down'
+      ImageIndex = 6
+      OnExecute = AMoveDownExecute
+    end
   end
   object PopupMenu1: TPopupMenu
     Images = Core.ImageList1
     left = 118
-    top = 185
+    top = 187
     object MenuItem1: TMenuItem
       Action = AAdd
@@ -148 +168 @@
       Action = ARemove
     end
+    object MenuItem4: TMenuItem
+      Action = AMoveUp
+    end
+    object MenuItem5: TMenuItem
+      Action = AMoveDown
+    end
   end
 end