Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как сделать, чтобы курсор постоянно отображался в TEdit, TMemo [D5]

boa © (2002-03-19 06:54:00)
Существует ТEdit(или ТMemo) в котором описывается некоторое уравнение. Также есть TListBox в котором находится список переменных, функций, и т.п. которые могут присутствовать в уравнении.
Задача состоит в том, что бы при выборе записи в TListBox, ее содержимое добавлялось в TEdit, в позицию, где находится курсор. Но при активизации TListBox естественно TEdit теряет фокус и курсор в нем не отображаетя.
Вопрос: как в данной ситуации добиться, чтобы курсор постоянно отображался в TEdit?

boa (2002-03-19 11:21:00) [1]
Да, совсем забыл - Всем спасибо!

P.S.
Но если еще у кого возникнут идеи - будо очень признателен.

boa (2002-03-19 11:18:00) [2]
>Slonic
Проблемма не в нахождении позиции каретки в Edit, а хотелась бы видеть, при выборе записи ListBox"а, в какую прзицию строки Edit"a будет вставлена выбранная запись (уравнение длинное).
Я нахожу рациональным предложение MBo, и наверно так и сделаю.

Slonic (2002-03-19 10:42:00) [3]
на самом деле все очень просто те все гораздо проще, те проще некуда :)) edit1.selstart это и есть позиция каретки, держать едит постоянно активным вовсе не обязательно :))
можно эпизодически ему делать setfocus

boa (2002-03-19 08:51:00) [4]
В таком случае вопросов больше нет!

MBo (2002-03-19 08:48:00) [5]
а ты коварный ;)
так нельзя
в качестве альтернативы могу предложить, когда Edit1 теряет фокус (onExit) вставлять имитацию | и убирать при получении фокуса или использовании текста

panov (2002-03-19 08:47:00) [6]
>boa © (19.03.02 08:39)
Курсор показывается на том элементе, который текущий(активный) в данный момент.
И понятие это - операционной системы.

Так что забудь про то, что написал.

boa (2002-03-19 08:39:00) [7]
Это все не катит. Нужно, чтобы я перешел на TListBox, а курсор не исчезал из TEdit!

MBo (2002-03-19 07:45:00) [8]
в нужных местах
ActiveControl:=Edit1;

ghost_by (2002-03-19 07:43:00) [9]
чтобы курсор постоянно отображался в TEdit- обрабатываешь у ListBox событие OnClick, делаешь что нужно, а потом передаешь фокус на свой TEdit -> TEdit.SetFocus.

добавлялось в TEdit, в позицию, где находится курсор- у TEdit"a есть свойство - SelStart - его и юзай для определения позиции курсора.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »