Changeset 35 for trunk/Forms/UMainForm.lfm

Timestamp:

Feb 19, 2012, 12:03:21 AM (13 years ago)

Author:

chronos

Message:

• Added: Function to show execution point in code if program is paused.
• Added: Some partial stepping implementation.

File:

• trunk/Forms/UMainForm.lfm (modified) (6 diffs)

trunk/Forms/UMainForm.lfm

@@ -590 +590 @@
         Action = AProgramRunToCursor
       end
+      object MenuItem31: TMenuItem
+        Action = AProgramShowExecutionPoint
+      end
     end
     object MenuItem24: TMenuItem
@@ -821 +824 @@
       Caption = 'Step into'
       ImageIndex = 15
+      OnExecute = AProgramStepIntoExecute
       ShortCut = 118
     end
@@ -827 +831 @@
       Caption = 'Step over'
       ImageIndex = 17
+      OnExecute = AProgramStepOverExecute
       ShortCut = 119
     end
@@ -833 +838 @@
       Caption = 'Run to cursor'
       ImageIndex = 14
+      OnExecute = AProgramRunToCursorExecute
       ShortCut = 115
     end
@@ -839 +845 @@
       Caption = 'Step out'
       ImageIndex = 16
+      OnExecute = AProgramStepOutExecute
       ShortCut = 8311
     end
@@ -876 +883 @@
       Caption = 'Show position in target'
       OnExecute = AShowTargetPositionExecute
+      ShortCut = 16393
     end
     object AShowSourcePosition: TAction
       Caption = 'Show position in source'
       OnExecute = AShowSourcePositionExecute
+      ShortCut = 16393
+    end
+    object AProgramShowExecutionPoint: TAction
+      Category = 'Program'
+      Caption = 'Show execution point'
+      OnExecute = AProgramShowExecutionPointExecute
     end
   end