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

Здраствуйте. Переход по контролам на форме.   Найти похожие ветки 

← →
oleon   (2002-12-17 12:49) [0]

Как написать код, чтобы при нажатии на стрелки вверх и вниз курсор перескакивал по контрола на форме(вметос того чтобы Tab жать?). Подскажите, пожалуйста.

---

← →
Song ©   (2002-12-17 12:53) [1]

TForm.onKeyDown+TForm.Preeview+TForm.ActiveControl

---

← →
oleon   (2002-12-17 13:06) [2]

чтобы он в том порядке, который в TabOrder прописан

---

← →
oleon   (2002-12-17 13:08) [3]

может у кого уже есть код готовый, чтобы мне не сочинять?
скажу большое спасибо!

---

← →
Song ©   (2002-12-17 13:15) [4]

Можно просто SelectNext()

---

← →
oleon   (2002-12-17 13:54) [5]

спасибо... это круто...

---

← →
oleon   (2002-12-17 14:33) [6]

написал на KeyDown Для каждого контрола

if (ord(key)=13) then
SelectNext(ActiveControl, True, True);

if (ord(key)=40) then
SelectNext(ActiveControl, True, True);

if (ord(key)=38) then
SelectNext(ActiveControl, False, True);

и вот когда активный контрол RXCurrency, то по Enter он перескакивает, а по стрелке вниз не перескакивает...
на Tedit все работает нормально

---

← →
oleon   (2002-12-17 14:59) [7]

проблема решена своими силами... спасибо

---

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

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



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