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

Синтаксис

Курсоры()

Параметры

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

Тип: Курсоры (Cursors).

Описание

Создаёт новый экземпляр класса Курсоры (Cursors).

Примечание

Пример

Курсоры1 = Ф.Курсоры();
Полный пример кода 

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


Перем Ф,  ТекущийКурсор, Кнопка1;

Процедура Кнопка1_Нажатие() Экспорт
    Если ТекущийКурсор = "Ладонь" Тогда
        Кнопка1.Курсор = Ф.Курсоры().Перекрестие;
        ТекущийКурсор = "Перекрестие";
    ИначеЕсли ТекущийКурсор = "Перекрестие" Тогда
        Кнопка1.Курсор = Ф.Курсоры().Ладонь;
        ТекущийКурсор = "Ладонь";
    КонецЕсли;
КонецПроцедуры

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

Кнопка1 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
Кнопка1.Положение = Ф.Точка(10, 10);
Кнопка1.Ширина = 250;

Кнопка1.Высота = 75;
Кнопка1.Курсор = Ф.Курсоры().Ладонь;
Кнопка1.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

Кнопка1.Курсор = Ф.Курсоры().Ладонь;
ТекущийКурсор = "Ладонь";

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

Тестовый код 

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


Перем Ф,  ТекущийКурсор, Кнопка1;

Процедура Кнопка1_Нажатие() Экспорт
    Если ТекущийКурсор = "Ладонь" Тогда
        Кнопка1.Курсор = Ф.Курсоры().Перекрестие;
        ТекущийКурсор = "Перекрестие";
    ИначеЕсли ТекущийКурсор = "Перекрестие" Тогда
        Кнопка1.Курсор = Ф.Курсоры().Ладонь;
        ТекущийКурсор = "Ладонь";
    КонецЕсли;
КонецПроцедуры

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

Кнопка1 = Форма1.ЭлементыУправления.Добавить(Ф.Кнопка());
Кнопка1.Положение = Ф.Точка(10, 10);
Кнопка1.Ширина = 250;

Кнопка1.Высота = 75;
Кнопка1.Курсор = Ф.Курсоры().Ладонь;
Кнопка1.Нажатие = Ф.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

Кнопка1.Курсор = Ф.Курсоры().Ладонь;
ТекущийКурсор = "Ладонь";

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

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

ФормыДляОдноСкрипта (OneScriptForms) Класс | Библиотека OneScriptForms