Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Процедура по таймеру каждые 0.2 секунды для опроса оборудования (8.2 самописка)          
cocon2003 Подменю пользователя
сообщение 18.05.16, 11:02
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 36
Спасибо сказали: 0 раз
Рейтинг: 0

Подключены весы через СОМ порт.
По таймеру опрашиваю и что-то делаю с весом.
Но посекундный опрос при постоянном досыпании груза до нормы напрягает - нужно чаще.

Процедура ОпросВесов()
    rs232.ЗаписатьСтроку("G55W");
    Вес = ОтветВесов; // глобал. переменная
КонецПроцедуры    

Процедура ВклНажатие(Элемент)
    ПодключитьОбработчикОжидания("ОпросВесов", 1, Ложь);
КонецПроцедуры

Процедура ВыклНажатие(Элемент)
    ПодключитьОбработчикОжидания("ОпросВесов", 0.1, Истина);
КонецПроцедуры


Vofka Подменю пользователя
сообщение 18.05.16, 11:05
Сообщение #2

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

Какое отношение это имеет использованию конфигурации ПУБ ? Вопросто вообще о 7.7?

cocon2003 Подменю пользователя
сообщение 18.05.16, 13:31
Сообщение #3

Общительный
**
Группа: Пользователи
Сообщений: 36
Спасибо сказали: 0 раз
Рейтинг: 0

Vofka @ Сегодня, 12:05 *,
Редкий гость на сайте - перепуталась ветка.
Есть возможность перенести?

Vofka Подменю пользователя
сообщение 18.05.16, 13:58
Сообщение #4

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

Переезжаем (надеюсь, я правильно стелепатировал куда).

cocon2003, теперь по теме. Сделайте так:
Процедура ВклНажатие(Элемент)
    ПодключитьОбработчикОжидания("ОпросВесов", 0.2, Ложь);
КонецПроцедуры

cocon2003 Подменю пользователя
сообщение 18.05.16, 14:01
Сообщение #5

Общительный
**
Группа: Пользователи
Сообщений: 36
Спасибо сказали: 0 раз
Рейтинг: 0

Vofka @ Сегодня, 14:58 *,
Спасибо за транспортировку,
но предложение недопустимо.
При значении Ложь - только целые числа принимаются :-(

Vofka Подменю пользователя
сообщение 18.05.16, 14:25
Сообщение #6

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

Да, действительно. В голову приходит такой вариант:

Процедура ОбработчикОжидания1()
    
    rs232.ЗаписатьСтроку("G55W");
    Вес = ОтветВесов;
    
    ПодключитьОбработчикОжидания("ОбработчикОжидания2", 0.1, Истина);
    
КонецПроцедуры

Процедура ОбработчикОжидания2()
    
    rs232.ЗаписатьСтроку("G55W");
    Вес = ОтветВесов;
    
    ПодключитьОбработчикОжидания("ОбработчикОжидания1", 0.1, Истина);
    
КонецПроцедуры    

Процедура ВклНажатие(Элемент)
    
    ПодключитьОбработчикОжидания("ОбработчикОжидания1", 0.1, Истина);
    
КонецПроцедуры

Процедура ВыклНажатие(Элемент)
    
    ОтключитьОбработчикОжидания("ОбработчикОжидания1");
    ОтключитьОбработчикОжидания("ОбработчикОжидания2");
    
КонецПроцедуры


Сообщение отредактировал Vofka - 18.05.16, 14:26

cocon2003 Подменю пользователя
сообщение 18.05.16, 14:55
Сообщение #7

Общительный
**
Группа: Пользователи
Сообщений: 36
Спасибо сказали: 0 раз
Рейтинг: 0

Vofka @ Сегодня, 15:25 *,
Не совсем понял, но если Вы об этом
Процедура ТеребитьВесы()
    ПодключитьОбработчикОжидания("ОпросВесов", 0.2, Истина);
    ПодключитьОбработчикОжидания("ОпросВесов", 0.2, Истина);
    ПодключитьОбработчикОжидания("ОпросВесов", 0.2, Истина);
    ПодключитьОбработчикОжидания("ОпросВесов", 0.2, Истина);
    ПодключитьОбработчикОжидания("ОпросВесов", 0.2, Истина);    
КонецПроцедуры    

Процедура ОпросВесов()
    rs232.ЗаписатьСтроку("G55W");
    Вес = ОтветВесов;
КонецПроцедуры    

Процедура ВклНажатие(Элемент)
    ПодключитьОбработчикОжидания("ТеребитьВесы", 1, Ложь);
КонецПроцедуры

Процедура ВыклНажатие(Элемент)
    ПодключитьОбработчикОжидания("ТеребитьВесы", 0.1, Истина);
КонецПроцедуры

То чудо не случилось

Vofka Подменю пользователя
сообщение 18.05.16, 15:14
Сообщение #8

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

Я не об этом. Внимательнее посмотрите на код. Суть в том, что обработчики ожидания подключаются поочередно из разных процедур друг к другу. Как доступнее объяснить идею - не знаю.

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 16.06.25, 21:49
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!