Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Перемещение курсора на нужный компонент по порядку

Автор: staziah2 4.5.2015, 12:42

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

Автор: 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;

Автор: staziah2 4.5.2015, 13:25

Цитата(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