Позиция каретки в RichEdit

← →
Rayslava © (2004-02-27 18:57) [0]

Подскажите пожалуйста как можно найти количество символов от начала текста, до начала текущей строки? Как только включаешь цикл выдает Access violation и выкидывает, может есть какая-нибудь функция?

← →
TUser © (2004-02-29 12:55) [1]

Циклом и надо обойти все строки. Приведи код твоего цикла. перед этим проверь правильность индексов.

← →
Lexer © (2004-02-29 13:42) [2]

Зачем нужен цикл?

lb1.Caption := IntToStr(rxEdit.SelStart - rxEdit.CaretPos.y);

← →
Defunct © (2004-02-29 13:45) [3]

Lexer © (29.02.04 13:42) [2]
Ну и что это будет? Сами смотрели?

← →
Lexer © (2004-02-29 13:48) [4]

Ну смотрел, и что... подсчитываюся все символы перед курсором, при этом не считаются #13

← →
Lexer © (2004-02-29 13:51) [5]

Если до начала текущей строки то
- rxEdit.CaretPos.x

← →
Defunct © (2004-02-29 13:54) [6]

Вообще-то SelStart может быть где угодно, и в начале строки, и в середине и в конце. У Вас там кое-чего не хватает. А кроме перевода строки #13 есть еще символ возврата коретки #10 и нем Вы пдумали?

← →
Defunct © (2004-02-29 13:56) [7]

lb1.Caption := IntToStr(rxEdit.SelStart - rxEdit.CaretPos.y *2 - rxEdit.CaretPos.X);

> Defunct © (29.02.04 13:56) [7]
> lb1.Caption := IntToStr(rxEdit.SelStart - rxEdit.CaretPos.y*2
> - rxEdit.CaretPos.X);

это шутка?

Это в стиле Ваше ответа: [2]

> Ну смотрел, и что... подсчитываюся все символы перед курсором, при этом не считаются #13
Ясное дело, что там CaretPos.Y вообще не имеет смысла, но раз уж вы отбрасываете спец. символы, то отбрасывайте уже все, а не только #13.

В общем начало текущей строки:
RichEdit.SelStart - RichEdit.CaretPos.X

Defunct: всё, но как быть с селектом?

Позиция каретки в RichEdit Найти похожие ветки