VPF::Перемещение курсора на нужный компонент по порядку

staziah2

Дата 4.5.2015, 12:42 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 22
Регистрация: 24.3.2015

Репутация: нет
Всего: нет

Добрый день! Подскажите пожалуйста, что нужно прописать,чтобы не мышкой кликать на нужный компонент,зная порядки TabOrder-а, а клавишей Enter.
Например: с "Тип документа" при нажатии клавиши Enter, курсор перешел на "Цех". То бишь,не мышкой двигать,и не пользоваться клавишей Tab. Компоненты: Edit, два wwDBLookup-a. Delphi 7.

Poseidon

Дата 4.5.2015, 13:03 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133

Установи в OnKeyPress для каждого нужного контрола этот обработчик:

Код


procedure TForm1.KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
    SelectNext(Screen.ActiveControl, True, True);
end;

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

staziah2

Дата 4.5.2015, 13:25 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 22
Регистрация: 24.3.2015

Репутация: нет
Всего: нет

Цитата(Poseidon @ 4.5.2015, 13:03)

Установи в OnKeyPress для каждого нужного контрола этот обработчик:

Код


procedure TForm1.KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
    SelectNext(Screen.ActiveControl, True, True);
end;

Спасибо огромное smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »