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

KeyPress   Найти похожие ветки 

← →
MIXER   (2006-01-26 14:31) [0]

Мастера подскажите почему с Edit1 прыгает сразу на Edit3 без остановки нa Edit2
    Edit1: TEdit;
Edit2: TEdit;
   Edit3: TEdit;
procedure AllEditsKeyPress(Sender: TObject; var Key: Char);
procedure FormCreate(Sender: TObject);

procedure TForm1.AllEditsKeyPress(Sender: TObject; var Key: Char);
begin
if Key =#13 then
begin
Form1.SelectNext(Sender as TWinControl,True,True);
Key :=#0;
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Edit1.OnKeyPress :=AllEditsKeyPress;
Edit2.OnKeyPress :=AllEditsKeyPress;
Edit3.OnKeyPress :=AllEditsKeyPress;

---

← →
stone ©   (2006-01-26 14:34) [1]

Смотри TabOrder

---

← →
DenXi ©   (2006-01-26 14:41) [2]

во-во....  какой порядок в TabOrder, в таком порядке и перескакивает

---

← →
MIXER   (2006-01-26 14:51) [3]

Edit1  0
  Edit2  1           в TabOrder
   Edit3  2

---

← →
MIXER   (2006-01-26 18:08) [4]

и всё же есть ли у кого-нибудь идеи?

---

← →
EvS   (2006-01-26 18:12) [5]

Посмотри справку по SelectNext, там про TabStop кажется какое-то условие было.

---

← →
MIXER   (2006-01-26 18:28) [6]

в TabStop все True.может другую инструкцию попробывать?

---

← →
Плохиш ©   (2006-01-26 18:57) [7]

Нас опять разводят на телепаторы :-(
Сделал форму, кинул 3 едита, скопировал код из [0] - всё работает.
Ищи ошибку в 17й строке.

---

← →
ЮЮ ©   (2006-01-27 03:28) [8]

А они все одного и того же Parent-а имеют? Может 1 и 3 лежат на одном, а 2-й на другом?

---

← →
ASoft   (2006-01-27 04:17) [9]

to MIXER:
мож это подойдет: http://delphimaster.net/view/2-1137328158/

---

← →
Джо ©   (2006-01-27 06:24) [10]

> [7] Плохиш ©   (26.01.06 18:57)
> Нас опять разводят на телепаторы :-(

А не привыкать! ;)

---

← →
MIXER   (2006-01-27 10:50) [11]

в том и базар что все едиты лежат рядом (parent)
Asoftу-"ветка не найдена"

---

← →
ЮЮ ©   (2006-01-27 10:58) [12]

> в том и базар что все едиты лежат рядом (parent)

Почему-то этому довнрия больше:

> Плохиш ©   (26.01.06 18:57) [7]

---

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

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



Память: 0.47 MB
Время: 0.025 c