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

Вниз

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

 
noob ©   (2004-11-19 02:22) [0]

как перебрать все елеметы масива ... другими словами как сделать так чтоб цикл выполнялся столько раз сколько елементов в массиве


 
Тестировщица ©   (2004-11-19 02:40) [1]

var Massiv:array[начюиндекс..кон.индекс] of что-то;

....

var i:integer;
for i:=Low(Massiv) to High(Massiv) do
begin
// что-то делаем с Massiv[i]
end;


 
noob ©   (2004-11-19 02:54) [2]

нет я имелл введу чуть не то .. вот например массив от 1 до 100 елементов ... а заполнено всего а зополнено всего 85 так мне нужно чтоб цыкл выполнился не 100 раз а 85


 
SergP ©   (2004-11-19 03:22) [3]


>  [2] noob ©   (19.11.04 02:54)


Расшифруй сначала что ты понимаешь под словом "зополнено".
массив есть массив. Если было объявлено (либо установлено) что там 100 элементов, то значит их там 100 и есть и все они существуют.


 
Тестировщица ©   (2004-11-19 03:40) [4]

В принципе, если массив заполняется подряд, начиная с первого элемента, и все элементы массива предварительно проинициализированы каким-то значением, означающим "не заполнено", то можно сделать примерно так:
i:=Low(Massiv);
while Massiv[i]<> "не заполнено" do
begin
// что-то делаем
inc(i); //i:=i+1
end;


 
Тестировщица ©   (2004-11-19 03:44) [5]

Поправка:
i:=Low(Massiv);
while (i<=High(Massiv))and(Massiv[i]<> "не заполнено") do
begin
// что-то делаем
inc(i); //i:=i+1
end;


 
***SPIDER***   (2004-11-19 08:27) [6]

Можно запоминать количество заполненных элементов, например в нулевом элементе MASSIV[0].


 
Anatoly Podgoretsky ©   (2004-11-19 08:41) [7]

noob ©   (19.11.04 02:54) [2]
for i:=1 to 85 do


 
КаПиБаРа ©   (2004-11-19 08:43) [8]

Храни количество заполненных элементов в отдельной переменной


 
Fay ©   (2004-11-19 08:44) [9]

2 Anatoly Podgoretsky ©   (19.11.04 08:41) [7]
8)



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

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

Наверх





Память: 0.46 MB
Время: 0.056 c
6-1096396967
Наташа
2004-09-28 22:42
2004.12.05
Какой самый быстрый способ скачивания файлов?


6-1096052283
ildar_kh
2004-09-24 22:58
2004.12.05
Отладчик РНР


9-1088438773
Evgeniy_K
2004-06-28 20:06
2004.12.05
VSync


1-1100723377
Intr
2004-11-17 23:29
2004.12.05
присвоить ImageIndex к пункту меню во время выполнения программы.


1-1100706304
Apophis
2004-11-17 18:45
2004.12.05
PageControl на Form1 + Form2 на TabSheet...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский