Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];

Вниз

Не работает код заменящий переход с Таба на Ентер   Найти похожие ветки 

← →
Леха   (2005-06-01 14:27) [0]

procedure TPribor_Form.FormKeyPress(Sender: TObject; var Key: Char);
begin
 if (Key = #13) then
   begin
     Key:=#0;  Perform(WM_NEXTDLGCTL,0,0);
   end;
end;

Не работает, как мне кажется, это по тому, что у меня все Edit"ы находятся в GroupBox
А как тогда быть? Подскажите?

---

← →
Fay ©   (2005-06-01 14:30) [1]

KeyPreview?

---

← →
Леха   (2005-06-01 14:32) [2]

Не понял?

---

← →
_dimka   (2005-06-01 14:33) [3]

На форме свойство KeyPreview:=true поставь.

---

← →
Леха   (2005-06-01 14:50) [4]

Извените. Согласен со всеми вашими высказываниями в мой адрес. Все работает.
Огромное спасибо.

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.06.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.042 c