// Удаляет временные файлы и папки с компьютера
Напомнить("Подождите...", Этот.Наименование);
Подождать(1);
Текст = "";
А     = Компьютеры.Директории("%TEMP%");
К     = Файлы.Очистить(А);
Текст.Добавить("Удалено "+К+" файлов и папок из "+А);
А = Компьютеры.Директории("%WINDIR%");
А = А + "\Temp";
К = Файлы.Очистить(А);
Текст.Добавить("Удалено "+К+" файлов и папок из "+А);
Сообщить(Текст);
Напомнить(Текст, Этот.Наименование, 15);