Чтение и запись.
Тип: Строка.
Возвращает или задает идентификатор для элемента.
Таблица1.Идентификатор = "Идент";
Перем ТФ, Таблица1, Идентификатор, Окно1; Процедура ПриОткрытии() Экспорт Идентификатор = Таблица1.Идентификатор; ТФ.Уведомление().Показать("Идентификатор = " + Идентификатор, 3000); КонецПроцедуры Функция РазобратьСтроку(Строка, Разделитель) Стр = СтрЗаменить(Строка,Разделитель,символы.ПС); М = Новый Массив; Если ПустаяСтрока(Стр) Тогда Возврат М; КонецЕсли; Для Ч = 1 По СтрЧислоСтрок(Стр) Цикл М.Добавить(СтрПолучитьСтроку(Стр,Ч)); КонецЦикла; Возврат М; КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Окно(); Окно1.Заполнить(); ТФ.Верхний.Добавить(Окно1); // Построение таблицы добавлением строк. Таблица1 = ТФ.Таблица(); Таблица1.Ширина = ТФ.Величина.Абсолютно(70); Таблица1.Высота = ТФ.Величина.Абсолютно(8); Окно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; // Построение таблицы загрузкой из массива. Таблица2 = ТФ.Таблица(); Таблица2.Ширина = ТФ.Величина.Заполнить(); Таблица2.Высота = ТФ.Величина.Абсолютно(13); Таблица2.Ниже(Таблица1, 1); Окно1.Добавить(Таблица2); ТаблицаДанных2 = ТФ.ТаблицаДанных(); КолонкиТаб = ТаблицаДанных2.Колонки; Колонка0 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("№ н/п", ТФ.ТипДанных.Число)); Колонка1 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("ФИО", ТФ.ТипДанных.Строка)); Колонка2 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("ДатаРождения", ТФ.ТипДанных.Дата)); Колонка3 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("Высшее образование", ТФ.ТипДанных.Булево)); Колонка4 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("Рейтинг", ТФ.ТипДанных.Число)); Колонка5 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("Инкремент", ТФ.ТипДанных.Число)); Колонка5.АвтоПриращение = Истина; Колонка5.НачальноеЧисло = 25; Колонка5.ШагПриращения = 5; Стр13 = "Трифонов Юрий Никифорович,19990607,Истина,61.80 |Шигаев Агап Денисович,19991001,Ложь,48.99 |Сочеванова Анфиса Георгиевна,19970909,Истина,31.08 |Врунгель Христофор Бонифатьевич,19901010,Истина,53.22 |Шикалов Игнатий Маркович,19901010,Истина,53.22 |Сергеевич Аристарх Изяславович,19950621,Ложь,25.97 |Бондарчук Александр Ермолаевич,19930713,Истина,89.53 |Ефремова Ева Степановна,19990105,Ложь,12.11 |Моисеева Зинаида Никитевна,19930616,Истина,33.66 |Кузьмова Лиана Игнатиевна,19930621,Ложь,40.70"; Для А = 1 По СтрЧислоСтрок(Стр13) Цикл ТаблицаДанных2.Строки.Добавить(ТаблицаДанных2.НоваяСтрока()); КонецЦикла; М_Счетчик = Новый Массив(); М_ФИО = Новый Массив(); М_ДатаРождения = Новый Массив(); М_ВысшееОбразование = Новый Массив(); М_КоличествоБонусов = Новый Массив(); Для А = 1 По СтрЧислоСтрок(Стр13) Цикл Стр14 = СтрПолучитьСтроку(Стр13, А); М9 = РазобратьСтроку(Стр14, ","); М_Счетчик.Добавить(А); М_ФИО.Добавить(М9[0]); М_ДатаРождения.Добавить(Дата("" + М9[1])); М_ВысшееОбразование.Добавить(?(М9[2] = "Истина", Истина, Ложь)); М_КоличествоБонусов.Добавить(Число(М9[3])); КонецЦикла; ТаблицаДанных2.ЗагрузитьКолонку(М_Счетчик, 0); ТаблицаДанных2.ЗагрузитьКолонку(М_ФИО, 1); ТаблицаДанных2.ЗагрузитьКолонку(М_ДатаРождения, "ДатаРождения"); ТаблицаДанных2.ЗагрузитьКолонку(М_ВысшееОбразование, Колонка3); ТаблицаДанных2.ЗагрузитьКолонку(М_КоличествоБонусов, Колонка4); Таблица2.ТаблицаДанных = ТаблицаДанных2; Таблица1.Идентификатор = "Идент"; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Таблица1, Идентификатор, Окно1; Процедура ПриОткрытии() Экспорт Идентификатор = Таблица1.Идентификатор; ТФ.Уведомление().Показать("Идентификатор = " + Идентификатор, 3000); КонецПроцедуры Функция РазобратьСтроку(Строка, Разделитель) Стр = СтрЗаменить(Строка,Разделитель,символы.ПС); М = Новый Массив; Если ПустаяСтрока(Стр) Тогда Возврат М; КонецЕсли; Для Ч = 1 По СтрЧислоСтрок(Стр) Цикл М.Добавить(СтрПолучитьСтроку(Стр,Ч)); КонецЦикла; Возврат М; КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Окно(); Окно1.Заполнить(); ТФ.Верхний.Добавить(Окно1); // Построение таблицы добавлением строк. Таблица1 = ТФ.Таблица(); Таблица1.Ширина = ТФ.Величина.Абсолютно(70); Таблица1.Высота = ТФ.Величина.Абсолютно(8); Окно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; // Построение таблицы загрузкой из массива. Таблица2 = ТФ.Таблица(); Таблица2.Ширина = ТФ.Величина.Заполнить(); Таблица2.Высота = ТФ.Величина.Абсолютно(13); Таблица2.Ниже(Таблица1, 1); Окно1.Добавить(Таблица2); ТаблицаДанных2 = ТФ.ТаблицаДанных(); КолонкиТаб = ТаблицаДанных2.Колонки; Колонка0 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("№ н/п", ТФ.ТипДанных.Число)); Колонка1 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("ФИО", ТФ.ТипДанных.Строка)); Колонка2 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("ДатаРождения", ТФ.ТипДанных.Дата)); Колонка3 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("Высшее образование", ТФ.ТипДанных.Булево)); Колонка4 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("Рейтинг", ТФ.ТипДанных.Число)); Колонка5 = КолонкиТаб.Добавить(ТФ.КолонкаДанных("Инкремент", ТФ.ТипДанных.Число)); Колонка5.АвтоПриращение = Истина; Колонка5.НачальноеЧисло = 25; Колонка5.ШагПриращения = 5; Стр13 = "Трифонов Юрий Никифорович,19990607,Истина,61.80 |Шигаев Агап Денисович,19991001,Ложь,48.99 |Сочеванова Анфиса Георгиевна,19970909,Истина,31.08 |Врунгель Христофор Бонифатьевич,19901010,Истина,53.22 |Шикалов Игнатий Маркович,19901010,Истина,53.22 |Сергеевич Аристарх Изяславович,19950621,Ложь,25.97 |Бондарчук Александр Ермолаевич,19930713,Истина,89.53 |Ефремова Ева Степановна,19990105,Ложь,12.11 |Моисеева Зинаида Никитевна,19930616,Истина,33.66 |Кузьмова Лиана Игнатиевна,19930621,Ложь,40.70"; Для А = 1 По СтрЧислоСтрок(Стр13) Цикл ТаблицаДанных2.Строки.Добавить(ТаблицаДанных2.НоваяСтрока()); КонецЦикла; М_Счетчик = Новый Массив(); М_ФИО = Новый Массив(); М_ДатаРождения = Новый Массив(); М_ВысшееОбразование = Новый Массив(); М_КоличествоБонусов = Новый Массив(); Для А = 1 По СтрЧислоСтрок(Стр13) Цикл Стр14 = СтрПолучитьСтроку(Стр13, А); М9 = РазобратьСтроку(Стр14, ","); М_Счетчик.Добавить(А); М_ФИО.Добавить(М9[0]); М_ДатаРождения.Добавить(Дата("" + М9[1])); М_ВысшееОбразование.Добавить(?(М9[2] = "Истина", Истина, Ложь)); М_КоличествоБонусов.Добавить(Число(М9[3])); КонецЦикла; ТаблицаДанных2.ЗагрузитьКолонку(М_Счетчик, 0); ТаблицаДанных2.ЗагрузитьКолонку(М_ФИО, 1); ТаблицаДанных2.ЗагрузитьКолонку(М_ДатаРождения, "ДатаРождения"); ТаблицаДанных2.ЗагрузитьКолонку(М_ВысшееОбразование, Колонка3); ТаблицаДанных2.ЗагрузитьКолонку(М_КоличествоБонусов, Колонка4); Таблица2.ТаблицаДанных = ТаблицаДанных2; Таблица1.Идентификатор = "Идент"; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( Идентификатор = "Идент" , "", "!!! ") + "Таблица.Идентификатор (TableView.Id) Свойство" + " " + ТекущаяДата() + Символы.ПС);