Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.05;
Скачать: [xml.tar.bz2];

Вниз

for i:=0 to ScrollBox1.ControlCount-1   Найти похожие ветки 

 
denis24   (2004-11-23 11:08) [0]

Подскажите пожалуста
почему когда в scrollbox1 нет ни одного контрола  внутрь цикла всеравно заходит и соотв ошибка?
Пишу так
for i:=0 to ScrollBox3.ControlCount-1 do
      if (ScrollBox3.Controls[i] is TPanel) then....


 
Skyle ©   (2004-11-23 11:12) [1]

А может не там ошибка?


 
Reindeer Moss Eater ©   (2004-11-23 11:12) [2]

почему когда в scrollbox1 нет ни одного контрола  

Потому что в ScrollBox3 есть контролы


 
MBo ©   (2004-11-23 11:14) [3]

Телепатия - измени тип i с беззнакового типа на Integer


 
Reindeer Moss Eater ©   (2004-11-23 11:17) [4]

Телекинез - организуя цикл по контролам сколбокса один, не используй индекс цикла для обращения к контролам скролбокса три


 
Jay   (2004-11-23 11:21) [5]

В цикле for i := 0 to 0 do всё же будет один виток, сделай типа for i := 1 to 0 do


 
Reindeer Moss Eater ©   (2004-11-23 11:23) [6]

Если цикл получился for i := 0 to 0 , то это значит, что есть один котрол и он имеет индекс 0.


 
Jay   (2004-11-23 11:27) [7]

Я имею в виду, что в написаном в вопросе цикле будет один виток, даже если нету контролов, ну и соответственно ошибка


 
Jay   (2004-11-23 11:30) [8]

Поставь в начале
if ScrollBox3.ControlCount <> 0 then
...


 
TUser ©   (2004-11-23 11:33) [9]


> Я имею в виду, что в написаном в вопросе цикле будет один
> виток, даже если нету контролов

Не будет там витка без контролов - это for i:=0 to -1


 
MBo ©   (2004-11-23 11:34) [10]

>Jay   (23.11.04 11:27) [7]
Ты неправ


 
denis24   (2004-11-23 11:40) [11]

поставил i:integer
и все
СПАСИБО!


 
Jay   (2004-11-23 11:41) [12]

Может и не прав, а что если переменная цикла, например, Byte?



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

Форум: "Основная";
Текущий архив: 2004.12.05;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.045 c
1-1101141368
Chery
2004-11-22 19:36
2004.12.05
Как отключить всех пользователей кроме себя от сервера прилож.?


3-1099989419
Uran
2004-11-09 11:36
2004.12.05
Создание dbf в runtime


1-1100942677
Magic_STI
2004-11-20 12:24
2004.12.05
Перевод HTML в RTF


4-1098514305
navyk
2004-10-23 10:51
2004.12.05
Использование мьютексов


14-1100507542
Гайцы-Газазад
2004-11-15 11:32
2004.12.05
Украина - Турция. 17 ноября 2004 года.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский