如何在Delphi中获取RichEdit的文本范围

在Delphi中获取RichEdit的文本范围，可以使用以下方法：

使用SelStart和SelLength属性

SelStart属性表示当前选择区域的起始位置，SelLength属性表示当前选择区域的长度。可以使用这两个属性来获取选择区域的文本范围。

var
  StartPos, Length: Integer;
  Text: string;
begin
  StartPos := RichEdit1.SelStart;
  Length := RichEdit1.SelLength;
  Text := RichEdit1.Text;
  // 获取选择区域的文本
  Text := Copy(Text, StartPos + 1, Length);
end;

使用GetSelText方法

GetSelText方法可以直接获取当前选择区域的文本。

var
  Text: string;
begin
  Text := RichEdit1.GetSelText;
end;

使用GetTextRange方法

GetTextRange方法可以获取指定范围内的文本。

var
  StartPos, EndPos, Length: Integer;
  Text: string;
begin
  StartPos := 0;
  EndPos := 10;
  Length := EndPos - StartPos;
  Text := RichEdit1.Text;
  // 获取指定范围内的文本
  Text := Copy(Text, StartPos + 1, Length);
end;

以上方法可以用于获取RichEdit的文本范围。