ФормыДляОдноСкрипта.Ссылка (OneScriptForms.Link) Метод

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

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

НадписьСсылка1 = Ф.НадписьСсылка();
Форма1.ЭлементыУправления.Добавить(НадписьСсылка1);
НадписьСсылка1.Текст = "Пример гиперссылок:" + Символы.ПС + "Первая ссылка - scriptcoding.ru." + Символы.ПС + "Вторая ссылка - oscript.io.";
НадписьСсылка1.Границы = Ф.Прямоугольник(10, 10, 300, 100);
НадписьСсылка1.СтильГраницы = Ф.СтильГраницы.Одинарная;

КоллекцияСсылок1 = НадписьСсылка1.Ссылки;
Ссылка1 = Ф.Ссылка();
Индекс1 = КоллекцияСсылок1.Добавить(Ссылка1); // Новая ссылка должна быть добавлена в коллекцию ссылок до установки каких либо её свойств.
Ссылка1.Начало = 36;
Ссылка1.Длина = 15;
Ссылка1.Данные = "scriptcoding.ru";
Ссылка1.Данные = Дата(1984,03,26,06,24,21);
Ссылка1.Данные = Новый Массив;
Ссылка1.Данные = 26.458;
Ссылка1.Данные = Форма1;
Ссылка1.Данные = Ф.МассивСписок();
Сообщить("Ссылка1.Данные = " + Ссылка1.Данные);
Ссылка1.Посещена = Ложь;

Ссылка2 = Ф.Ссылка();
Индекс2 = КоллекцияСсылок1.Добавить(Ссылка2); // Новая ссылка должна быть добавлена в коллекцию ссылок до установки каких либо её свойств.
Ссылка2.Доступность = Ложь;
Коллекция = Ссылка2.Метка;
Коллекция.Добавить(Истина, "Булево");
Ссылка2.Начало = 69;
Ссылка2.Длина = 10;
Ссылка2.Имя = "Ссылка2Имя";
Ссылка2.Описание = "Ссылка2Описание";
Сообщить("Ссылка2.Описание = " + Ссылка2.Описание); // Ссылка2.Описание = Ссылка2Описание

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

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

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

НадписьСсылка1 = Ф.НадписьСсылка();
Форма1.ЭлементыУправления.Добавить(НадписьСсылка1);
НадписьСсылка1.Текст = "Пример гиперссылок:" + Символы.ПС + "Первая ссылка - scriptcoding.ru." + Символы.ПС + "Вторая ссылка - oscript.io.";
НадписьСсылка1.Границы = Ф.Прямоугольник(10, 10, 300, 100);
НадписьСсылка1.СтильГраницы = Ф.СтильГраницы.Одинарная;

КоллекцияСсылок1 = НадписьСсылка1.Ссылки;
Ссылка1 = Ф.Ссылка();
Индекс1 = КоллекцияСсылок1.Добавить(Ссылка1); // Новая ссылка должна быть добавлена в коллекцию ссылок до установки каких либо её свойств.
Ссылка1.Начало = 36;
Ссылка1.Длина = 15;
Ссылка1.Данные = "scriptcoding.ru";
Ссылка1.Данные = Дата(1984,03,26,06,24,21);
Ссылка1.Данные = Новый Массив;
Ссылка1.Данные = 26.458;
Ссылка1.Данные = Форма1;
Ссылка1.Данные = Ф.МассивСписок();
Ссылка1.Посещена = Ложь;

Ссылка2 = Ф.Ссылка();
Индекс2 = КоллекцияСсылок1.Добавить(Ссылка2); // Новая ссылка должна быть добавлена в коллекцию ссылок до установки каких либо её свойств.
Ссылка2.Доступность = Ложь;
Коллекция = Ссылка2.Метка;
Коллекция.Добавить(Истина, "Булево");
Ссылка2.Начало = 69;
Ссылка2.Длина = 10;
Ссылка2.Имя = "Ссылка2Имя";
Ссылка2.Описание = "Ссылка2Описание";

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