function IndexInArray(Index : integer; ABC :array of Variant) : boolean;
Я не понял Вашего вопроса, но всё же Вам на него отвечу!