Добраться до компонента перебором 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]

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

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

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

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

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

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