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

Вниз

Перебрать все элементы множества   Найти похожие ветки 

 
Basilio ©   (2004-03-30 15:40) [0]

жаль, нелья так:

for each Elem in MySet do Func(Elem);

Я пока вижу только такую альтернативу:

type
TElem=(...)
TSet = set of TElem;
var
MySet: TSet;
Elem: TElem;
begin
MySet=...;
for Elem:=Low(TElem) to High(TElem) do
if Elem in MySet then Func(Elem)
end;

Что-нибудь более красивое можно придумать?


 
Юрий Зотов ©   (2004-03-30 15:45) [1]

Куда ж еще-то красивее?


 
Digitman ©   (2004-03-30 16:04) [2]


> жаль, нелья так:
>
> for each Elem in MySet do Func(Elem);


с чего ты взял, что конструкция "each Elem" якобы будет отфильтровывать только присутствующие эл-ты мн-ва ? или это выдуманный тобой "красивый" псевдокод ?


 
sVic   (2004-03-30 16:11) [3]

> for each Elem in MySet do Func(Elem);
Сдается мне это код VBA (или VB) :)


 
Digitman ©   (2004-03-30 16:15) [4]

угу.. Васиком попахивает
только ведь в Васике конструкция for each..in совершенно не относится к работе с множествами - это работа со списками-коллекциями объектов


 
Defunct ©   (2004-03-30 19:46) [5]

Отказаться от множеств и сделать дин. массив.



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

Текущий архив: 2004.04.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
11-1062264763
BelchonokH
2003-08-30 21:32
2004.04.18
ActiveX (DHTML), ICS (WSocket) установка


14-1079710412
Orion2
2004-03-19 18:33
2004.04.18
Зацените рассказик


4-1076482136
Li_
2004-02-11 09:48
2004.04.18
Как узнать ID процесса по его handle?


1-1080586827
Gero
2004-03-29 23:00
2004.04.18
DragAndDrop в TTreeView


1-1080654121
IceMaster
2004-03-30 17:42
2004.04.18
Окно "О программе..."