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

Переход по TEdit - ам с помощью Enter   Найти похожие ветки 

← →
AlexFe   (2004-07-23 12:32) [0]

На форме множество Edit как правильно переходить по ним при нажатии Enter .(желательно только по тем которые могут быть в фокусе) Обрабатывать KeyPress каждого эдита как-то
неприлично.

---

← →
Reindeer Moss Eater ©   (2004-07-23 12:34) [1]

Обрабатывать KeyPress каждого эдита как-то
неприлично.

Обрабатывай у формы на которой они лежат.

---

← →
Jeer ©   (2004-07-23 12:35) [2]

Расширить возможности TEdit, создав потомок с нужной функциональностью.

---

← →
AlexFe   (2004-07-23 12:35) [3]

Каким образом?

---

← →
Reindeer Moss Eater ©   (2004-07-23 12:36) [4]

Каким образом?

Ты хочешь сам написать, или просто не знаешь, что на сайте есть статьи, поиск и faq?

---

← →
AlexFe   (2004-07-23 12:38) [5]

Как указать следующий едит? и предыдущий.
Я понимаю что это скорее всего просто но
пока сие мне не дано.

---

← →
Jeer ©   (2004-07-23 12:39) [6]

Из RX

procedure TCurrencyEdit.KeyPress(var Key: Char);
var
  MYForm: TCustomForm;
begin
if EntAsTab then
 begin
   if Key = #13 then
   begin
     MYForm := GetParentForm( Self );
     if not (MYForm = nil ) then
       SendMessage(MYForm.Handle, WM_NEXTDLGCTL, 0, 0);
     Key := #0;
   end;  
end;
if Key <> #0 then inherited KeyPress(Key);
end;  { TCurrencyEdit.KeyPress }

---

← →
AlexFe   (2004-07-23 12:41) [7]

Jeer
Большое спасибо, обязательно попробую.

---

← →
Anatoly Podgoretsky ©   (2004-07-23 13:00) [8]

Переходить по TEdit - ам с помощью Enter неприлично, хоть и можно.

---

← →
AlexFe   (2004-07-23 13:06) [9]

Anatoly Podgoretsky
Не смешно если эдитов приблизительно 40 штук
получается очень некрасиво.

---

← →
Mim1 ©   (2004-07-23 13:36) [10]

> [9] AlexFe   (23.07.04 13:06)

А какое отношение имеет красота к количеству эдиток в контексте этого овпроса?
Хотя 40 эдитов на форме действительно некрасиво.

---

← →
Rem   (2004-07-23 14:09) [11]

Бухгалтера - очень неприличные люди. Когда смотришь, как у них рука к Enter"у тянется, возникает ощущение, что у всех них богатейший опыт работы в DOS"е.

Tab - на то и Tab, чтобы ходить между контролами. Это встроенная функция Windows.

Переучивать надо таких пользователей, а не подстраиваться под них!

---

← →
AlexFe   (2004-07-23 14:28) [12]

Mim1 >
Иметтся в виду количество обработчиков KeyPress каждого Edita.
Rem >
Насчет переучивания, так это для свох делается(почти угадал на счет  Бухгалтеров)

---

← →
s999   (2004-07-23 14:45) [13]

Обрабатывай KeyDown формы при (КеуPreview = True)

Посмотри:
 TWinControl.FindNextControl(CurControl: TWinControl;   GoForward, CheckTabStop, CheckParent: Boolean): TWinControl;

To Rem:
 Не все же левши, как ты и Билл Гейтс.

---

← →
vecna ©   (2004-07-23 16:57) [14]

вообще, enter по идее должен быть аналогом клика по кнопке ок, так же как esc - по кнопке cancel, так же как пререход - tab"ом. это стандарт!

---

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

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



Память: 0.48 MB
Время: -0.933 c