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

Добраться до компонента перебором Components   Найти похожие ветки 

← →
timekiller   (2007-11-03 22:02) [0]

Вот код события Edit1.OnChange

   for cmpn:=ComponentCount-1 downto 0 do
   if Length(TEdit(cmpn).Text)=TEdit(cmpn).MaxLength then TEdit(cmpn+1).SetFocus;

Требуется при наборе текста в Edit проверить - если Edit наполнен доверху (Length=MaxLength) то следует перейти к следующему Edit

Всевремя выбрасывает ошибку недоступности памяти .. зачемто ..!!!!!!???!??!??????? !!! HELP

---

← →
Anatoly Podgoretsky ©   (2007-11-03 22:06) [1]

> timekiller  (03.11.2007 22:02:00)  [0]

А с чего ты решил, что cmpn это TEdit

---

← →
KilkennyCat   (2007-11-03 22:07) [2]

а если следующего нету?
и ваще, где логика? цикл в одну сторону, следующий компоент  - в другую, а выхода ваще нет...

---

← →
timekiller   (2007-11-03 22:13) [3]

> А с чего ты решил, что cmpn это TEdit

сделал проверку is TEdit = всеравно та же ошибка

> а если следующего нету?

Следующий после НАПОЛНЕННОГО точно есть

> и ваще, где логика? цикл в одну сторону, следующий компоент  - в другую, а выхода ваще нет...

чтобы не выйти за массив - мне посоветовали downto, знач по логике ниче страшного если добираться с конца и переходить на следующий

---

← →
Anatoly Podgoretsky ©   (2007-11-03 22:14) [4]

> timekiller  (03.11.2007 22:13:03)  [3]

> А с чего ты решил, что cmpn это TEdit

А с чего ты решил, что cmpn это TEdit

---

← →
timekiller   (2007-11-03 22:15) [5]

[3]

---

← →
Плохиш ©   (2007-11-03 22:33) [6]

> timekiller   (03.11.07 22:15) [5]

Твой маразм из [0] компилятор не пропустит.

> timekiller   (03.11.07 22:13) [3]
> чтобы не выйти за массив - мне посоветовали downto, знач
> по логике ниче страшного если добираться с конца и переходить
> на следующий

Оригинально, встать на последнюю ступеньку и шагнуть на следующую. Не боишься, что падать больно будет?

---

← →
timekiller   (2007-11-03 22:37) [7]

Удалено модератором
Примечание: Твое мнение о нация никого тут не интересует

---

← →
korneley ©   (2007-11-03 22:43) [8]

>  если Edit наполнен доверху (Length=MaxLength) то следует
> перейти к следующему Edit
Ну, ты сам знаешь что там утебя накидано...
if <Edit наполнен доверху> then Следующий_Edit.SetFocus (?)

---

← →
KilkennyCat   (2007-11-03 22:45) [9]

> опять все в мире мастерее, но только не тут чтоли = )) бгаааа
> = )))))))))) одни евреи, ммматерь божья .......


я бы не советовал делать такие философские выводы, не решив столь примитивную задачу, и даже не поняв, где ошибка...

---

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

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



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