OneScriptForms.FindWindowByCaption Method

Синтаксис

НайтиОкноПоЗаголовку(<Текст>)

Параметры

Текст (обязательный): Тип: Строка.; Заголовок окна.

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

Описание

Возвращает дескриптор окна имя которого соответствует указанной строке.

Примечание

Важно: В системе отличной от семейства Windows данный метод неприменим.

Пример

Дескриптор = Ф.НайтиОкноПоЗаголовку("Тестовое окно");

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

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

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

Форма1.Текст = "Тестовое окно";

Дескриптор = Ф.НайтиОкноПоЗаголовку("Тестовое окно");
Сообщить("Дескриптор = " + Дескриптор);

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

Тестовый код

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

Перем Ф, Форма1, Дескриптор;

Процедура Форма1_ПриНажатииКнопкиМыши() Экспорт
	Дескриптор = Ф.НайтиОкноПоЗаголовку("Тестовое окно");
	// Сообщить("" + Дескриптор);
	Форма1.Закрыть();
КонецПроцедуры

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

Форма1.Текст = "Тестовое окно";

Курсор1 = Ф.Курсор();
Точка1 = Форма1.Положение;
Курсор1.Позиция = Ф.Точка(Точка1.Икс + 100, Точка1.Игрек + 100);

Ф.НажатьКнопкуМыши(Ф.ФлагиМыши.ЛеваяВниз + Ф.ФлагиМыши.ЛеваяВверх);

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

Сообщить(?(
Дескриптор <> Неопределено
, "", "!!! ") + "ФормыДляОдноСкрипта.НайтиОкноПоЗаголовку (OneScriptForms.FindWindowByCaption) Метод" + " " + ТекущаяДата());