TreeNodeAdv.Remove Method

Синтаксис

Удалить()

Параметры

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

Описание

Удаляет узел дерева значений.

Примечание

Пример

Сатурн.Удалить();

Полный пример кода

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

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

ДеревоЗначений1 = Ф.ДеревоЗначений();
ДеревоЗначений1.Родитель = Форма1;
ДеревоЗначений1.Стыковка = Ф.СтильСтыковки.Заполнение;

КолонкаДереваЗначений1 = Ф.КолонкаДереваЗначений("Небесные тела", 220);
КолонкаДереваЗначений2 = Ф.КолонкаДереваЗначений("Радиус орбиты (а.е.)", 200);
КолонкаДереваЗначений1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;
КолонкаДереваЗначений2.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений1);
ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений2);
ДеревоЗначений1.ИспользоватьКолонки = Истина;
ДеревоЗначений1.СтильСетки = Ф.СтильСетки.ГоризонтальнаяВертикальная;

ФлажокУзла1 = Ф.ФлажокУзла();
ФлажокУзла1.Колонка = КолонкаДереваЗначений1;
ФлажокУзла1.Редактируемый = Истина;
ФлажокУзла1.ТриСостояния = Истина;

ПолеВводаУзла1 = Ф.ПолеВводаУзла();
ПолеВводаУзла1.Колонка = КолонкаДереваЗначений1;

ЧисловоеПолеУзла1 = Ф.ЧисловоеПолеУзла();
ЧисловоеПолеУзла1.Колонка = КолонкаДереваЗначений2;
ЧисловоеПолеУзла1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.ЭлементыУзла.Добавить(ФлажокУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ПолеВводаУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ЧисловоеПолеУзла1);

СолнечнаяСистема = Ф.УзелДереваЗначений("Солнечная система");
ДеревоЗначений1.Узлы.Добавить(СолнечнаяСистема);
СолнечнаяСистема.УстановитьЗначение(ПолеВводаУзла1, "Солнечная система");

Солнце = Ф.УзелДереваЗначений("Солнце");
СолнечнаяСистема.Узлы.Добавить(Солнце);
Солнце.УстановитьЗначение(ПолеВводаУзла1, "Солнце");

Меркурий = Ф.УзелДереваЗначений("Меркурий");
Солнце.Узлы.Добавить(Меркурий);
Меркурий.УстановитьЗначение(ПолеВводаУзла1, "Меркурий");
Меркурий.УстановитьЗначение(ЧисловоеПолеУзла1, 0.39);

Венера = Ф.УзелДереваЗначений("Венера");
Солнце.Узлы.Добавить(Венера);
Венера.УстановитьЗначение(ПолеВводаУзла1, "Венера");
Венера.УстановитьЗначение(ЧисловоеПолеУзла1, 0.72);

Земля = Ф.УзелДереваЗначений("Земля");
Солнце.Узлы.Добавить(Земля);
Земля.УстановитьЗначение(ПолеВводаУзла1, "Земля");
Земля.УстановитьЗначение(ЧисловоеПолеУзла1, 1.0);

Марс = Ф.УзелДереваЗначений("Марс");
Солнце.Узлы.Добавить(Марс);
Марс.УстановитьЗначение(ПолеВводаУзла1, "Марс");
Марс.УстановитьЗначение(ЧисловоеПолеУзла1, 1.52);

Юпитер = Ф.УзелДереваЗначений("Юпитер");
Солнце.Узлы.Добавить(Юпитер);
Юпитер.УстановитьЗначение(ПолеВводаУзла1, "Юпитер");
Юпитер.УстановитьЗначение(ЧисловоеПолеУзла1, 5.20);

Сатурн = Ф.УзелДереваЗначений("Сатурн");
Солнце.Узлы.Добавить(Сатурн);
Сатурн.УстановитьЗначение(ПолеВводаУзла1, "Сатурн");
Сатурн.УстановитьЗначение(ЧисловоеПолеУзла1, 9.54);

Уран = Ф.УзелДереваЗначений("Уран");
Солнце.Узлы.Добавить(Уран);
Уран.УстановитьЗначение(ПолеВводаУзла1, "Уран");
Уран.УстановитьЗначение(ЧисловоеПолеУзла1, 19.22);

Нептун = Ф.УзелДереваЗначений("Нептун");
Солнце.Узлы.Добавить(Нептун);
Нептун.УстановитьЗначение(ПолеВводаУзла1, "Нептун");
Нептун.УстановитьЗначение(ЧисловоеПолеУзла1, 30.06);

ДеревоЗначений1.РазвернутьВсе();
Сатурн.Удалить();

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

Тестовый код

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

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

ДеревоЗначений1 = Ф.ДеревоЗначений();
ДеревоЗначений1.Родитель = Форма1;
ДеревоЗначений1.Стыковка = Ф.СтильСтыковки.Заполнение;

КолонкаДереваЗначений1 = Ф.КолонкаДереваЗначений("Небесные тела", 220);
КолонкаДереваЗначений2 = Ф.КолонкаДереваЗначений("Радиус орбиты (а.е.)", 200);
КолонкаДереваЗначений1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;
КолонкаДереваЗначений2.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений1);
ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений2);
ДеревоЗначений1.ИспользоватьКолонки = Истина;
ДеревоЗначений1.СтильСетки = Ф.СтильСетки.ГоризонтальнаяВертикальная;

ФлажокУзла1 = Ф.ФлажокУзла();
ФлажокУзла1.Колонка = КолонкаДереваЗначений1;
ФлажокУзла1.Редактируемый = Истина;
ФлажокУзла1.ТриСостояния = Истина;

ПолеВводаУзла1 = Ф.ПолеВводаУзла();
ПолеВводаУзла1.Колонка = КолонкаДереваЗначений1;

ЧисловоеПолеУзла1 = Ф.ЧисловоеПолеУзла();
ЧисловоеПолеУзла1.Колонка = КолонкаДереваЗначений2;
ЧисловоеПолеУзла1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.ЭлементыУзла.Добавить(ФлажокУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ПолеВводаУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ЧисловоеПолеУзла1);

СолнечнаяСистема = Ф.УзелДереваЗначений("Солнечная система");
ДеревоЗначений1.Узлы.Добавить(СолнечнаяСистема);
СолнечнаяСистема.УстановитьЗначение(ПолеВводаУзла1, "Солнечная система");

Солнце = Ф.УзелДереваЗначений("Солнце");
СолнечнаяСистема.Узлы.Добавить(Солнце);
Солнце.УстановитьЗначение(ПолеВводаУзла1, "Солнце");

Меркурий = Ф.УзелДереваЗначений("Меркурий");
Солнце.Узлы.Добавить(Меркурий);
Меркурий.УстановитьЗначение(ПолеВводаУзла1, "Меркурий");
Меркурий.УстановитьЗначение(ЧисловоеПолеУзла1, 0.39);

Венера = Ф.УзелДереваЗначений("Венера");
Солнце.Узлы.Добавить(Венера);
Венера.УстановитьЗначение(ПолеВводаУзла1, "Венера");
Венера.УстановитьЗначение(ЧисловоеПолеУзла1, 0.72);

Земля = Ф.УзелДереваЗначений("Земля");
Солнце.Узлы.Добавить(Земля);
Земля.УстановитьЗначение(ПолеВводаУзла1, "Земля");
Земля.УстановитьЗначение(ЧисловоеПолеУзла1, 1.0);

Марс = Ф.УзелДереваЗначений("Марс");
Солнце.Узлы.Добавить(Марс);
Марс.УстановитьЗначение(ПолеВводаУзла1, "Марс");
Марс.УстановитьЗначение(ЧисловоеПолеУзла1, 1.52);

Юпитер = Ф.УзелДереваЗначений("Юпитер");
Солнце.Узлы.Добавить(Юпитер);
Юпитер.УстановитьЗначение(ПолеВводаУзла1, "Юпитер");
Юпитер.УстановитьЗначение(ЧисловоеПолеУзла1, 5.20);

Сатурн = Ф.УзелДереваЗначений("Сатурн");
Солнце.Узлы.Добавить(Сатурн);
Сатурн.УстановитьЗначение(ПолеВводаУзла1, "Сатурн");
Сатурн.УстановитьЗначение(ЧисловоеПолеУзла1, 9.54);

Уран = Ф.УзелДереваЗначений("Уран");
Солнце.Узлы.Добавить(Уран);
Уран.УстановитьЗначение(ПолеВводаУзла1, "Уран");
Уран.УстановитьЗначение(ЧисловоеПолеУзла1, 19.22);

Нептун = Ф.УзелДереваЗначений("Нептун");
Солнце.Узлы.Добавить(Нептун);
Нептун.УстановитьЗначение(ПолеВводаУзла1, "Нептун");
Нептун.УстановитьЗначение(ЧисловоеПолеУзла1, 30.06);

ДеревоЗначений1.РазвернутьВсе();
Сатурн.Удалить();

Сообщить(?(
Солнце.Узлы.Количество = 7
, "", "!!! ") + "УзелДереваЗначений.Удалить (TreeNodeAdv.Remove) Метод" + " " + ТекущаяДата());

УзелДереваЗначений.Удалить (TreeNodeAdv.Remove) Метод

Синтаксис

Параметры

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

Описание

Примечание

Пример

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