如何获得TRichViewEdit单词坐标?

时间:2013-02-12 16:25:42

标签: delphi

是否可以在TRichViewEdit

中的单词屏幕中获取XY坐标

如果是这样,怎么办呢?

1 个答案:

答案 0 :(得分:6)

您可以使用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;