Восстановить положение гаджетов
// Восстанавливает положение гаджетов из заданного файла настроек в зависимости от количества подключенных мониторов
Путь = Компьютеры.Директории("%APPDATA%");
Путь = Строки.Заменить(Путь, "Roaming", "\Local\Microsoft\Windows Sidebar");
// Сообщить(Путь);
А = "";
Для н = 1 По Мониторы.Количество() Цикл
А = А + "-"+ Строки.Строка(н)+ "-"+ Мониторы.Лево(н-1)+ "-"+ Мониторы.Ширина(н-1);
Конец;
ИмяФайла = Путь + "\settings"+ А + ".ini";
Если (Файлы.Есть(ИмяФайла)) Тогда
Запустить(Компьютеры.Директории("%WINDIR%")+"\System32\taskkill.exe", "/f /im sidebar.exe");
Подождать(1);
Файлы.Копировать(ИмяФайла, Путь+"\settings.ini");
Подождать(1);
Запустить("C:\Program Files\Windows Sidebar\sidebar.exe");
Иначе
Сообщить("Файл с настройками не найден", ИмяФайла);
Конец;