WPF/C# RichTextBox中IncreaseIndentation功能异常问题求助

需求 #

通过代码实现以下操作：

1. 输入文本“Hello1”（无项目符号）
2. 开启项目符号功能
3. 换行后输入“Hello2”（带项目符号）
4. 给“Hello2”增加一级缩进

实际与预期效果 #

• 实际效果：Hello1无项目符号，下方出现空的项目符号行，Hello2无项目符号且缩进位置错误
• 预期效果：Hello1无项目符号，Hello2作为二级项目符号列表项显示

原始代码 #

XAML #

<Window x:Class="WpfApp3.MainWindow"
        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
        xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
        xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
        xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
        xmlns:local="clr-namespace:WpfApp3"
        mc:Ignorable="d"
        Title="MainWindow" Height="450" Width="800" Loaded="Window_Loaded">
    <Grid>
        <RichTextBox Name="richtextbox1"/>
    </Grid>
</Window>

C# 初始实现 #

using System.Windows;
using System.Windows.Documents;

namespace WpfApp3 {    
    public partial class MainWindow : Window {
        public MainWindow() { InitializeComponent(); }
        private void RboxInsert(string text) {
            richtextbox1.CaretPosition.InsertTextInRun(text);
            for(int i=0; i < text.Length; i++)
                EditingCommands.MoveRightByCharacter.Execute(null, richtextbox1);
        }
        private void Window_Loaded(object sender, RoutedEventArgs e) {
            richtextbox1.Focus();
            RboxInsert("Hello1");
            EditingCommands.ToggleBullets.Execute(null, richtextbox1);
            EditingCommands.EnterParagraphBreak.Execute(null, richtextbox1);
            RboxInsert("Hello2");
            EditingCommands.IncreaseIndentation.Execute(null, richtextbox1);
            EditingCommands.EnterParagraphBreak.Execute(null, richtextbox1);
            return;
        }
    }
}

第二次尝试代码 #

using System.Windows;
using System.Windows.Documents;

namespace WpfApp3 {    
    public partial class MainWindow : Window {
        public MainWindow() { InitializeComponent(); }
        private void RboxInsert(string text) {
            richtextbox1.CaretPosition.InsertTextInRun(text);
            for(int i=0; i < text.Length; i++)
                EditingCommands.MoveRightByCharacter.Execute(null, richtextbox1);
        }
        private void Window_Loaded(object sender, RoutedEventArgs e) {
            richtextbox1.Focus();
            RboxInsert("Hello1");
            EditingCommands.ToggleBullets.Execute(null, richtextbox1);
            EditingCommands.EnterParagraphBreak.Execute(null, richtextbox1);
            richtextbox1.Selection.ApplyPropertyValue(
                Paragraph.TextIndentProperty,
                (double)100 /*pixels to indent by*/
            );
            RboxInsert("Hello2");
            return;
        }
    }
}

问题分析 #

1. 编辑命令作用对象偏差：EditingCommands.ToggleBullets会作用于当前光标所在的Hello1段落，换行后新段落的项目符号继承逻辑异常，导致空项目符号行出现。
2. 缩进方式错误：设置TextIndent是对段落整体文本缩进，而项目符号列表的层级缩进需要调整列表项容器属性，而非段落文本缩进。
3. 光标控制冗余：自定义RboxInsert中循环执行MoveRightByCharacter可能导致光标偏离预期段落，破坏项目符号连续性。

解决方案 #

方案1：直接操作FlowDocument文档结构（推荐） #

绕过编辑命令的不确定性，直接构造段落和列表元素，精准控制格式：

using System.Windows;
using System.Windows.Documents;

namespace WpfApp3 {    
    public partial class MainWindow : Window {
        public MainWindow() { InitializeComponent(); }
        
        private void Window_Loaded(object sender, RoutedEventArgs e) {
            richtextbox1.Focus();
            
            // 添加无项目符号的Hello1段落
            var hello1Para = new Paragraph(new Run("Hello1"));
            richtextbox1.Document.Blocks.Add(hello1Para);
            
            // 创建一级项目符号列表
            var level1List = new List { MarkerStyle = TextMarkerStyle.Disc };
            
            // 创建二级缩进的Hello2列表项
            var hello2Para = new Paragraph(new Run("Hello2"));
            // 调整缩进量，40为示例值，可按需修改
            hello2Para.Margin = new Thickness(40, 0, 0, 0);
            level1List.ListItems.Add(new ListItem(hello2Para));
            
            richtextbox1.Document.Blocks.Add(level1List);
        }
    }
}

方案2：修正编辑命令执行顺序与光标控制 #

若坚持使用EditingCommands，调整操作顺序并简化光标控制：

using System.Windows;
using System.Windows.Documents;

namespace WpfApp3 {    
    public partial class MainWindow : Window {
        public MainWindow() { InitializeComponent(); }
        
        private void RboxInsert(string text) {
            // 直接追加文本并移动光标到末尾，替代循环移动
            richtextbox1.CaretPosition.InsertTextInRun(text);
            richtextbox1.CaretPosition = richtextbox1.CaretPosition.GetPositionAtOffset(text.Length);
        }
        
        private void Window_Loaded(object sender, RoutedEventArgs e) {
            richtextbox1.Focus();
            RboxInsert("Hello1");
            
            // 先换行，再给新段落开启项目符号
            EditingCommands.EnterParagraphBreak.Execute(null, richtextbox1);
            EditingCommands.ToggleBullets.Execute(null, richtextbox1);
            
            RboxInsert("Hello2");
            // 增加缩进，此时作用于项目符号段落
            EditingCommands.IncreaseIndentation.Execute(null, richtextbox1);
        }
    }
}

内容的提问来源于stack exchange，提问作者Bill Moore