Текущий архив: 2006.04.16;
Скачать: CL | DM;
Вниз
кординаты символа в RichEdit Найти похожие ветки
← →
Gydvin © (2006-04-03 14:47) [0]Здравствуйте.
function RECharIndexByPos(RichEdit: TRichEdit; X, Y: Integer): Integer;
{ функция возвращает абсолютное положение символа для данных координат курсора}
var
P: TPoint;
begin
P := Point(X, Y);
Result := SendMessage(RichEdit.Handle, EM_CHARFROMPOS, 0, longint(@P));
end;
а можно ли сделать обратную функцию. Тоесть номер символа, а получаешь его координаты относительно клиентской области. Конечно можно бы было в цикле пробежаться по всей области выуживая нужный номер, но это такой тормоз...
← →
MBo © (2006-04-03 14:52) [1]В данной функции используется одно из EM_*** сообщений.
Элементарная логика подсказывает, что нужно просмотреть и другие сообщения этого вида.
← →
Gydvin © (2006-04-03 15:37) [2]Спасибо. Это я сам тормознул (
Страницы: 1 вся ветка
Текущий архив: 2006.04.16;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.047 c
