ВыборЦвета.ПозицияКурсора (ColorPicker.CursorPosition) Свойство

Копировать

Перем ТФ, ВыборЦвета1;

Процедура ПриОткрытии() Экспорт
	ТФ.Верхний.Текст = "Выберите цвет";
	ВыборЦвета1.ПозицияКурсора = ТФ.Точка(1, 0);
КонецПроцедуры

Процедура ВыборЦвета1_ПриИзмененииЦвета() Экспорт
	ПозицияКурсора = ВыборЦвета1.ПозицияКурсора;
	ТФ.Уведомление().Показать("ПозицияКурсора.Икс = " + ПозицияКурсора.Икс + "
	|ПозицияКурсора.Игрек = " + ПозицияКурсора.Игрек, -1);
КонецПроцедуры

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

ВыборЦвета1 = ТФ.Верхний.Добавить(ТФ.ВыборЦвета("ВыборЦвета", , 5));
ВыборЦвета1.ПриИзмененииЦвета = ТФ.Действие(ЭтотОбъект, "ВыборЦвета1_ПриИзмененииЦвета");

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Копировать

Перем ТФ, ВыборЦвета1, ПозицияКурсора;

Процедура ПриОткрытии() Экспорт
	ВыборЦвета1.ПозицияКурсора = ТФ.Точка(1, 0);
	ПозицияКурсора = ВыборЦвета1.ПозицияКурсора;
	ТФ.Завершить();
КонецПроцедуры

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

ВыборЦвета1 = ТФ.Верхний.Добавить(ТФ.ВыборЦвета("ВыборЦвета", , 5));

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");
ТФ.ЗапуститьИЗавершить();

Сообщить(?(
ПозицияКурсора.Икс = 1
, "", "!!! ") + "ВыборЦвета.ПозицияКурсора (ColorPicker.CursorPosition) Свойство" + " " + ТекущаяДата() + Символы.ПС);