![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как получить координаты положения курсора [D7, WinXP]
seregka © (2005-05-21 12:30:00)Как получить координаты курсора в richedit. Но нажатию мыша есть X и Y. Но мне нужно тоже самое,только без мышки.
Kerk (2005-05-21 20:31:00) [1]seregka (21.05.05 16:03) [17]
спасибо за нормальный ответ.
RTFM надо делать по утрам
seregka (2005-05-21 16:03:00) [2]спасибо за нормальный ответ. А то нашли ламера и давай с него трещать. ;-)
Marser (2005-05-21 15:09:00) [3]
var p:TPoint;
begin
sendmessage(RichEdit1.Handle,em_posfromchar,lparam(@p),richedit1.SelStart);
В p лежат коорбдинаты курсора относительно RichEdit1
Marser (2005-05-21 14:46:00) [4]
> Kerk © (21.05.05 14:43) [15] [Новое
>сообщение][Ответить]
>Marser © (21.05.05 14:39) [13]
>
> Все то. Сначала CaretPos, потом EM_POSFROMCHAR
Вот теперь правильно :-)
Kerk (2005-05-21 14:43:00) [5]Marser © (21.05.05 14:39) [13]
Все то. Сначала CaretPos, потом EM_POSFROMCHAR
Marser (2005-05-21 14:39:00) [6]
> Kerk © (21.05.05 14:28) [12] [Новое
>сообщение][Ответить]
>seregka (21.05.05 14:22) [11]
>
> см [3], дуболом.
Это не то.
Kerk (2005-05-21 14:28:00) [7]seregka (21.05.05 14:22) [11]
см [3], дуболом.
seregka (2005-05-21 14:22:00) [8]В том то и дело, что я не нашел у richedit такой Tpoint, который бы выдавал координаты не курсора мыши,а курсора мигающего символа.
Kerk (2005-05-21 14:13:00) [9]Marser © (21.05.05 14:09) [8]
Ааа... да..
Marser (2005-05-21 14:10:00) [10]А
Marser (2005-05-21 14:09:00) [11]Ой мля... Так caretpos тоже TPoint выдаёт. И перевести его в любые координаты - дело техники.
З.Ы. Керк, это тот самый второй "мастер должен жить", если ты не понял...
Kerk (2005-05-21 14:03:00) [12]от того который GetCursorPos дает
seregka (2005-05-21 14:02:00) [13]screentoclient от какого TPoint?
Kerk (2005-05-21 13:53:00) [14]ScreenToClient
seregka (2005-05-21 13:50:00) [15]Мне не текущая позиция символа в строке нужна, а координаты по X,Y относительно формы. Те самые которые идут по OnMouseDown, например.
Marser (2005-05-21 13:14:00) [16]TRichEdit.CaretPos
seregka (2005-05-21 12:48:00) [17]нет не мыши, а мигающий текстовый курсор в richedit
Marser (2005-05-21 12:39:00) [18]Курсор мыши? getcursorpos
Потом TRichEdit.ScreenToClient