Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Добраться до компонента перебором Components [D6]


timekiller ©   (2007-11-03 22:02:00) 

Вот код события 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


KilkennyCat   (2007-11-03 22:45:00) [1]


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


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


korneley   (2007-11-03 22:43:00) [2]


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


timekiller   (2007-11-03 22:37:00) [3]

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


Плохиш   (2007-11-03 22:33:00) [4]


> timekiller   (03.11.07 22:15) [5]

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

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

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


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

[3]


Anatoly Podgoretsky   (2007-11-03 22:14:00) [6]

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

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

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


timekiller   (2007-11-03 22:13:00) [7]

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

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

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

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

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

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


KilkennyCat   (2007-11-03 22:07:00) [8]

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


Anatoly Podgoretsky   (2007-11-03 22:06:00) [9]

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо