• iopetrov
  • Участник
  • Неактивен
  • На форуме с 14 февраля 2010
  • Сообщений: 4

Тема: Добавление параметров

Можно как-нибудь добавить из скрипта параметры (заранее созданы в справочнике) к элементу технологического процесса? Пытался для этих целей использовать AttachParams, но к операции и оборудованию из техпроцесса применить так и не получилось.

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Добавление параметров

Вот примеры достаточно удобного способа установить параметры

Sub FormMacro_SetPars(TCSActiveModule)'Пример с параметрами
                    
  'Так можно установить значения везде где есть параметры (зависимый объект, иям можно узнать из PropExplorer)
  Set Pars = TCSActiveModule.Properties("Parameters").AsIDispatch  
  I = Pars.ShowModal( "Параметры 1" )
  If Not Pars.SetParameterValueByParCode( "TCS_SP_NUM", "1", -1, True ) Then Call TCSApp.ShowMessageBox( "", "Не могу устанвоить значение параметра" )
  I = Pars.ShowModal( "Параметры 2" )
  
  'А так можно установить значение параметра, если объект подерживает интерфейс  IAttachedParams
  Call TCSActiveModule.SetParameterValue( "TCS_SP_NUM", 45 )
  
  'Дальше код только для того чтобы проверить что работает
  Call Pars.Refresh
  I = Pars.ShowModal( "Параметры 3" )
 
End Sub

  • iopetrov
  • Участник
  • Неактивен
  • На форуме с 14 февраля 2010
  • Сообщений: 4

Re: Добавление параметров

Спасибо. Совсем забыл про SetParameterValueByParCode.