Чтение и запись.
Тип: Произвольный.
Возвращает или задает код для выполнения при изменении файла или каталога по заданному пути.
Событие ПриИзменении (Changed) возникает при изменении размера, системных атрибутов, времени последней записи, времени последнего доступа или разрешений безопасности на файл или каталог в отслеживаемом каталоге.
НаблюдательФайловойСистемы1.ПриИзменении = Ф.Действие(ЭтотОбъект, "НаблюдательФайловойСистемы1_ПриИзменении");
Копировать Выделить всёПерем Ф; Процедура НаблюдательФайловойСистемы1_ПриИзменении() Экспорт Аргументы = Ф.СобытиеФайловойСистемыАрг(); Сообщить("Аргументы.Имя = " + Аргументы.Имя); Сообщить("Аргументы.ПолныйПуть = " + Аргументы.ПолныйПуть); Сообщить("Аргументы.ТипИзменения = " + Аргументы.ТипИзменения); Сообщить("=========================="); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма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_ПриИзменении", "", "!!! ") + "НаблюдательФайловойСистемы.ПриИзменении (FileSystemWatcher.Changed) Свойство" + " " + ТекущаяДата());
НаблюдательФайловойСистемы (FileSystemWatcher) Класс | Библиотека OneScriptForms