Форум: "Основная";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];
ВнизEnter вместо Tab Найти похожие ветки
← →
AlexBut (2003-05-27 07:53) [0]Здравствуйте! Вопросик в следующем: есть ли в Delphi какая-нибудь опция, чтобы перемещаться между полями в форме при помощи Enter, а не Tab? Пользователи, которые работают с 1С и ACCESS меня уже достали этим вопросом. Или мне придется обрабатывать нажатие Enter для каждого поля каждой формы (В этом случае с катушек можно съехать)!!!
← →
Arch-vile (2003-05-27 08:04) [1]нет, надо поставить свойство KeyPreview у формы в True, а там и обрабатывать это нажатие. ИМХО, обрабатывать лучше в OnKeyDown.
код Ентера - vk_enter
← →
Lord Warlock (2003-05-27 08:10) [2]
> AlexBut (27.05.03 07:53)
http://delphimaster.net/view/1-1053578338/
> Arch-vile © (27.05.03 08:04)
код - VK_RETURN :)
← →
Arch-vile (2003-05-27 08:56) [3]и точно :) это уже пятый раз так. написал в коде - не компилится. :( что ж такое? лезем в справку. АЙ %?*%:*, это же не то! исправим. компилится
← →
Till (2003-05-27 12:52) [4]Сделаю свойство Keypreview в True и обработчике OnKeyPress создай такой код
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
//Переходим к следующему элементу при нажатиии Enter
if (Key = #13) then
begin
Key:=#0;
Perform(WM_NEXTDLGCTL,0,0);
end;
end;
Удачи!
← →
SergeyKatruk (2003-05-27 20:33) [5]
Ставиш у формы KeyPreview=True, и в обработчике OnKeyPress пишеш:
If Key=#13 then
begin
Key:=#0;
SelectNext(ActiveControl,True,True)
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c