Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.05;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.058 c
3-1099647796
alsov1
2004-11-05 12:43
2004.12.05
Помогите запихнуть иерархию в TTreeView


4-1098273354
Александр В.
2004-10-20 15:55
2004.12.05
Програмное закрытие модального окна (диалог)


14-1100515598
AlexG
2004-11-15 13:46
2004.12.05
Что за Delphi 2005


3-1099504527
AUS_r4nd0m
2004-11-03 20:55
2004.12.05
Проблема с триггером


14-1100677558
by
2004-11-17 10:45
2004.12.05
Я бы в архитекторы/проектировщики ПО пошел, пусть меня научат.