施耐德Citect软件中使用cicde脚本获取过程分析器对象视图选择的时间跨度

今天做一个小的练习，在施耐德Citect软件中使用cicde脚本获取过程分析器对象视图选择的时间跨度。在cicode编辑器下新建下面的函数
FUNCTION GetDurationInformation()
STRING duration;
OBJECT pa;
OBJECT hpanes;
OBJECT hpane;
OBJECT hpens;
OBJECT hpen;
pa=ObjectByName('AN5');
//趋势板1
hpanes=_OBJECTGetProperty(pa,'Panes');
hpane=_OBJECTCallMethod(hpanes,'get_item',1);
//在板1下面添加趋势笔1
hpens=_OBJECTGetproperty(hpane,'Pens');
hpen=_OBJECTCallMethod(hPens,'get_item',1);
duration = _ObjectCallMethod(hPen, 'GetInformation', 'Duration');
Message('标题',duration ,0);
END

假设过程分析器在页面的编号是AN5，在画面上放置一个按钮，按钮的鼠标点击事件调用上面的函数，保存编译运行，项目程序在运行期间，使用鼠标在对象视图工具栏选择不同的时间跨度，就会弹出提示框，明确选择什么时间跨度，我想用这个功能在后面练习中做进一步丰富，实现其他想要的效果。