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

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 вся ветка

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



Память: 0.46 MB
Время: 0.017 c