Современные технологии автоматизации» («СТА») —  журнал для квалифицированных специалистов по промышленной автоматизации Форум СТА — современные технологии автоматизации Домашняя страница
Домашняя страница форума CTA Домашняя страница форума CTA > II. АСУТП и SCADA > Программное обеспечение
  Активные темы Активные темы
  FAQ FAQ  Искать в форуме   Зарегистрироваться Зарегистрироваться  Вход в систему Вход в систему

TWXView32 9.22 и VBA в Genesis32

 Ответить Ответить Страница  12>
Автор
Сообщение
misha Смотреть выпадающим
Новичок
Новичок


Присоединился: 04 Февраль 2009
Online Status: Offline
Публикации: 26
Свойства публикации Свойства публикации   Ответить, цитируя автора - misha Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Тема сообщения: TWXView32 9.22 и VBA в Genesis32
    Опубликовано: 09 Февраль 2012 22:25
Добрый день!

На экранной форме элемент TWXView32.

Перья добавляются/изменяются из VBA.
Среди прочего, есть строки:

'определение пера
Dim pen As TWXVPEN
Set pen = ThisDisplay.TWXViewer1.GetPen(PenName, PenType)

'задание атрибутов пера
........
pen.PenText = "Имя пера"    
pen.PenUnits = "Единицы пера"
pen.PenWidth = PenWidth
pen.HighLimit = HighLimit
pen.LowLimit = LowLimit
........

Все это отлично работает на версии 9.13, но при переходе на 9.22, не работают строки:

pen.PenText = "Имя пера"    
pen.PenUnits = "Единицы пера"

В поле имени пера отображается "Неназначено", в поле единиц измерений вообще пусто.
Ситуация повторяется на Windows XP и Windows 7.

В чем может быть причина?
Наверх
Rumba_Junior Смотреть выпадающим
Новичок
Новичок
Аватар

Присоединился: 09 Август 2011
Online Status: Offline
Публикации: 21
Свойства публикации Свойства публикации   Ответить, цитируя автора - Rumba_Junior Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 16 Февраль 2012 11:07
Ситуация такая же)

Вчера думал, а сегодня утром попробовал вставить новый активХ, который в 9.22 идет. До конца не тестировал. но в подписях под областью построений появились имена перьев. Буду тестировать дальше.
Наверх
Rumba_Junior Смотреть выпадающим
Новичок
Новичок
Аватар

Присоединился: 09 Август 2011
Online Status: Offline
Публикации: 21
Свойства публикации Свойства публикации   Ответить, цитируя автора - Rumba_Junior Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 16 Февраль 2012 11:12
Не, рано радовался((
Наверх
alfa2 Смотреть выпадающим
Участник
Участник
Аватар

Присоединился: 10 Март 2011
Online Status: Offline
Публикации: 39
Свойства публикации Свойства публикации   Ответить, цитируя автора - alfa2 Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 16 Февраль 2012 13:38
Конкретно пока сказать не могу. Сам завтра буду компоненту настраивать.


Единственное что могу пока предположить(бонально но...), возможно изменились имена свойств при переходе на более новую версию.
Наверх
misha Смотреть выпадающим
Новичок
Новичок


Присоединился: 04 Февраль 2009
Online Status: Offline
Публикации: 26
Свойства публикации Свойства публикации   Ответить, цитируя автора - misha Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 16 Февраль 2012 22:03
Пошли дальше...

После добавления пера не из VBA, а из режима разработки, данные отображаются нормально.

При добавлении из VBA - ситуация описана в первом посте, но...

Даже при этом, если просмотреть свойства пера (Правая кнопка мыши на имени пера -> "Правка"), все поля оказываются правильно заполненными, т.е. и "Название пера", и "Ед. изм." отображаются правильно, и после нажатия на "Ок", эти названия появляются и в области комментариев TWXView32.

Имена тегов, кажется, не изменились...

Наверх
Rumba_Junior Смотреть выпадающим
Новичок
Новичок
Аватар

Присоединился: 09 Август 2011
Online Status: Offline
Публикации: 21
Свойства публикации Свойства публикации   Ответить, цитируя автора - Rumba_Junior Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 21 Февраль 2012 12:34
Такая же ситуация и в демке, что по адресу C:\Program Files\ICONICS\GENESIS32\Examples\TrendWorX32\TrendWorX32 VBA Examples\TWXScreenNavigation

А там добавляются онлайн теги. Через Edit -> OK описание становится нужным.
Наверх
alfa2 Смотреть выпадающим
Участник
Участник
Аватар

Присоединился: 10 Март 2011
Online Status: Offline
Публикации: 39
Свойства публикации Свойства публикации   Ответить, цитируя автора - alfa2 Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 24 Февраль 2012 14:14

После задания перьев сделай "таку бяку". Как я понял там просиходит переинициализация перьев.

ThisDisplay.TWXViewer1.ExitAnimate  

ThisDisplay.TWXViewer1.EnterAnimate
Наверх
misha Смотреть выпадающим
Новичок
Новичок


Присоединился: 04 Февраль 2009
Online Status: Offline
Публикации: 26
Свойства публикации Свойства публикации   Ответить, цитируя автора - misha Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 27 Февраль 2012 22:30
Да, описания отображаются нормально, но почему-то слетает диапазон отображения:

pen.HighLimit = HighLimit
pen.LowLimit = LowLimit

и вместо заданных значений, устанавливается в значения по умолчанию (0-1000).

Наверх
Kruglov Смотреть выпадающим
Prosoft.ru
Prosoft.ru


Присоединился: 20 Июль 2004
Категория: Russian Federation
Online Status: Offline
Публикации: 20
Свойства публикации Свойства публикации   Ответить, цитируя автора - Kruglov Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 29 Февраль 2012 14:26

Либо глобальный диапазон настроен и сбивает остальные. (Global Ranges и Update From Server On Animate, снять галочку Global Ranges)

 
Либо в свойствах пера в диапазонах забыли снять галочку Запрашивать диапазон у сервера (Udate from Server).
(Edit Trend Pen, Ranges)

 

 

 


Наверх
misha Смотреть выпадающим
Новичок
Новичок


Присоединился: 04 Февраль 2009
Online Status: Offline
Публикации: 26
Свойства публикации Свойства публикации   Ответить, цитируя автора - misha Ответить, цитируя автора -  ОтветитьОтвет Прямая ссылка на эту публикацию Опубликовано: 01 Март 2012 15:05
Первоначально опубликовано Kruglov

Либо глобальный диапазон настроен и сбивает остальные. (Global Ranges и Update From Server On Animate, снять галочку Global Ranges)

Либо в свойствах пера в диапазонах забыли снять галочку Запрашивать диапазон у сервера (Udate from Server).
(Edit Trend Pen, Ranges)

Если я правильно понял, описаны действия при конфигурировании пера через окно настроек.
Сложность в том, что перья добавляются через VBA.
Наверх
 Ответить Ответить Страница  12>

Переход на форум Права доступа на форуме Смотреть выпадающим

Bulletin Board Software by Web Wiz Forums® version 9.64
Powered by Web Wiz Forums Free Express Edition
Copyright ©2001-2009 Web Wiz