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

Вниз

как переделать стандартный переход между контролами   Найти похожие ветки 

← →
BubbleGum   (2003-01-21 16:23) [0]

не подскажите как переделать стандартный переход между контролами с Таб на Энтэр ?

---

← →
Романов Р.В.   (2003-01-21 16:28) [1]

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;

---

← →
Skier   (2003-01-21 16:28) [2]

>BubbleGum
1) перекрой для формы реакцию на сообщение CM_DIALOGKEY
2) поставь TForm.KeyPreview := True;
3) напиши реакцию на Enter (код можешь взять из обработки
VT_TAB в методе TCustomForm.CMDialogKey)

---

← →
REA   (2003-01-21 16:28) [3]

На форме KeyPreview и на Enter посылать Tab в активный контрол например.

---

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

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

Наверх

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