delphi - 如何获取TRichViewEdit单词坐标？

Question

是否可以在TRichViewEdit中的单词屏幕中获取XY坐标？

如果是这样，怎么办？

Answer 1

您可以使用GetItemCoords方法获取项目在格式化文档中的位置：

procedure TForm1.Button1Click(Sender: TObject);
var
  X, Y: Integer;
begin
  RichViewEdit1.Add('Hello ', 0);
  RichViewEdit1.Add('world!', 0);
  RichViewEdit1.Format;

  RichViewEdit1.GetItemCoords(2, X, Y);
  ShowMessage('Position of the second word: [' + IntToStr(X) + '; ' +
    IntToStr(Y) + ']');
end;