Текущий архив: 2003.11.13;
Скачать: CL | DM;
Вниз
Табуляция по клавише Enter Найти похожие ветки
← →
Delph © (2003-11-04 16:45) [0]На форме есть с десяток Edit - ов. Необходимо чтобы фокус ввода перескакивал по ним клавишей Enter (как Tab).
Кто чем может помочь?
← →
ZEE © (2003-11-04 16:52) [1]В OnKeyPress у Edit"ов
if key=#13 then
begin
Edit2.SetFocus;
key:=#0;
end;
//вместо Edit2 - поставить нужный...
← →
Sandman25 © (2003-11-04 16:52) [2]OnKeyDown
if Key = VK_RETURN then
Perform(WM_NEXTDLGCTL,0,0);
← →
Song © (2003-11-04 16:54) [3]SelectNext() на onKeyDown формы. Не забудь у последней выставить KeyPreview
← →
zapped © (2003-11-04 17:06) [4]2 ZEE © (04.11.03 16:52) [1]
и что, прикажете каждому TEdit писать свой обработчик? ;)
← →
Delph © (2003-11-04 17:07) [5]>Song © (04.11.03 16:54) [3]
>SelectNext() на onKeyDown формы. Не забудь у последней >выставить KeyPreview
Спасибо, но несовсем ясно, что подставлять в качестве CurControl?
(Есть: Form1, Edit1...Edit212 )
← →
Sandman25 © (2003-11-04 17:09) [6]> Спасибо, но несовсем ясно, что подставлять в качестве CurControl?
ActiveControl
← →
Delph © (2003-11-04 17:21) [7]Заработало.
if (Key=13) then SelectNext(ActiveControl,true,true);
Всем большое спасибо.
Страницы: 1 вся ветка
Текущий архив: 2003.11.13;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.044 c
