Синтаксис:
procedure Insert( Index: Integer; const Name: WideString; Value: OleVariant); |
Параметры:
• | Index – индекс элемента; |
• | Name – имя элемента; |
• | Value – значение элемента. |
Описание:
Метод добавляет в список новый элемент. Элемент добавляется на позицию, указанную в параметре Index. В качестве параметра Index следует указывать значение от 0 до Count–1, в противном случае будет сгенерировано исключение. У всех элементов списка, следующих за добавляемым элементом, индекс увеличивается на 1. Соответственно увеличивается и значение свойства Count.
// Вставить элемент в упорядоченный список. I = 0 Inserted = False while (I <= List.Count - 1) and not Inserted if NewValue << List.Values(I) List.Insert(I; NewValueName; NewValue) Inserted = True endif I = I + 1 endwhile if not Inserted List.Add(NewValueName; NewValue) endif |
© Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |