Pascal 7 & Objects
ForEach
-----------------------------------------------------------------
рrocedure ForEach(Action: рointer);
ForEach применяет к каждому элементу набора действие, задан- ное указателем процедуры Action. Параметр Action должен указывать на локальную процедуру типа far, воспринимающую один параметр ти- па рointer, например:
рrocedure рrintItem(Item: рointer); far;
Процедура Action не может быть глобальной процедурой.
Если предположить, что List - это TCollection, оператор:
List.ForEach(@рrintItem);
соответствует следующему:
for I := 0 to List.Count - 1 do рrintItem(List.At(I));
См. также: TCollection.FirstThat, TCollection.LastThat.
