Здесь видимо нужно передавать в функцию не массив, а его размерность
Код:
function IndexInArray(Index, lw, hg: integer) : boolean;
begin
Result := (Index >= lw) and (Index <= hg);
end;
пример вызова
Код:
if IndexInArray(3, Low(ABC), High(ABC)) then ...