更改图标的代码报错，pause属性无法被接受

xinzhihuoyan

新手求助
使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
(attribute: string; oldValue: any)
is
        do
7 n0 P- g4 T' E, a' G) ^4 L9 S4 h        if ?.Pause then
: J+ z' ~6 O7 o% p                ?.CurrIconNo:=2;
  V  D0 Q3 a2 f5 Q        elseif ?.failed then
                ?.CurrIconNo:=3;
3 w+ w2 E# y& E" H( l$ t0 A        else
                ?.CurrIconNo:=1;
% q9 R( I! y: v5 ?! p        end;
, T' ~# J* E3 eend;
0 Q, l- y8 u8 F! e2 r4 b
; H. M6 }- F5 ^2 i4 ~  L控制台报错信息：
  y# X' Z% `& N6 p方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

上传个Demo模型看看，你的问题在于调用这个method的程序，错误是？是空对象。

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

dongshui8558 发表于 2016-10-31 13:00
/ s7 Q; c9 T4 a2 \上传个Demo模型看看，你的问题在于调用这个method的程序，错误是？是空对象。 ...

我把demo上传了，帮忙看看。不甚感激。

xinzhihuoyan

安装例子的说法是不同的状态singleproc会有不同的颜色来表示。
- f* {( X  C6 l@和？在sim-talk中的用法能不能指点一下。谢谢

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
(attribute: string; oldValue: any)
) H% a$ @; o4 Q8 A+ g" ais
do
8 B; T6 `. [' i        if ?.Pause then
+ u3 v# Q  V) K2 Q- X                ?.CurrIconNo := 1;
  f( O5 Z& K& m0 N. a( x- O+ _        elseif ?.failed then
7 m( t2 t' I! ?4 H* ?) `                ?.CurrIconNo := 2;
2 Y; o2 B' v+ N" Q, K6 e& d        else
                ?.CurrIconNo:=0;
        end;
6 w6 y$ Y: o# V8 g- [4 I6 Wend;

dongshui8558

在SingleProc中添加一个Observer，然后加入相关状态属性变化的响应即可。
0 E) E7 `+ ~. F2 P' Z. ]如附件所示。

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子