Detect cursor position in TWebBrowser at edit mode

Question

I get selection range like this:

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

TWebBrowser in editing. I need get position of cursor. How I can get its?

Answer 1

IHTMLTxtRange defines several attributes to get what you need.

But the key items are boundingLeft and boundingTop

This link has some details on how it works as well.