Allow scrolling over obj cmds text

Author: RayCarrot

src/Ray1Editor/UI/Views/Editor/Components/EditorTab_Properties.xaml

@@ -11,7 +11,8 @@
              d:DataContext="{x:Static local:DesignDataContexts.EditorViewModel}"
              Foreground="{DynamicResource MahApps.Brushes.ThemeForeground}">
 
-    <ScrollViewer Padding="5 10 5 5"
+    <ScrollViewer x:Name="PropertiesScrollViewer"
+                  Padding="5 10 5 5"
                   VerticalScrollBarVisibility="Auto">
 
         <Grid>
@@ -109,8 +110,10 @@
                                        SyntaxHighlighting="C++"
                                        HorizontalScrollBarVisibility="Disabled"
                                        VerticalScrollBarVisibility="Disabled"
+                                       ScrollViewer.CanContentScroll="False"
                                        IsReadOnly="True"
-                                       Margin="0 0 0 7" />
+                                       Margin="0 0 0 7"
+                                       PreviewMouseWheel="TextEditor_OnPreviewMouseWheel" />
 
                 </StackPanel>
 

src/Ray1Editor/UI/Views/Editor/Components/EditorTab_Properties.xaml.cs

@@ -1,6 +1,7 @@
 using ICSharpCode.AvalonEdit.Highlighting;
 using System.ComponentModel;
 using System.Windows.Controls;
+using System.Windows.Input;
 using System.Windows.Media;
 
 namespace Ray1Editor;
@@ -83,4 +84,18 @@ public EditorViewModel ViewModel
         get => DataContext as EditorViewModel;
         set => DataContext = value;
     }
+
+    private void TextEditor_OnPreviewMouseWheel(object sender, MouseWheelEventArgs e)
+    {
+        // Redirect the mouse wheel movement to allow scrolling
+
+        var eventArg = new MouseWheelEventArgs(e.MouseDevice, e.Timestamp, e.Delta)
+        {
+            RoutedEvent = MouseWheelEvent,
+            Source = e.Source
+        };
+
+        PropertiesScrollViewer?.RaiseEvent(eventArg);
+        e.Handled = true;
+    }
 }