OneScriptForms.ComboBox Method

Синтаксис

ПолеВыбора()

Параметры

Возвращаемое значение

Тип: ПолеВыбора (ComboBox).

Описание

Создаёт новый экземпляр класса ПолеВыбора (ComboBox).

Примечание

Пример

Заполнение поля выбора с помощью массива как источника данных:

МассивСписок1 = Ф.МассивСписок();
МассивСписок1.Добавить("Строка текста");
МассивСписок1.Добавить(Новый Массив());
МассивСписок1.Добавить(ПолеВыбора1);
МассивСписок1.Добавить(Истина);
МассивСписок1.Добавить(15.555);
МассивСписок1.Добавить(Дата(1984,03,26,06,24,21));
ПолеВыбора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.Добавить(Истина);
МассивСписок1.Добавить(15.555);
МассивСписок1.Добавить(Дата(1984,03,26,06,24,21));
ПолеВыбора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.Добавить(Истина);
МассивСписок1.Добавить(15.555);
МассивСписок1.Добавить(Дата(1984,03,26,06,24,21));
ПолеВыбора1.ИсточникДанных = МассивСписок1;

Сообщить(?(
ПолеВыбора1.ИсточникДанных = МассивСписок1
, "", "!!! ") + "ФормыДляОдноСкрипта.ПолеВыбора (OneScriptForms.ComboBox) Метод" + " " + ТекущаяДата());

Заполнение поля выбора с помощью таблицы данных как источника данных:

ПолеВыбора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.ИмяКолонки = "№ н/п";
Колонка1.Заголовок = "Count";
Колонка2 = КолонкиТаб.Добавить(Ф.КолонкаДанных());
Колонка2.ТипДанных = Ф.ТипДанных.Строка;
Колонка2.ИмяКолонки = "ФИО";
Колонка2.Заголовок = "Name";
Колонка3 = КолонкиТаб.Добавить(Ф.КолонкаДанных());
Колонка3.ТипДанных = Ф.ТипДанных.Дата;
Колонка3.ИмяКолонки = "ДатаРождения";
Колонка3.Заголовок = "ДатаРождения";

ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("ФИО", "Иванов Иван Иванович");
ТекСтрока.УстановитьЭлемент("ДатаРождения", Дата(1984,03,26));
ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("ФИО", "Петров Петр Петрович");
ТекСтрока.УстановитьЭлемент("ДатаРождения", Дата(1985,05,29));
ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("ФИО", "Сидоров Сидор Сидорович");
ТекСтрока.УстановитьЭлемент("ДатаРождения", Дата(1980,09,09));

ПолеВыбора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 = КолонкиТаб.Добавить(Ф.КолонкаДанных());
Колонка1.ТипДанных = Ф.ТипДанных.Число;
Колонка1.ИмяКолонки = "№ н/п";
Колонка1.Заголовок = "Count";
Колонка2 = КолонкиТаб.Добавить(Ф.КолонкаДанных());
Колонка2.ТипДанных = Ф.ТипДанных.Строка;
Колонка2.ИмяКолонки = "ФИО";
Колонка2.Заголовок = "Name";
Колонка3 = КолонкиТаб.Добавить(Ф.КолонкаДанных());
Колонка3.ТипДанных = Ф.ТипДанных.Дата;
Колонка3.ИмяКолонки = "ДатаРождения";
Колонка3.Заголовок = "ДатаРождения";

ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("ФИО", "Иванов Иван Иванович");
ТекСтрока.УстановитьЭлемент("ДатаРождения", Дата(1984,03,26));
ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("ФИО", "Петров Петр Петрович");
ТекСтрока.УстановитьЭлемент("ДатаРождения", Дата(1985,05,29));
ТекСтрока = ТаблицаДанных1.Строки.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("ФИО", "Сидоров Сидор Сидорович");
ТекСтрока.УстановитьЭлемент("ДатаРождения", Дата(1980,09,09));

ПолеВыбора1.ОтображениеЭлемента = "ФИО";
ПолеВыбора1.ЗначениеЭлемента  = "ДатаРождения";
ПолеВыбора1.ИсточникДанных = ТаблицаДанных1;  

Сообщить(?(
ПолеВыбора1.ИсточникДанных = ТаблицаДанных1
, "", "!!! ") + "ФормыДляОдноСкрипта.ПолеВыбора (OneScriptForms.ComboBox) Метод" + " " + ТекущаяДата());

Заполнение поля выбора с помощью свойства ПолеВыбора.Элементы (ComboBox.Items) (вариант 1):

ЭлементыПоляВыбора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.Количество = 6
, "", "!!! ") + "ФормыДляОдноСкрипта.ПолеВыбора (OneScriptForms.ComboBox) Метод" + " " + ТекущаяДата());

Свойства ОтображениеЭлемента (DisplayMember), ЗначениеЭлемента (ValueMember) задавать не нужно.

Для отображения элемента будет использовано свойство ЭлементСписка.Текст (ListItem.Text), для значения элемента будет использовано свойство ЭлементСписка.Значение (ListItem.Value).

Заполнение поля выбора с помощью свойства ПолеВыбора.Элементы (ComboBox.Items) (вариант 2):

ЭлементыПоляВыбора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.Добавить(18.245);
ЭлементыПоляВыбора1.Добавить(Дата(1984,03,26,06,24,21));
ЭлементыПоляВыбора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.Добавить(18.245);
ЭлементыПоляВыбора1.Добавить(Дата(1984,03,26,06,24,21));
ЭлементыПоляВыбора1.Добавить(Ф.Кнопка()); 

Сообщить(?(
ЭлементыПоляВыбора1.Количество = 5
, "", "!!! ") + "ФормыДляОдноСкрипта.ПолеВыбора (OneScriptForms.ComboBox) Метод" + " " + ТекущаяДата());

ФормыДляОдноСкрипта.ПолеВыбора (OneScriptForms.ComboBox) Метод

Синтаксис

Параметры

Возвращаемое значение

Описание

Примечание

Пример

Смотрите также