Опубликовано: 10.01.2021

Объект «V7SysInfo»

Объект "V7SysInfo" — это один из объектов внешней компоненты V7plus. Объект предназначен для получения информации об операционной системе, под которой работает «1С:Предприятие». Он позволяет определить версию операционной системы, тип процессора, объём оперативной памяти компьютера и номер релиза программы.

Работа с объектом "V7SysInfo", как и с другими объектами, входящими в состав V7plus, начинается с инициализации внешней компоненты с помощью системной функции ЗагрузитьВнешнююКомпоненту(). Возвращаемое функцией значение будет равно единице, если инициализация прошла успешно.

// Выполняем инициализацию компоненты V77plus,
// учитывая то, что её местонахождение нам заранее неизвестно
Если ЗагрузитьВнешнююКомпоненту(КаталогИБ() + "v7plus.dll") <> 1 Тогда
   Если ЗагрузитьВнешнююКомпоненту(КаталогИБ() + "ExtForms\" + "v7plus.dll") <> 1 Тогда
      Если ЗагрузитьВнешнююКомпоненту(КаталогПрограммы() + "v7plus.dll") <> 1 Тогда
         Предупреждение("Компонента v7plus.dll не найдена!");
         Возврат;
      КонецЕсли;
   КонецЕсли;    
КонецЕсли;

// Создаем объект типа "V7SysInfo"
Инфо = СоздатьОбъект("AddIn.V7SysInfo");

// Работаем с объектом типа "V7SysInfo"
. . .

Доступ к атрибутам и методам объекта "V7SysInfo" осуществляется посредством переменной со ссылкой на объект, созданный с помощью системной функции СоздатьОбъект() (см. пример выше). Для этого имя атрибута или метода записывается через точку после имени переменной.

Примечание: Обратите внимание, что при создании объектов из внешних компонент в качестве параметра функции СоздатьОбъект() передаётся идентификатор объекта, записанный через точку после ключевого слова «AddIn».

Атрибуты объекта «V7SysInfo»

Объект "V7SysInfo" имеет несколько атрибутов, позволяющих получить некоторые сведения о компьютере, об установленной на нём операционной системе и системе «1С:Предприятие».

Получить информацию о версии операционной системы позволяет атрибут ВерсияОС (англоязычный синоним — OSVersion). Возвращаемым значением атрибута является строковое значение. Например, для ОС Windows XP это может быть строка "Microsoft Windows 2000 version 5.1 Service Pack 3 (Build 2600)".

Пример использования атрибута:

Инфо = СоздатьОбъект("AddIn.V7SysInfo");
Сообщить("Версия ОС: " + Инфо.ВерсияОС);

Получить информацию о типе установленного на компьютере процессора позволяет атрибут Процессор (англоязычный синоним — Processor). Возвращаемым значением атрибута является строковое значение. Это может быть строка следующего вида: "GenuineIntel x86 Family 6 Model 15 Stepping 13 2199 Mhz".

Пример использования атрибута:

Инфо = СоздатьОбъект("AddIn.V7SysInfo");
Сообщить("Процессор: " + Инфо.Процессор);

Получить информацию об объёме оперативной памяти компьютера позволяет атрибут ОперативнаяПамять (англоязычный синоним — Memory). Возвращаемым значением атрибута является числовое значение, показывающее объём ОЗУ в Мбайтах.

Пример использования атрибута:

Инфо = СоздатьОбъект("AddIn.V7SysInfo");
Сообщить("Объем ОЗУ: " + Инфо.ОперативнаяПамять + " Мбайт" );

Получить информацию о релизе установленной программы «1С:Предприятие» позволяет атрибут РелизПрограммы (англоязычный синоним — ProgrammRelease). Возвращаемым значением атрибута является строковое значение, содержащее номер релиза, например, "7.70.029".

Пример использования атрибута:

Инфо = СоздатьОбъект("AddIn.V7SysInfo");
Сообщить("Релиз системы "1С:Предприятие": " + Инфо.РелизПрограммы);

Получить информацию об имени главного исполнимого файла программы позволяет атрибут ИмяФайлаПрограммы (англоязычный синоним — ProgrammFileName). Возвращаемым значением атрибута является строковое значение.

Пример использования атрибута:

Инфо = СоздатьОбъект("AddIn.V7SysInfo");
Сообщить("Исполнимый файл программы: " + Инфо.ИмяФайлаПрограммы);

Примечание: По имени файла можно определить установленную версию технологической оболочки. Исполнимый файл системы «1С:Предприятие» локальной версии имеет имя 1cv7l.exe, файл сетевой версии — 1cv7.exe, а файл SQL-версии — 1cv7s.exe.

Методы объекта «V7SysInfo»

Сгенерировать уникальный 128-битный идентификатор GUID позволяет метод СоздатьGUID() (англоязычный синоним — CreateGUID()). Параметры у метода отсутствуют. Возвращаемым значением метода является строка, содержащая сгенерированный GUID.

Пример использования метода:

СисИнфо = СоздатьОбъект("AddIn.V7SysInfo");
Таб = СоздатьОбъект("Таблица");
. . .
ИмяФайлаОтчета = СисИнфо.СоздатьGUID();
Таб.Записать(ИмяФайлаОтчета, "MXL");

Примечание: GUID (Globally Unique Identifier) — статистически уникальный 128-битный идентификатор. Его главная особенность — уникальность, которая позволяет создавать расширяемые сервисы и приложения без опасения конфликтов, вызванных совпадением идентификаторов. Хотя уникальность каждого отдельного GUID не гарантируется, общее количество уникальных ключей настолько велико (2128 или 3,4028×1038), что вероятность того, что в мире будут независимо сгенерированы два совпадающих ключа, крайне мала.

В тексте GUID записывается в виде строки из тридцати двух шестнадцатеричных цифр, разбитой на группы дефисами и окружённой фигурными скобками, например:

{6F9619FF-8B86-D011-B42D-00CF4FC964FF}

Последнее 8-байтное данное при записи часто разбивается на 2+6.

Получить ключевое слово по указанному адресу на диске ИТС позволяет метод ПроверитьИмяФайла() (англоязычный синоним — CheckFileName()). Возвращаемым значением метода является строка, содержащая ключевое слово. На практике метод используется очень редко.

Синтаксис:

ПроверитьИмяФайла(<Адрес>)

где <Адрес> — строковое значение, содержащее адрес ключевого слова.

Пример использования:

Инфо = СоздатьОбъект("AddIn.V7SysInfo");
. . .
Делт = КодСимв("Z") - КодСимв("A") + 1;
СтрокаИТС = Инфо.ПроверитьИмяФайла("1");
Если ПустоеЗначение(СтрокаИТС)=1 Тогда
   Сообщить("Вставьте диск ИТС в дисковод и повторите операцию");
   Возврат 0;
КонецЕсли;
ИТС = (КодСимв(Сред(СтрокаИТС,2,1)) + Делт - КодСимв(Лев(СтрокаИТС,1))) % Делт;

Другие статьи по схожей тематике