Окошко Надоедания

[Tomash]

добрый день

поставили задачу:

- сделать неубираемое "окошко" напоминания, появляющееся у оператора при начале работы в нижнем правом углу рабочего поля программы
конечно же, чтобы надпись напоминания можно было бы менять в любой момент времени администратором базы, или хотя бы разово, перед началом рабочего дня, соответственно обновляя данные у всех операторов. желательно ещё красным цветом, огромными буквами и проч и проч...

что-то я не могу сообразить, как бы это по-проще сделать, формочку нарисовать и обязаловкой выводить её, или что-то в интерфейс закинуть операторам...

простые варианты с джабером, ирц, скайпом отвергают на почве "никто туда смотреть не будет", а в 1С они по-любому зайдут...

подскажите что-нибудь, задача "творческая", рассматриваются все варианты

 

[Дайнеко]

* Сам текст сообщения набирать в Константе
* Завести в Глоб модуле процедуру "Ожидание", которая проверяет Конст
*повесить ее в периодический вызов

 

[Tomash]

* Сам текст сообщения набирать в Константе
* Завести в Глоб модуле процедуру "Ожидание", которая проверяет Конст
*повесить ее в периодический вызов

ОК, теперь мы получаем данные, они у нас обновляются периодически, а выводим их куда? всё-таки на обыкновенную форму?

начальник насмотрелся на всплывающую флэш рекламу на сайтах и хочет "полупрозрачное окошко"... понятно что так не бывает, но может что-то где-то в третьем приближении похожее...

конфа 77

 

[Tomash]

Вобщем, пошёл немного другим путём, нашёл ВК FormEx

с его помощью вставил в правый нижний угол рабочего пространства 1С картинку с напоминанием, а для того, чтобы девочка менеджер могла эту картинку менять на любую другую в любой момент времени, написал нехитрую обработку, выбрать картинку - копировать в нужную папку с заданным заранее именем

+ тем же формексом задал ожидание на запрос на новую картинку

может кому пригодится:

глобальный модуль

Если ЗагрузитьВнешнююКомпоненту("FormEx.dll") <> 0 тогда
Сервис = СоздатьОбъект("Сервис");
Сервис.УстановитьОбои(КаталогИБ()+"Wallpapers\Wall.bmp",4);
Иначе
Сообщить("Внешняя компонента FormEx не найдена!");
КонецЕсли;

обработка

ИмяФайла = "";
ИмяПути = "";

Если ФС.ВыбратьФайлКартинки(0, ИмяФайла, ИмяПути, "Выберите файл", "bmp",) = 1 Тогда
ФС.КопироватьФайл(ИмяПути+ИмяФайла, КаталогИБ()+"\Wallpapers\Wall.bmp",0);
КонецЕсли;

а уж в картинке пусть пишут что душе угодно...

 

[Дайнеко]

а уж в картинке пусть пишут что душе угодно...

А я понял задание так, что не пользователи пишут нехорошие буквы "на обоях", а нужно централизовано менять надписи.

 

[Tomash]

А я понял задание так, что не пользователи пишут нехорошие буквы "на обоях", а нужно централизовано менять надписи.

ну так картинка одна для всех. централизованно меняется только 1 пользователем, загружается на сервер, откуда уже обновляется для всех остальных пользователей без их участия