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

xinzhihuoyan

新手求助
使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
  f7 ~, l: s. N) \9 d1 F(attribute: string; oldValue: any)
is
0 x8 g; ^3 a- u. ?3 E        do
        if ?.Pause then
                ?.CurrIconNo:=2;
. ?  S2 I, J% V: y) d( |* Y% o; w        elseif ?.failed then
                ?.CurrIconNo:=3;
        else
                ?.CurrIconNo:=1;
        end;
) z$ z) X9 z+ N: kend;
" B* t* h: G; h4 y9 U2 e/ o
# l0 z5 f  ^; _8 q7 Q控制台报错信息：
方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

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

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

dongshui8558 发表于 2016-10-31 13:00
# O1 x. h  U/ P$ B% _" M上传个Demo模型看看，你的问题在于调用这个method的程序，错误是？是空对象。 ...

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

xinzhihuoyan

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

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
, Y; h3 ^4 L6 W) V2 V4 R' C/ c(attribute: string; oldValue: any)
is
% f/ y" X; U2 I/ a& odo
        if ?.Pause then
                ?.CurrIconNo := 1;
/ U+ C) v+ z* }7 G* D        elseif ?.failed then
                ?.CurrIconNo := 2;
$ F0 B! p$ Y5 L  V' x        else
7 ]5 K) O! s! V" h3 F                ?.CurrIconNo:=0;
* W7 j6 M: V/ A( J        end;
end;

dongshui8558

在SingleProc中添加一个Observer，然后加入相关状态属性变化的响应即可。
3 l% S0 }* ]! ]) S如附件所示。

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子