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

← →
Леха (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]

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

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