Как узнать координаты текущей позиции в RichTextBox??

[|kerish|]

Как узнать координаты текущей позиции в RichTextBox??
Нужно, чтобы рядом с текущей позицией появлялся один объект, а координаты того, где сейчас юзер пишет не знаю, как получить.
Может кто знает как это сделать?

[Alexander N. Samarin]

Свойство SelStart или что-то похожее разве не указывает на текущую позицию курсора?
PS:: SelLength = 0

[Александр80]

SelLength - длина выделенного текста.
SelStart - позиция первого сивмола...


Можно и так:

Код: Выделить всё

Private Sub Command1_Click()
RichTextBox1.SelStart = Len(RichTextBox1.Text)
RichTextBox1.SetFocus
End Sub

[GM]

Координаты текущой позиции(в пикселях) курсора можна узнать вот так:

Код: Выделить всё

Declare Function GetCaretPos Lib "user32.dll" ( _
    ByRef lpPoint As POINTAPI) As Long


[|kerish|]

GM Спасибо, ты меня понял.