Путь к базе в заголовке окна

05.02.13

Разработка - Инструментарий разработчика

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

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
СтартСистемы.epf
.epf 8,45Kb
28
28 Скачать (1 SM) Купить за 1 850 руб.

И теперь не придется дергаться и/или лишний раз открывать "Справка / О программе". Тем более, что в управляемом приложении, еще один дополнительный клик мышкой Smile

Обработка работает как с обычным приложением, так и управляемым. Корректно показывает файловые и серверные базы данных.

Для тех у кого конфигурация на поддержке и не хочется снимать, можно дописать в ярлык запуска 1С /ExecuteC:\work\СтартСистемы.epf

Более искушенные могут прописать код в конце процедуры ПриНачалеРаботыСистемы()

Для обычного приложения нужно найти в "модуле обычного приложения" процедуру ПриНачалеРаботыСистемы()

Процедура ПриНачалеРаботыСистемы()


//
	ЗаголовокСистемы = ПолучитьЗаголовокСистемы();
	
	ТекущаяСтрока = СокрЛП(ВРег(СтрокаСоединенияИнформационнойБазы()));
    Если Лев(ТекущаяСтрока, 5) = "SRVR=" Тогда
        ПозицияБД = Найти(ТекущаяСтрока, ";REF=");
        
        _ИмяСервера = Сред(ТекущаяСтрока, 7, ПозицияБД-8);
        _ИмяБД = Сред(ТекущаяСтрока, ПозицияБД+6, СтрДлина(ТекущаяСтрока)-1-(ПозицияБД+6));
        
        СтрокаБД = " (Сервер: "+_ИмяСервера+" БД: "+_ИмяБД+")";
    Иначе
        _ИмяСервера = Сред(ТекущаяСтрока, 7, 100);
        
        СтрокаБД = " (Файл: "+_ИмяСервера+")";
    КонецЕсли;
    
    УстановитьЗаголовокСистемы(ЗаголовокСистемы + СтрокаБД);
	
	Отказ = Истина;

КонецПроцедуры

См. также

SALE! 15%

Инструментарий разработчика Роли и права Запросы СКД Программист Платформа 1С v8.3 Управляемые формы Запросы Система компоновки данных Конфигурации 1cv8 Платные (руб)

Набор инструментов программиста и специалиста 1С для всех конфигураций на управляемых формах. В состав входят инструменты: Консоль запросов, Консоль СКД, Консоль кода, Редактор объекта, Анализ прав доступа, Метаданные, Поиск ссылок, Сравнение объектов, Все функции, Подписки на события и др. Редактор запросов и кода с раскраской и контекстной подсказкой. Доработанный конструктор запросов тонкого клиента. Продукт хорошо оптимизирован и обладает самым широким функционалом среди всех инструментов, представленных на рынке.

10000 руб.

02.09.2020    159439    872    399    

861

SALE! 15%

Инструментарий разработчика Чистка данных Свертка базы Инструменты администратора БД Системный администратор Программист Руководитель проекта Платформа 1С v8.3 Конфигурации 1cv8 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Россия Платные (руб)

Инструмент представляет собой обработку для проведения свёртки или обрезки баз данных. Работает на ЛЮБЫХ конфигурациях (УТ, БП, ERP и т.д.). Поддерживаются управляемые и обычные формы. Может выполнять свертку сразу нескольких баз данных и выполнять их автоматически без непосредственного участия пользователя.

8400 7140 руб.

20.08.2024    7772    55    22    

66

Инструментарий разработчика Программист Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

Инструмент для написания и отладки кода в режиме «1С:Предприятие». Представляет собой консоль кода с возможностью пошаговой отладки, просмотра значений переменных любых типов, использования процедур и функций, просмотра стека вызовов, вычисления произвольных выражений на встроенном языке в контексте точки останова, синтаксического контроля и остановки по ошибке. В консоли используется удобный редактор кода с подсветкой, контекстной подсказкой, возможностью вызова конструкторов запроса и форматной строки.

9360 руб.

17.05.2024    23438    68    45    

117

SALE! 15%

Инструменты администратора БД Инструментарий разработчика Роли и права Программист Платформа 1С v8.3 Конфигурации 1cv8 Россия Платные (руб)

Расширение позволяет без изменения кода конфигурации выполнять проверки при вводе данных, скрывать от пользователя недоступные ему данные, выполнять код в обработчиках. Не изменяет данные конфигурации, легко устанавливается практически на любую конфигурацию на управляемых формах.

10000 8500 руб.

10.11.2023    10431    36    24    

61

SALE! 15%

Пакетная печать Печатные формы Инструментарий разработчика Программист Платформа 1С v8.3 Запросы 1С:Зарплата и кадры бюджетного учреждения 1С:Конвертация данных 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 Платные (руб)

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

22200 19980 руб.

06.10.2023    15401    35    7    

70

SALE! 35%

Инструментарий разработчика Инструменты администратора БД Системный администратор Программист Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Россия Платные (руб)

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

4800 3120 руб.

14.01.2013    187985    1138    0    

912

SALE! 15%

Инструментарий разработчика Программист 8.3.14 1С:Конвертация данных Россия Платные (руб)

Расширение для конфигурации “Конвертация данных 3”. Добавляет подсветку синтаксиса, детальную контекстную подсказку, глобальный поиск по коду.

15000 12750 руб.

07.10.2021    17303    6    32    

42

Инструментарий разработчика Программист Платные (руб)

Менеджер конфигураций 1С — альтернативный стартер информационных баз 1С:Предприятие.

1800 руб.

21.02.2023    7695    8    35    

23
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. trdm 05.02.13 18:45 Сейчас в теме
Хороший и нужный боян...
2. KonstB 180 06.02.13 09:14 Сейчас в теме
Бредовая реализация...
3. akomar 458 07.02.13 14:47 Сейчас в теме
В типовых конфигурациях есть возможность менять заголовки окон без изменения оной, а для собственных поделок подойдет, может:)
4. defender 360 07.02.13 15:06 Сейчас в теме
(3) В типовых заголовок нужно выставлять руками, а тут он формируется сам. У меня коллега делал локальную копию базы каждое утро. Не прописывать же каждый день, что база отладочная.
5. sterehov77 10.12.14 16:52 Сейчас в теме
День добрый!
Прочитал вашу статью.
Взял предложенный вами код и сделал свою обработку.
Дописал в ярлык для запуска баз которые рабочие, тестовые все прекрасно.
Создал пустую конфигурацию, открыл в конфигураторе обработку,
добавил пробел, затем убрал, нажал иконку на сохранение, получил сообщение
{ВнешняяОбработка.ТестоваяБаза.МодульОбъекта(2,21)}: Процедура или функция с указанным именем не определена (ПолучитьЗаголовокСистемы)
ЗаголовокСистемы = <<?>>ПолучитьЗаголовокСистемы(); (Проверка: Сервер)
{ВнешняяОбработка.ТестоваяБаза.МодульОбъекта(18,4)}: Процедура или функция с указанным именем не определена (УстановитьЗаголовокСистемы)
<<?>>УстановитьЗаголовокСистемы(ЗаголовокСистемы + СтрокаБД); (Проверка: Сервер)
Продолжил сохранение, не смотря на предупреждение, запустил работает!?
Интересно в чем же проблема.
Платформа 1С 8.3 (8.3.5.1119)
Прикрепленные файлы:
ТестоваяБаза1.epf
1Cv8.cf
6. AndrewVVS 27.09.16 10:31 Сейчас в теме
(5) sterehov77, Синтаксис:
УстановитьЗаголовокСистемы(<Заголовок>)
Параметры:<Заголовок> (обязательный)
Тип: Строка.Текст, устанавливаемый в качестве заголовка главного окна программы.
Описание:Устанавливает новый заголовок главного окна программы.
Доступность: Толстый клиент.

На сервере не будет работать, чтобы не выскакивала ошибка нужно заключить данную процедуру в конструкцию #Если Толстый клиент #КонецЕсли
Оставьте свое сообщение