Функция FindItem |
Функция ищет первый элемент в массиве, значение которого совпадает с указанным.
function FindItem(var mass : array of anyType; element : anyType) : longInt;
mass - имя массива.
element - значение искомого элемента массива.
Если элемент не найден, возвращает -1. Если найден, возвращает его индекс.
Пусть есть:
type MyRecord = record a : integer; b : integer; end; var a : array [3..12] of byte; b : comp; mr1 : MyRecord; a[7] := 9; b := 9;
Тогда:
FindItem(a, b) : вернет 7 FindItem(a, '9') : вернет 7 FindItem(a, mr1) : выдаст сообщение об ошибке
Атлантис 5.3.05