Найти ключ первого объекта
function First(ObjectInt64Ptr: PInt64 = nil; pSection: PInteger = nil): Int64;