ТаблицаДанных.ВыгрузитьКолонку (DataTable.UnloadColumn) Метод

Синтаксис

ВыгрузитьКолонку(<Колонка>)

Параметры

Колонка (обязательный)
Тип: Строка; Число; КолонкаДанных (DataColumn).
Колонка, значения которой необходимо выгрузить. В качестве значения параметра может выступать индекс колонки, имя колонки, сама колонка.

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

Тип: МассивСписок (ArrayList).

Описание

Создает МассивСписок (ArrayList) и копирует в него значения, содержащиеся в колонке таблицы значений.

Примечание

Пример

М1 = ТаблицаДанных1.ВыгрузитьКолонку(1);
М2 = ТаблицаДанных1.ВыгрузитьКолонку("ФИО");
М3 = ТаблицаДанных1.ВыгрузитьКолонку(Колонка2);
Полный пример кода 

Копировать     Выделить всё


ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Ширина = 400;
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

СеткаДанных1 = Форма1.ЭлементыУправления.Добавить(Ф.СеткаДанных());
СеткаДанных1.Стыковка = Ф.СтильСтыковки.Заполнение;

ТаблицаДанных1 = Ф.ТаблицаДанных("ТД1");
Колонки1 = ТаблицаДанных1.Колонки;
Колонка1 = Колонки1.Добавить(Ф.КолонкаДанных("№ н/п", Ф.ТипДанных.Число));
Колонка2 = Колонки1.Добавить(Ф.КолонкаДанных("ФИО", Ф.ТипДанных.Строка));

Строки1 = ТаблицаДанных1.Строки;
ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 1);
ТекСтрока.УстановитьЭлемент("ФИО", "Иванов Иван Иванович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 2);
ТекСтрока.УстановитьЭлемент("ФИО", "Семенов Семен Семенович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 3);
ТекСтрока.УстановитьЭлемент("ФИО", "Шикалов Игнатий Маркович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 4);
ТекСтрока.УстановитьЭлемент("ФИО", "Петров Петр Петрович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 5);
ТекСтрока.УстановитьЭлемент("ФИО", "Сергеевич Аристарх Изяславович");

СтильТаблицыСеткиДанных1 = Ф.СтильТаблицыСеткиДанных();
СтильТаблицыСеткиДанных1.ИмяОтображаемого = "ТД1";

СтильКолонкиПолеВвода1 = Ф.СтильКолонкиПолеВвода();
СтильКолонкиПолеВвода1.ИмяОтображаемого = "№ н/п";
СтильКолонкиПолеВвода1.Ширина = 50;
СтильКолонкиПолеВвода1.ТекстЗаголовка = "№ н/п";
СтильКолонкиПолеВвода1.Выравнивание = Ф.ГоризонтальноеВыравнивание.Право;

СтильКолонкиПолеВвода2 = Ф.СтильКолонкиПолеВвода();
СтильКолонкиПолеВвода2.ИмяОтображаемого = "ФИО";
СтильКолонкиПолеВвода2.Ширина = 200;
СтильКолонкиПолеВвода2.ТекстЗаголовка = "ФИО";

СтилиКолонкиСеткиДанных1 = СтильТаблицыСеткиДанных1.СтилиКолонкиСеткиДанных;
СтилиКолонкиСеткиДанных1.Добавить(СтильКолонкиПолеВвода1);
СтилиКолонкиСеткиДанных1.Добавить(СтильКолонкиПолеВвода2);

СеткаДанных1.СтилиТаблицы.Добавить(СтильТаблицыСеткиДанных1);

ПредставлениеДанных1 = ТаблицаДанных1.ПредставлениеПоУмолчанию;
СеткаДанных1.ИсточникДанных = ПредставлениеДанных1;

М1 = ТаблицаДанных1.ВыгрузитьКолонку(1);
М2 = ТаблицаДанных1.ВыгрузитьКолонку("ФИО");
М3 = ТаблицаДанных1.ВыгрузитьКолонку(Колонка2);
Для А = 0 По М3.Количество - 1 Цикл
    Сообщить("" + М3.Элемент(А));
КонецЦикла;

Ф.ЗапуститьОбработкуСобытий();

Тестовый код 

Копировать     Выделить всё


ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Ширина = 400;
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

СеткаДанных1 = Форма1.ЭлементыУправления.Добавить(Ф.СеткаДанных());
СеткаДанных1.Стыковка = Ф.СтильСтыковки.Заполнение;

ТаблицаДанных1 = Ф.ТаблицаДанных("ТД1");
Колонки1 = ТаблицаДанных1.Колонки;
Колонка1 = Колонки1.Добавить(Ф.КолонкаДанных("№ н/п", Ф.ТипДанных.Число));
Колонка2 = Колонки1.Добавить(Ф.КолонкаДанных("ФИО", Ф.ТипДанных.Строка));

Строки1 = ТаблицаДанных1.Строки;
ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 1);
ТекСтрока.УстановитьЭлемент("ФИО", "Иванов Иван Иванович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 2);
ТекСтрока.УстановитьЭлемент("ФИО", "Семенов Семен Семенович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 3);
ТекСтрока.УстановитьЭлемент("ФИО", "Шикалов Игнатий Маркович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 4);
ТекСтрока.УстановитьЭлемент("ФИО", "Петров Петр Петрович");

ТекСтрока = Строки1.Добавить(ТаблицаДанных1.НоваяСтрока());
ТекСтрока.УстановитьЭлемент("№ н/п", 5);
ТекСтрока.УстановитьЭлемент("ФИО", "Сергеевич Аристарх Изяславович");

СтильТаблицыСеткиДанных1 = Ф.СтильТаблицыСеткиДанных();
СтильТаблицыСеткиДанных1.ИмяОтображаемого = "ТД1";

СтильКолонкиПолеВвода1 = Ф.СтильКолонкиПолеВвода();
СтильКолонкиПолеВвода1.ИмяОтображаемого = "№ н/п";
СтильКолонкиПолеВвода1.Ширина = 50;
СтильКолонкиПолеВвода1.ТекстЗаголовка = "№ н/п";
СтильКолонкиПолеВвода1.Выравнивание = Ф.ГоризонтальноеВыравнивание.Право;

СтильКолонкиПолеВвода2 = Ф.СтильКолонкиПолеВвода();
СтильКолонкиПолеВвода2.ИмяОтображаемого = "ФИО";
СтильКолонкиПолеВвода2.Ширина = 200;
СтильКолонкиПолеВвода2.ТекстЗаголовка = "ФИО";

СтилиКолонкиСеткиДанных1 = СтильТаблицыСеткиДанных1.СтилиКолонкиСеткиДанных;
СтилиКолонкиСеткиДанных1.Добавить(СтильКолонкиПолеВвода1);
СтилиКолонкиСеткиДанных1.Добавить(СтильКолонкиПолеВвода2);

СеткаДанных1.СтилиТаблицы.Добавить(СтильТаблицыСеткиДанных1);

ПредставлениеДанных1 = ТаблицаДанных1.ПредставлениеПоУмолчанию;
СеткаДанных1.ИсточникДанных = ПредставлениеДанных1;




М1 = ТаблицаДанных1.ВыгрузитьКолонку(1);
М2 = ТаблицаДанных1.ВыгрузитьКолонку("ФИО");
М3 = ТаблицаДанных1.ВыгрузитьКолонку(Колонка2);

Сообщить(?(
М1.Количество = 5 и
М2.Количество = 5 и
М3.Количество = 5
, "", "!!! ") + "ТаблицаДанных.ВыгрузитьКолонку (DataTable.UnloadColumn) Метод" + " " + ТекущаяДата());

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

ТаблицаДанных (DataTable) Класс | Библиотека OneScriptForms