Загрузить индексы объектов из массива
function LoadFromArray(pa: PArrayInteger; flClear: boolean): integer;
pa
flClear