|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
01.08.2008, 12:38 | #1 |
Пользователь
Регистрация: 23.06.2008
Сообщений: 86
|
RichEdit
Как програмно выделить нужную (по номеру) строку в RichEdit?
|
01.08.2008, 13:01 | #2 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Например так:
Цитата:
I'm learning to live...
|
|
01.08.2008, 13:56 | #3 |
Пользователь
Регистрация: 23.06.2008
Сообщений: 86
|
Спасибо, я попробую.
|
01.08.2008, 16:11 | #4 |
Пользователь
Регистрация: 23.06.2008
Сообщений: 86
|
Пожалуйста, объяните смысл этих строк.
copy(RichEdit1.Lines.Text,i,1)=#13 length(RichEdit1.Lines.Text |
03.08.2008, 22:15 | #5 |
Пользователь
Регистрация: 14.07.2007
Сообщений: 40
|
Код:
k - это кол-во строк от начала файла до строки которую необходимо подсветить. i - текущий символ в RichEdit`е. Если этот текущий символ равен #13, то есть невидимому символу конца строки, то мы уменьшаем кол-во строк до необходимой строки на один (dec(k)). Когда k будет равно 0 мы будем знать, что достигли искомой строки. Но может случиться ситуация, когда строк в файл будет меньше чем указано. Вот на это случай и нужна вторая функция length(RichEdit1.Lines.Text). Она вернет нам номер последнего символа в файле. И если текущей символ равен последнему, то цикл закончится.
Котэ покарает тебя, %username%!
|
03.08.2008, 22:58 | #6 |
Пользователь
Регистрация: 14.07.2007
Сообщений: 40
|
Я тут нашел способ полегче:
Код:
Котэ покарает тебя, %username%!
Последний раз редактировалось Longedok; 03.08.2008 в 23:00. |
04.08.2008, 10:18 | #7 |
Пользователь
Регистрация: 23.06.2008
Сообщений: 86
|
Большое спасибо за разъяснение. У меня не выделялся текст потому, что нужно еще HideSelection:=false
Я хочу уточнить - чтобы получить номер символа в тексте обязательно использовать Copy? |
04.08.2008, 10:54 | #8 | |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,579
|
Цитата:
Код:
Код:
E-Mail: arigato.freelance@gmail.com
|
|
04.08.2008, 14:33 | #9 |
Пользователь
Регистрация: 23.06.2008
Сообщений: 86
|
Arigato, спасибо.
|
04.08.2008, 17:26 | #10 | |
Пользователь
Регистрация: 23.06.2008
Сообщений: 86
|
Цитата:
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
RichEdit | Killbrum | Помощь студентам | 3 | 12.06.2008 22:41 |
RichEdit | StartMis | Общие вопросы Delphi | 20 | 24.04.2008 15:40 |
RichEdit | nimf | Общие вопросы Delphi | 8 | 23.04.2008 07:55 |
RichEdit и *.gif | Teen4jump | Общие вопросы Delphi | 2 | 03.04.2008 10:10 |
RichEdit | Римма | Компоненты Delphi | 3 | 23.01.2008 14:33 |