ПолеСписка()
Создаёт новый экземпляр класса ПолеСписка (ListBox).
ПолеСписка1 = Ф.ПолеСписка(); ПолеСписка1.ИсточникДанных = МассивСписок1;
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ПолеСписка1.РежимВыбора = Ф.РежимВыбора.МножественныйПростой; МассивСписок1 = Ф.МассивСписок(); МассивСписок1.Добавить(Ф.ЭлементСписка("Строка представление", "СтрЗначение")); МассивСписок1.Добавить(Ф.ЭлементСписка("Объект", ПолеСписка1)); МассивСписок1.Добавить(Ф.ЭлементСписка("Массив", Новый Массив())); МассивСписок1.Добавить(Ф.ЭлементСписка("Дата", (Дата(2019,01,02,03)))); МассивСписок1.Добавить(Ф.ЭлементСписка("Булево", Ложь)); МассивСписок1.Добавить(Ф.ЭлементСписка("Число", 156.54888)); ПолеСписка1.ИсточникДанных = МассивСписок1; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ПолеСписка1.РежимВыбора = Ф.РежимВыбора.МножественныйПростой; МассивСписок1 = Ф.МассивСписок(); МассивСписок1.Добавить(Ф.ЭлементСписка("Строка представление", "СтрЗначение")); МассивСписок1.Добавить(Ф.ЭлементСписка("Объект", ПолеСписка1)); МассивСписок1.Добавить(Ф.ЭлементСписка("Массив", Новый Массив())); МассивСписок1.Добавить(Ф.ЭлементСписка("Дата", (Дата(2019,01,02,03)))); МассивСписок1.Добавить(Ф.ЭлементСписка("Булево", Ложь)); МассивСписок1.Добавить(Ф.ЭлементСписка("Число", 156.54888)); ПолеСписка1.ИсточникДанных = МассивСписок1; Сообщить(?( ПолеСписка1.ИсточникДанных = МассивСписок1 , "", "!!! ") + "ПолеСписка (ListBox) Конструктор" + " " + ТекущаяДата());
ПолеСписка1 = Ф.ПолеСписка(); ПолеСписка1.ИсточникДанных = ТаблицаДанных1;
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ТаблицаДанных1 = Ф.ТаблицаДанных(); ТаблицаДанных1.ИмяТаблицы = "ТД1"; Колонка1 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Как Отобразить Элемент", Ф.ТипДанных.Строка)); Колонка2 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Значение_элемента", Ф.ТипДанных.Объект)); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент("Как Отобразить Элемент", "Строка"); ТекСтрока.УстановитьЭлемент("Значение_элемента", "Значение строки 1 в список"); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Булево"); ТекСтрока.УстановитьЭлемент(1, Истина); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Объект"); ТекСтрока.УстановитьЭлемент(1, ПолеСписка1); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Дата"); ТекСтрока.УстановитьЭлемент(1, (Дата(2019,01,02,03))); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Число"); ТекСтрока.УстановитьЭлемент(1, 156.54888); ПолеСписка1.ОтображениеЭлемента = "Как Отобразить Элемент"; ПолеСписка1.ЗначениеЭлемента = "Значение_элемента"; ПолеСписка1.ИсточникДанных = ТаблицаДанных1; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ТаблицаДанных1 = Ф.ТаблицаДанных(); ТаблицаДанных1.ИмяТаблицы = "ТД1"; Колонка1 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Как Отобразить Элемент", Ф.ТипДанных.Строка)); Колонка2 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Значение_элемента", Ф.ТипДанных.Объект)); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент("Как Отобразить Элемент", "Строка"); ТекСтрока.УстановитьЭлемент("Значение_элемента", "Значение строки 1 в список"); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Булево"); ТекСтрока.УстановитьЭлемент(1, Истина); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Объект"); ТекСтрока.УстановитьЭлемент(1, ПолеСписка1); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Дата"); ТекСтрока.УстановитьЭлемент(1, (Дата(2019,01,02,03))); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Число"); ТекСтрока.УстановитьЭлемент(1, 156.54888); ПолеСписка1.ОтображениеЭлемента = "Как Отобразить Элемент"; ПолеСписка1.ЗначениеЭлемента = "Значение_элемента"; ПолеСписка1.ИсточникДанных = ТаблицаДанных1; Сообщить(?( ПолеСписка1.ИсточникДанных = ТаблицаДанных1 , "", "!!! ") + "ПолеСписка (ListBox) Конструктор" + " " + ТекущаяДата());
ПолеСписка1 = Ф.ПолеСписка(); ПолеСписка1.ИсточникДанных = ПредставлениеДанных1;
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ТаблицаДанных1 = Ф.ТаблицаДанных(); ТаблицаДанных1.ИмяТаблицы = "ТД1"; Колонка1 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Как Отобразить Элемент", Ф.ТипДанных.Строка)); Колонка2 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Значение_элемента", Ф.ТипДанных.Объект)); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент("Как Отобразить Элемент", "Строка"); ТекСтрока.УстановитьЭлемент("Значение_элемента", "Значение строки 1 в список"); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Булево"); ТекСтрока.УстановитьЭлемент(1, Истина); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Объект"); ТекСтрока.УстановитьЭлемент(1, ПолеСписка1); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Дата"); ТекСтрока.УстановитьЭлемент(1, (Дата(2019,01,02,03))); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Число"); ТекСтрока.УстановитьЭлемент(1, 156.54888); ПредставлениеДанных1 = Ф.ПредставлениеДанных(); ПредставлениеДанных1.Таблица = ТаблицаДанных1; ПолеСписка1.ОтображениеЭлемента = "Как Отобразить Элемент"; ПолеСписка1.ЗначениеЭлемента = "Значение_элемента"; ПолеСписка1.ИсточникДанных = ПредставлениеДанных1; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ТаблицаДанных1 = Ф.ТаблицаДанных(); ТаблицаДанных1.ИмяТаблицы = "ТД1"; Колонка1 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Как Отобразить Элемент", Ф.ТипДанных.Строка)); Колонка2 = ТаблицаДанных1.Колонки.Добавить(Ф.КолонкаДанных("Значение_элемента", Ф.ТипДанных.Объект)); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент("Как Отобразить Элемент", "Строка"); ТекСтрока.УстановитьЭлемент("Значение_элемента", "Значение строки 1 в список"); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Булево"); ТекСтрока.УстановитьЭлемент(1, Истина); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Объект"); ТекСтрока.УстановитьЭлемент(1, ПолеСписка1); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Дата"); ТекСтрока.УстановитьЭлемент(1, (Дата(2019,01,02,03))); ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока()); ТекСтрока.УстановитьЭлемент(0, "Число"); ТекСтрока.УстановитьЭлемент(1, 156.54888); ПредставлениеДанных1 = Ф.ПредставлениеДанных(); ПредставлениеДанных1.Таблица = ТаблицаДанных1; ПолеСписка1.ОтображениеЭлемента = "Как Отобразить Элемент"; ПолеСписка1.ЗначениеЭлемента = "Значение_элемента"; ПолеСписка1.ИсточникДанных = ПредставлениеДанных1; Сообщить(?( "" + ТаблицаДанных1.ПредставлениеПоУмолчанию = "КлПредставлениеДанных" , "", "!!! ") + "ПолеСписка (ListBox) Конструктор" + " " + ТекущаяДата());
ПолеСпискаЭлементы1 = ПолеСписка1.Элементы; ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Строка55", "СтрЗначение"));
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ПолеСпискаЭлементы1 = ПолеСписка1.Элементы; ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Строка55", "СтрЗначение")); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Дата", (Дата(2019,01,02,03)))); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Булево", Ложь)); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Число", 156.54888)); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Объект", Форма1)); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Массив", Новый Массив())); Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ПолеСпискаЭлементы1 = ПолеСписка1.Элементы; ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Строка55", "СтрЗначение")); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Дата", (Дата(2019,01,02,03)))); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Булево", Ложь)); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Число", 156.54888)); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Объект", Форма1)); ПолеСпискаЭлементы1.Добавить(Ф.ЭлементСписка("Массив", Новый Массив())); Сообщить(?( ПолеСпискаЭлементы1 = ПолеСписка1.Элементы , "", "!!! ") + "ПолеСписка (ListBox) Конструктор" + " " + ТекущаяДата());
Свойства ОтображениеЭлемента (DisplayMember), ЗначениеЭлемента (ValueMember) задавать не нужно.
Для отображения элемента будет использовано свойство ЭлементСписка.Текст (ListItem.Text), для значения элемента будет использовано свойство ЭлементСписка.Значение (ListItem.Value).
ПолеСпискаЭлементы1 = ПолеСписка1.Элементы; ПолеСпискаЭлементы1.Добавить("Строка66");
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ПолеСпискаЭлементы1 = ПолеСписка1.Элементы; ПолеСпискаЭлементы1.Добавить("Строка66"); ПолеСпискаЭлементы1.Добавить(Дата(2019,01,02,03)); ПолеСпискаЭлементы1.Добавить(Ложь); ПолеСпискаЭлементы1.Добавить(156.54888); ПолеСпискаЭлементы1.Добавить(ПолеСписка1); ПолеСпискаЭлементы1.Добавить(Новый Массив()); Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 310; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ПолеСписка1 = Ф.ПолеСписка(); Форма1.ЭлементыУправления.Добавить(ПолеСписка1); ПолеСписка1.Ширина = 300; ПолеСпискаЭлементы1 = ПолеСписка1.Элементы; ПолеСпискаЭлементы1.Добавить("Строка66"); ПолеСпискаЭлементы1.Добавить(Дата(2019,01,02,03)); ПолеСпискаЭлементы1.Добавить(Ложь); ПолеСпискаЭлементы1.Добавить(156.54888); ПолеСпискаЭлементы1.Добавить(ПолеСписка1); ПолеСпискаЭлементы1.Добавить(Новый Массив()); Сообщить(?( ПолеСпискаЭлементы1 = ПолеСписка1.Элементы , "", "!!! ") + "ПолеСписка (ListBox) Конструктор" + " " + ТекущаяДата());