delphi - 編集モードで TWebBrowser のカーソル位置を検出する

Question

次のような選択範囲を取得します。

var
  Range: IHTMLTxtRange;
begin
  if Supports((Document as IHTMLDocument2).selection.createRange,
    IHTMLTxtRange, Range)
end;

編集中の TWebBrowser。カーソルの位置を取得する必要があります。どうすれば入手できますか？

Answer 1

IHTMLTxtRangeは、必要なものを取得するためにいくつかの属性を定義します。

ただし、重要な項目はboundingLeftとboundingTopです。

このリンクには、それがどのように機能するかについての詳細もあります。