1с неудачная попытка создания окна

Обновлено: 06.01.2025

"Здравствуйте. Не могу войти в программу 1С Предприятие 7.7 Упрощенная система налогообложения ред.1.3 (7.70.210). Ошибка выполнения Глобального модуля. БухИтоги = СоздатьОбъект("БухгалтерскиеИтоги"); : Неудачная попытка создания объекта (БухгалтерскиеИтоги)"

Ее купить сначала надо!

Зайдите в монопольном режиме и сделайте перерасчет бухгалтерских итогов. Насчет купить согласен. Только 7-ка уже не продается.

Продается и пересчет здесь не поможет.

> Продается и пересчет здесь не поможет. Что, все еще продается? Я думал, что только по письму с обоснованием. Насчет персчета согласен. Надо период расчета поменять, а уже потом пересчитать.

> Насчет персчета согласен. Надо период расчета поменять, а уже потом пересчитать. не поможет, у нее бух.компонента не установлена. > Что, все еще продается? Я думал, что только по письму с обоснованием именно по письму и продается.

злой дядя. а вдруг у человека просто компоненты разнесены по разным папкам и запускает он не тот ярлык?

вот честные так и мучаются, а не очень - давно бы выход (на компоненты) нашли!

как Олимпиада поживает? смотрится?

не, не видно ничего! Весь экран заплеван!

Читают тему:

Мероприятия

1C:Лекторий: 25 ноября 2021 года (четверг, начало в 12:00) — Специальные механизмы в "1С:ЗУП 8" (ред. 3)

Где купить СОФТ
Вакансии фирм-партнеров "1С"

Центры Сертифицированного Обучения
Интернет курсы обучения "1С"
Самоучители
Учебный центр № 1
Учебный центр № 3

Сертификация по "1С:Профессионал"
Организация обучения под заказ
Книги по 1С:Предприятию

При использовании материалов активная прямая гиперссылка на перепечатанный материал обязательна.

Редакция БУХ.1С не несет ответственности за мнения и информацию, опубликованную в комментариях к материалам.

Редакция уважает мнение авторов, но не всегда разделяет его.

Дизайн сайта

Мы используем файлы cookie, чтобы анализировать трафик, подбирать для вас подходящий контент и рекламу, а также дать вам возможность делиться информацией в социальных сетях. Если вы продолжите использовать сайт, мы будем считать, что вас это устраивает.

Провел несколько экспериментов и сделал для себя открытие. Оказывается, пароль в 1С 7.7 регистронезависимый! :((((
Столько лет я верил что регистр имеет значение .

Исходя из этого, при проверке можно оставить только переменные: <ХешПравильногоПароля> и <ХешПароля2>. И условие упростить:

Если ХешПравильногоПароля=ХешПароля2 Тогда
. снять блокировку .
КонецЕсли;

(37) Размеры как раз и подбирал что бы покрасивше (но это уже дело вкуса).
по поводу регистронезависимого пароля - для меня тоже открытие (sarius подсказал), но так как я лично тестов не проводил, то просто добавил еще одну проверку. Список контролируемых клавиш - хороший ход.
Но не понятно, зачем он здесь?
Разве не достаточно перехватывать только клавишу <Esc>? (39) Нет, нужно перехватывать еще и хоткеи.
У меня используется обработка http://infostart.ru/projects/3800/ - так если вызывать с помощью хоткея какой-нибудь журнал - то он открывается под "экраном блокировки", что есть не очень-то красиво.
то же самое относиться к хоткеям на кнопках и пунктах меню. (40) я комбинации горячих клавиш сам нигде не назначал, кроме тех, что по умолчанию заложены в конигурацию. Поэтому, у меня ни один хоткей под блокировкой не срабатывает.
Но уж сильно большой список нужных клавиш у тебя получился.
Я бы пошел по принципу "чего меньше". Меньше перечислений нужных или НЕ нужных. Проследил бы закономерность всех хоткеев, например, они все используют сочетание Контр+Шифт, или везде используются функциональные (F?) и т.д.
Но не подумай что я тебя учу? Тем более, что обработка уже написана и работает!
Хочу отметить - написана хорошо даже для не опытных или начинающих - только скачай и запускай! Это признак профессионализма!

(43) мерси за коплимант! (с) За двома Зайцами
:)

А по сути я и пошел по принципу "чего меньше" - просто у меня уже есть несколько обработок, которые содержат в себе списки "отфильтрованных" клавиш и я банально сделал копи-паст ;)

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

Для х=1 по 250 Цикл
х=х+14;
Форм.Прозрачность=х;
КонецЦикла;
Форм.Прозрачность=255;

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

(42) - поддерживаю полностью!
А я изменил прозрачность до 190.

Предлагаю при включении блокировки в цикл вставить задержку на 500 миллисекунд. Или другое число, кому как нравится :)

".
Для х=1 по 190 Цикл
х=х+14;
Форм.Прозрачность=х;
ВыполнитьЗадержку(500);
КонецЦикла;
. "

Когда экран затемняется постепенно, то очень красиво получается.
А для разблокировки задержка не нужна. Работать надо ведь быстро, правильно? :)

Вот код функции:

//-----------------------------------------------
Функция ВыполнитьЗадержку(мс=1000) Экспорт
// Устанавливает задержку в указанных миллисекундах
Попытка
TextScript ;
ScrptCtrl=CreateObject("MSScriptControl.ScriptControl");
ScrptCtrl.Language = "vbscript";
ScrptCtrl.AddCode(TextScript);
ScrptCtrl.Run("pause",1000);
ScrptCtrl=Пусто;
Возврат 1;
Исключение
Возврат 0;
КонецПопытки;
КонецФункции // ВыполнитьЗадержку

(46) Хорошая идея, только сильно зависит от скорости компа. Например у меня и так плавно затухает. (46) что-то в цикле задержка не срабатывает . :(
Надо еще покопаться. (48) Попробуй "обычную" задержку:
ТекВремя=ТекущееВремя(); Пока ТекВремя=ТекущееВремя() Цикл Состояние ("Пауза");КонецЦикла;

(46) функция не рабочая, прошу никого не копировать. Объект WScript с 1С-ом не подружен. Подружу, перевыложу.

(49) - задержка на 1 секунду. Это слишком много, миллисекунд 100 - с головой.

(46) и (51) - туфта все это!

Есть метод Sleep у объекта "Система" внешней компоненты 1С++.
При мощном ПК затухание смотрится красиво только при задержке 12 миллисекунд, не больше.

а у меня сделано так

//ЛОКАЛЬНЫЕ ПЕРЕМЕННЫЕ
Перем ЕстьАктивность; //нужна для определения активности пользователя

//глобальная процедура внешней компоненты FormEx

//__________________________________________________________ ___________________
Процедура ПриНажатииКнопкиКлавиатуры(Конт, КодКл, кнАльт, кнШифт, кнКонтрол, Символ)
ЕстьАктивность = 1;
КонецПроцедуры

//__________________________________________________________ ___________________
Процедура ЗаблокироватьПрограмму()
//проверка активности пользователя
//в конце каждой минуты флаг активности выставляем в ноль
//если за минуту активность была то время неактивности обнуляем
//иначе время неактивности накапливаем
//как только время неактивности достигает значения переменной
//КолвоМинутДоБлокировки - блокируем программу.

Если ПустоеЗначение(глПользователь.КолвоМинутДоБлокировки) = 1 Тогда
Возврат;
КонецЕсли;

Если ЕстьАктивность = 0 Тогда
ВремяНеактивностиПользователя = 1 + ВремяНеактивностиПользователя;
Иначе
ВремяНеактивностиПользователя = 1;
КонецЕсли;

Если ВремяНеактивностиПользователя = глПользователь.КолвоМинутДоБлокировки Тогда //КолвоМинутДоБлокировки Тогда
Если глПрограммаЗаблокирована = 0 Тогда
глПрограммаЗаблокирована = 1;
ОткрытьФормуМодально("Обработка.ПроверкаПароля", "Блокировка");
КонецЕсли;
КонецЕсли;

ЕстьАктивность = 0;
КонецПроцедуры // ЗаблокироватьПрограмму

//__________________________________________________________ ___________________
Процедура парамОбработкаОжидания()
ЗаблокироватьПрограмму();
КонецПроцедуры // парамОбработкаОжидания

//__________________________________________________________ ___________________
Процедура ПриНачалеРаботыСистемы()
Если ЗагрузитьВнешниеКомпоненты() = 0 Тогда
СтатусВозврата(0);
Возврат;
КонецЕсли;

Если глПриНачалеРаботыСистемы() <> 1 Тогда
СтатусВозврата(0);
Возврат;
КонецЕсли;

//вызов процедуры парамОбработкаОжидания каждые 60 секунд (60000мС)
глСервис.ОбработкаОжидания("парамОбработкаОжидания", 60000);
КонецПроцедуры // ПриНачалеРаботыСистемы

Читайте также: