Скачать: CL | DM;

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

← →
Леха   (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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c