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

Обойти все Control ы на форме   Найти похожие ветки 

← →
qwerty2   (2003-01-07 16:56) [0]

следуя номеру в TabOrder. То есть нужно чтоб переход осуществлялся не только по нажатию клавиши табуляции но и Enter например. Для каждого Controla писать свою процедуру обработки нажатия клавиши не хочется. Можно ли посылать сообщением нажатие клавиши Tab?

---

← →
Song ©   (2003-01-07 16:59) [1]

TForm.KeyPreview+TForm.onKeyDown+SelectNext()

---

← →
TTCustomDelphiMaster ©   (2003-01-07 17:00) [2]

procedure TCargoForm.edVolMassKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_RETURN then
begin
Key := 0;
Perform(WM_NEXTDLGCTL, 0, 0);
end;
end;

---

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

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



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