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

xinzhihuoyan

新手求助
使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
4 c7 q! u1 v9 W' [7 C$ n3 O(attribute: string; oldValue: any)
. I! l% D) w8 B5 [is
        do
        if ?.Pause then
6 c6 K; q% Q; |" N0 b+ Q2 O                ?.CurrIconNo:=2;
        elseif ?.failed then
) g0 Q, n6 n8 l' s- e4 O& I                ?.CurrIconNo:=3;
        else
! R6 _2 }" H3 e8 V7 t7 F9 m+ O                ?.CurrIconNo:=1;
        end;
+ y; L% s" }6 uend;

控制台报错信息：
) F$ h( {/ t  ~8 \0 u; L6 v/ S4 V方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

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

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

dongshui8558 发表于 2016-10-31 13:00
. f" V7 o4 w: |) o$ F' w上传个Demo模型看看，你的问题在于调用这个method的程序，错误是？是空对象。 ...

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

xinzhihuoyan

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

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
5 c4 Q# m0 E* K( S" J& G(attribute: string; oldValue: any)
is
* W* w: t* y' i& C% {. ]1 Y& ndo
        if ?.Pause then
                ?.CurrIconNo := 1;
        elseif ?.failed then
4 l% a5 w% Q# a                ?.CurrIconNo := 2;
        else
                ?.CurrIconNo:=0;
' _3 G% a  u6 X7 O6 s/ Q        end;
2 T$ f* [' w: V8 z  ^3 V  jend;

dongshui8558

在SingleProc中添加一个Observer，然后加入相关状态属性变化的响应即可。
, \: U! k, J  C1 b0 k' ~( f如附件所示。

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子