Синтаксис:
| 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 | 
| © 2016 Компания DIRECTUM | Сообщество пользователей DIRECTUM |