[201_37] 仅在文档环境中的图片允许显示悬浮菜单 (#2429)

Author: MoonL79

TeXmacs/tests/tmu/201_37.tmu

@@ -2,19 +2,14 @@
 
 ## 如何测试
 
-打开 201_37.tmu，进行以下测试项：
-+ 将鼠标放在图片中，查看指针是否变为小手图标
-+ 将鼠标移出图片，查看指针是否变回正常小箭头
-+ 将鼠标放在图片中，查看图片上方居中位置是否出现一个横向悬浮菜单
-+ 在将鼠标移入图片范围内时，仔细查看是否出现了菜单位移的现象，期望不出现
-+ 测试左对齐、居中、右对齐按钮功能是否正常
-+ 弹出菜单后，上下滚动页面，菜单应始终保持在图片上方
-+ 查看当前对齐方式所对应的按钮是否正常高亮
-+ 按住ctrl/command，滚动滚轮，查看菜单大小是否跟随变化，以及悬浮菜单上边缘是否介于两行之间。
-+ 按住ctrl/command，持续缩小，通过 **(get-window-zoom-factor)** 获取页面缩放值， 当缩放值在 **0.35320088300220753** （即大概35.3%）及以下时，菜单应消失。
-+ 缓慢的将鼠标移入图片范围内，进行以下测试项：
-  + 在 **2025/12/26 图片悬浮菜单渲染修复** 这次修复之前，会有这样的情况：先出现了一个菜单，然后菜单消失，又出现了一个尺寸与先前不同的菜单。注意！！这个过程很短暂，需要将鼠标尽可能的接近像素级移入图片，如果移动足够缓慢，甚至可以看到先出现的菜单一直停留在页面上，直到再次移动鼠标
-  + 修复之后，期望鼠标移入图片范围后，菜单仅出现一次，且出现的菜单尺寸是经过调整的，与当前页面缩放相适应
+打开 201_37.tmu，按照其中的说明进行测试。
+
+## 2025/12/31 仅在document环境中允许显示图片悬浮菜单
+
+### What
+
++ 图片在表格、题注等其他环境中时，显示悬浮菜单是不合理的，现在添加判断拒绝显示。
++ 粘贴图片或插入图片时亦添加判断，仅图片在document环境下才添加对齐选项。
 
 ## 2025/12/28 修复闪烁问题，修复坐标定位问题
 ### What

devel/201_37.md

@@ -216,6 +216,7 @@ class edit_interface_rep : virtual public editor_rep {
   void      set_cursor_style (string style_name);
   void      update_mouse_loci ();
   void      update_focus_loci ();
+  bool      should_show_image_popup (tree t);
 
   /* the footer */
   tree compute_text_footer (tree st);

src/Edit/Interface/edit_interface.hpp

@@ -13,9 +13,14 @@
 #include "edit_interface.hpp"
 #include "link.hpp"
 #include "message.hpp"
+#include "moebius/tree_label.hpp"
+#include "moebius/vars.hpp"
+#include "observer.hpp"
 #include "observers.hpp"
+#include "path.hpp"
 #include "qapplication.h"
 #include "qnamespace.h"
+#include "scheme.hpp"
 #include "sys_utils.hpp"
 #include "tm_buffer.hpp"
 #include "tm_timer.hpp"
@@ -35,6 +40,30 @@ void disable_double_clicks ();
 
 bool is_in_graphics_mode= false;
 
+bool
+edit_interface_rep::should_show_image_popup (tree t) {
+  int t_N= N (t);
+  if (is_nil (t)) return false;
+  if (is_func (t, WITH) && t_N >= 2) {
+    for (int i= 0; i < t_N; ++i) {
+      if (t[i] == "par-mode") {
+        return true;
+      }
+    }
+  }
+  path p= path_up (obtain_ip (t));
+  // 持续向上遍历至最顶层的编辑树，若过程中出现了非 document
+  // 节点，说明图片被其他节点包裹，返回 false
+  while (p != et) {
+    t= subtree (et, p);
+    if (!is_func (t, DOCUMENT)) {
+      return false;
+    }
+    p= path_up (p);
+  }
+  return true;
+}
+
 /******************************************************************************
  * Routines for the mouse
  ******************************************************************************/
@@ -603,10 +632,12 @@ edit_interface_rep::mouse_any (string type, SI x, SI y, int mods, time_t t,
   if (hovering_hlink) set_cursor_style ("pointing_hand");
   else if (hovering_image) {
     set_cursor_style ("pointing_hand");
-    path with_path= path_up (current_path);
-    tree with_tree= subtree (et, with_path);
-    show_image_popup (with_tree, selr, magf, get_scroll_x (), get_scroll_y (),
-                      get_canvas_x (), get_canvas_y ());
+    path path_of_image_parent= path_up (current_path);
+    tree tree_of_image_parent= subtree (et, path_of_image_parent);
+    if (should_show_image_popup (tree_of_image_parent)) {
+      show_image_popup (tree_of_image_parent, selr, magf, get_scroll_x (),
+                        get_scroll_y (), get_canvas_x (), get_canvas_y ());
+    }
   }
   else {
     set_cursor_style ("normal");

src/Edit/Interface/edit_mouse.cpp

@@ -390,7 +390,14 @@ edit_text_rep::make_image (string file_name, bool link, string w, string h,
     t << tuple (tree (RAW_DATA, s), utf8_to_cork (as_string (tail (image))));
   }
   t << tree (w) << tree (h) << tree (x) << tree (y);
-  tree with (WITH);
-  with << tree ("par-mode") << tree ("center") << t;
-  insert_tree (with);
+  tree st= the_line ();
+  // 获取当前段落tree，若其为空，则插入图片时自动添加居中环境
+  if (N (st) == 0) {
+    tree with (WITH);
+    with << tree ("par-mode") << tree ("center") << t;
+    insert_tree (with);
+    return;
+  }
+  insert_tree (t);
+  return;
 }

src/Edit/Modify/edit_text.cpp

@@ -14,7 +14,9 @@
 #include "convert.hpp"
 #include "cork.hpp"
 #include "observer.hpp"
+#include "observers.hpp"
 #include "packrat.hpp"
+#include "path.hpp"
 #include "preferences.hpp"
 #include "tree_modify.hpp"
 #include "tree_observer.hpp"
@@ -705,9 +707,12 @@ edit_select_rep::selection_paste (string key) {
     tree doc= generic_to_tree (s, fm);
     if (is_func (doc, DOCUMENT, 1)) doc= doc[0]; // temporary fix
     if (is_func (doc, IMAGE)) {
-      tree with (WITH);
-      with << tree ("par-mode") << tree ("center") << doc;
-      doc= with;
+      tree t= the_line ();
+      if (N (t) == 0) {
+        tree with (WITH);
+        with << tree ("par-mode") << tree ("center") << doc;
+        doc= with;
+      }
     }
     if (mode == "math" && is_compound (doc, "math", 1)) doc= doc[0];
     insert_tree (doc);