Changeset 19358

Timestamp:

11/07/18 20:46:51 (6 years ago)

Author:

tbretz

Message:

Implemented key handling of space key as a single-step key.

Location:

trunk/Mars/mbase

Files:

• MStatusDisplay.cc (modified) (2 diffs)
• MStatusDisplay.h (modified) (1 diff)

trunk/Mars/mbase/MStatusDisplay.cc

@@ -774 +774 @@
     AddStatusBar();
 
+    BindKey(this, gVirtualX->KeysymToKeycode(' '), 0);
+
     //
     // set the smallest and biggest size of the Main frame
@@ -3550 +3552 @@
 }
 
+Bool_t MStatusDisplay::HandleKey(Event_t *event)
+{
+    if (event->fType==kGKeyPress &&
+        event->fCode==gVirtualX->KeysymToKeycode(' ') &&
+        fStatus==(Status_t)kLoopPause)
+        fStatus = (Status_t)kLoopStep;
+
+    return kTRUE;
+}
+
 Bool_t MStatusDisplay::HandleEvent(Event_t *event)
 {

trunk/Mars/mbase/MStatusDisplay.h

@@ -308 +308 @@
      void EventInfo(Int_t event, Int_t px, Int_t py, TObject *selected);
      Bool_t HandleEvent(Event_t *event);
+     Bool_t HandleKey(Event_t *event);
 
      // Public helper functions