Идея состоит в запуске цикла уже после отработки системного события (нажатие кнопки, пункта меню и т.п.). Это реализовано с помощью подключения обработчика событий в форме и внешней компоненты. При нажатии кнопки «Выполнить» подключается процедура, в которой выполняется цикл. При этом необходимо в цикле обрабатывать сообщения Windows, чтобы работали интерфейсные элементы управления. Те элементы, которые не нужны можно сделать недоступными. Внешняя компонента как раз содержит метод, который обрабатывает сообщения Windows. Метод возвращает true, если была нажата комбинация Ctrl+Break. Код метода на С++:
HRESULT InitDone::GetMessage(VARIANT * cbKey)
{
MSG msg;
V_VT(cbKey) = VT_BOOL;
V_BOOL(cbKey) = false;
while(::PeekMessage(&msg, NULL, 0, 0, PM_REMOVE))
{
::DispatchMessage(&msg);
::TranslateMessage(&msg);
if(msg.message == WM_KEYDOWN && msg.wParam == 3) // Ctrl + Break
V_BOOL(cbKey) = true;
}
return S_OK;
}
В приложенных файлах содержатся исходники простейшей компоненты для 1, dll компоненты и шаблон обработки
Related Posts
Получение логина и пароля техподдержки 1С из базы
Класс для вывода отчета в Excel
Счет-фактура для УПП
Библиотека классов для создания внешней компоненты 1С на C#- Акт об оказании услуг (со скидками) — внешняя печатная форма для Управление торговлей 11.1.10.86
Прайс-лист с артикулом в отдельной колонке
Для прерывания цикла в 1С Предприятии имеется процедура ОбработкаПрерыванияПользователя. Метод проверяет, была ли нажата пользователем клавиша Ctrl+Break. Если клавиша была нажата, то выполнение встроенного языка прекращается и выдается соответствующее сообщение. Но иногда необходимо после выхода из цикла совершить какие-либо действия (записать в файл результаты, закрыть файл и т.п.). В данной реализации цикл выполняется в фоновом режиме. Во время выполнения доступны интерфейсные элементы управления, с помощью которых можно остановить выполнение цикла.
Перейти к публикации
Хорошая идея. Надо бы отказаться от виндового события. В сторону событий внутри 1ски позырить.
Чтобы интерфейсные элементы управления были доступны нужно обрабатывать события Windows. В 1С таких средств нету. Можно попробовать что-нибудь вроде ‘Оповестить’ вместо ‘XCom.Getmessage()’ и отлавливать событие в форме. Но, мне кажется, эффекта не будет
сталкиваюсь с ситуацией,когда под одним пользователем нужно вывести разную инфу,элементы или что-то еще. Можно было бы сделать по определению нажата ли какая-нить кнопка или нет но стандартных средств нет в 1с. С помощью этой ВК можно сделать?
«простейшей компоненты для 1,»
для 1 чего? 🙂
(3) vec435, Не совсем понял, что нужно. Мне кажется, что стандартными средствами 1С это можно сделать. Например, с помощью «горячих» клавиш
(4) rus128, Прошу прощения, ‘C’ куда-то делась
(5) хотелось бы иметь механизм, отслеживающий какие клавиши нажаты в данные момент. с помощью «горячих» клавиш можно только запустить программу
(7) vec435, Я неправильно назвал этот механизм «горячие клавиши». Прошу прощения. Я имел в виду использование сочетаний клавиш для элементов управления на формах 1С. Кнопки, пункты меню и пр. имеют свойство «СочетаниеКлавиш». Может это Вам подойдет. А если по другому, то надо писать COM объект, выполняющий перехват функциии обработки окна Windows, или ставить хук на главное окно приложения. Можно, конечно, чуть-чуть доработать функцию, приведенную выше, и вызывать ее в обработчике ожидания, но это далеко не всегда будет срабатывать
(8) как поясняющий пример: при событии открытие формы идет проверка нажатия определенной клавиши. в зависимости от результата — разные обработчики. поэтому «СочетаниеКлавиш» подойдет но с обработкой доп кнопки. с вк будет универсальнее : при открытие формы обращаемся к функции вк вроде AddIn.КлавишаНажата(«altKey»)
(9) vec435, Если нажатие клавиши вызвало открытие формы, то в событии «ПриОткрытии», при попытке прочитать очередь сообщений Windows, сообщения от нажатия клавиши, скорее всего, уже не будет. Система уже его оттуда извлечет. А если по-другому, то нужно умудриться открывать форму и нажимать клавишу в один и тот же момент времени.
(10) ну точно — форма открывается и одновременно нажата какая-то клавиша: это-то и нужно определить
(11) vec435, Насколько я понял, последовательность такая: зажимается клавиша -> с помощью каких-либо стандартных механизмов 1C открывается форма -> в событии ‘ПриОткрытии’ читается клавиша -> отпускается клавиша. Пока форма не открылась клавишу отпускать нельзя для 100% гарантии фиксации нажатия клавиши функцией чтения клавиш. С трудом представляю для чего это нужно
(12) точно так. в зависимости от нажатой клавиши можно запустить разные обработчики под одним пользователем
(13) vec435,а проверку нажатия клавиши можно повесить на любую процедуру; не обязательно открытие формы
(14) vec435,в моей консоли рабочего стола на элементе htmlдокумент есть элементы, ссылающиеся на объекты метаданных. на событии mouseup htmlдокумента стоит проверка объекта event: pEvtObj.shiftKey. В зависимости от результата я выполняю различные действия с этим элементом.
(15) vec435, Прошу прощения за долгое молчание. Разбираюсь. Что-то компонента под 8.2 отказывается работать
В новую версию компоненты добавил функцию ‘KeyMessage’, позволяющую обрабатывать нажатия клавиш. Параметрами функции являются объект и имя функции объекта, которая вызывается внутри ‘KeyMessage’. Функция объекта должна иметь три параметра: номер сообщения и два дополнительных параметра. Пример использования в прилагаемой обработке