|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
13.03.2011, 22:58 | #1 |
Регистрация: 13.03.2011
Сообщений: 5
|
Номер символа, после которого находится курсор. Delphi
Программа должна отображать номер символа, после которого находится курсор! Интерфейс программы я сделал! Имеется окно редактирования(TEdit) в котором и будет бегать курсор по тексту и окно (label) в котором должен отображаться номер символа! Подскажите какое свойство нужно использовать???
|
14.03.2011, 00:02 | #2 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
Свойство SelStart (типа Integer) определяет порядковый номер символа, перед которым находится курсор. Отсчёт идёт от нуля;
Mess with the best, die like the rest. (с) Hackers
Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
14.03.2011, 01:13 | #3 |
Регистрация: 13.03.2011
Сообщений: 5
|
|
14.03.2011, 01:52 | #4 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
Как-то так по-моему
Код:
Mess with the best, die like the rest. (с) Hackers
Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
17.03.2011, 12:22 | #5 |
Регистрация: 13.03.2011
Сообщений: 5
|
Спасибо! Подскажите еще как прописать процедуру OnKeyPress для Edit чтобы она реагировала на нажатие клавиш VK_RIGHT и VK_LEFT и выводила информацию в label?
|
17.03.2011, 12:27 | #6 | |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
Цитата:
Mess with the best, die like the rest. (с) Hackers
Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
|
17.03.2011, 12:33 | #7 |
Регистрация: 13.03.2011
Сообщений: 5
|
label1.caption := IntToStr(edit1.selstart); номер символа перед курсором!
Ну вот например для мышки я использовал: procedure TKursor.txtTClick(Sender: TObject); begin label2.caption := IntToStr(txtT.selstart); end; А вот для OnKeyPress это не работает! |
17.03.2011, 12:53 | #8 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
Пишите в OnKeyDown
Код:
Mess with the best, die like the rest. (с) Hackers
Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
28.03.2011, 10:53 | #9 |
Регистрация: 13.03.2011
Сообщений: 5
|
Спасибо большое!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
listbox над каким элементов находится курсор | Gumer | Компоненты Delphi | 3 | 13.04.2010 19:08 |
вычеркнуть строку и столбец на пересечении которого находится максимальный элемент | Amalia | Общие вопросы Delphi | 2 | 03.04.2010 08:01 |
StrinGrid( выделялась ячейка над которым находится курсор) | StartMis | Общие вопросы Delphi | 1 | 29.03.2010 01:53 |
Транспонировать квадрат,в нижнем левом углу которого находится минимальный элемент | zidan671 | Помощь студентам | 14 | 13.03.2009 22:05 |
Как узнать в Делфи координаты в котором находится курсор мыши? | SVS | Win Api | 3 | 08.02.2007 13:34 |