IndexOfValue(Value: Variant): Integer;
Value. Значение элемента, индекс которого необходимо получить.
Метод IndexOfValue возвращает индекс элемента по значению
Метод возвращает значение -1, если элемент с указанным значением отсутствует.
Sub UserProc;
Var
SortList: ISortedList;
i: Integer;
Begin
SortList := New SortedList.Create;
For i := 0 To Math.RandBetweenI(50, 100) Do
SortList.Add("Key_" + Math.RandBetweenI(0, 100).ToString, "Number " + Math.RandBetweenI(0, 100).ToString);
End For;
i := SortList.IndexOfValue("Number 25");
End Sub UserProc;
После выполнения примера в переменной i будет содержаться индекс элемента со значением «Number 25», если таковой существует.
См. также: