Как в Delphi узнать экранные координаты каретки в RichEdit (или отн. формы)?

DmitryIPAC 02.04.2004 - 08:19 | Как в Delphi узнать экранные координаты каретки в RichEdit (или относительно формы), чтобы в этом месте появлялся ListBox?
OF 1 - 02.04.2004 - 11:03 | А что есть координаты каретки? А если выделение, где координаты каретки? Ладно, если опустить этот вопрос, то: var p: TPoint; begin SendMessage(RichEdit1.Handle, EM_POSFROMCHAR, Integer(@p), RichEdit1.SelStart); p := RichEdit1.ClientToParent(p); ListBox1.Left := p.X; ListBox1.Top := p.Y; end;

>>