Пример использования интерфейса IEnum.
В примере рассматривается применение методов интерфейса IEnum.
Для того чтобы просмотреть результаты работы кода примера, необходимо сохранить исходный код в файл IEnumExample.js и запустить его на исполнение.
//----------------------------------------------------------------------------- // Файл IEnumExample.js //----------------------------------------------------------------------------- // В данном примере рассмотрено использование интерфейса IEnum. //----------------------------------------------------------------------------- //@ Start Example // Создание соединения с базой данных и объектов для хранения данных var Connector = new ActiveXObject('TSDskObjectLibrary.DskConnector'); var Enum = new ActiveXObject('TSObjectLibrary.Enum'); var StringsList = new ActiveXObject('TSObjectLibrary.StringsList'); // Функция вывода сообщения function ShowMessage(Str) { for (var i = 1; i < arguments.length; i++ ) { Str = Str.replace(new RegExp('%' + i), arguments[i]); } WScript.Echo(Str); } if (Connector.Login("Пример использования интерфейса IEnum")) { ShowMessage("Добавление сервиса перечисления"); // Создание сервиса перечисления и заполнение его элементами Enum = Connector.Services.CreateItem('Enum'); Enum.USI = 'Common\\enm_CustomerEnum'; Enum.Caption = "Пользовательское перечисление"; // Создание элементов перечисления for (i = 0; i < 5; i++) { EnumItem = Enum.CreateItem(); EnumItem.ID = Connector.GenGUID(); EnumItem.Caption = "Значение №" + i; EnumItem.Code = 'Code' + i; Enum.Add(EnumItem); } // Добавление данных перечисления StringsList.Add("Данные созданного перечисления:"); StringsList.Add("Идентификатор перечисления: " + Enum.ID); StringsList.Add("USI перечисления: " + Enum.USI); StringsList.Add("Заголовок: " + Enum.Caption); StringsList.Add("Элементы перечисления:"); // Добавление информации об элементах перечисления и их удаление for (i = 0; i < 5; i++) { EnumItem = Enum.ItemsByCaption("Значение №" + i); StringsList.Add(EnumItem.Code + ' ' + EnumItem.Caption); Enum.Remove(EnumItem); } // Вывод перечисления ShowMessage(StringsList.Text); } //@ End Example
|
Copyright (с) Terrasoft 2002-2012.
|