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

xinzhihuoyan

新手求助
使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
(attribute: string; oldValue: any)
is
        do
        if ?.Pause then
" ?) G; I( ~1 ]* [( P                ?.CurrIconNo:=2;
' T: R' }# h8 s# ]- d        elseif ?.failed then
) a2 j$ y$ C. U                ?.CurrIconNo:=3;
8 \' h- z& A9 [* H  w' }        else
) M. \& k( n* O0 x& U                ?.CurrIconNo:=1;
        end;
end;
# m# p% D1 `, Z5 @6 |) O2 D4 y
控制台报错信息：
方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

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

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

dongshui8558 发表于 2016-10-31 13:00
, Y% J2 y3 ^7 l' B上传个Demo模型看看，你的问题在于调用这个method的程序，错误是？是空对象。 ...

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

xinzhihuoyan

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

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
$ U( a; A! E4 s* a6 ]4 L1 y(attribute: string; oldValue: any)
is
' t* t3 P* P4 s3 F. Pdo
  r4 {( F) x7 T4 e, `8 [        if ?.Pause then
4 c2 t5 |3 c) d) n" r                ?.CurrIconNo := 1;
        elseif ?.failed then
+ v. f  i8 L* @$ K% c6 L* P                ?.CurrIconNo := 2;
        else
. }8 U( p5 ~/ w& ]$ P: G6 B5 V                ?.CurrIconNo:=0;
# B; U) m# P& `" f. G        end;
end;

dongshui8558

在SingleProc中添加一个Observer，然后加入相关状态属性变化的响应即可。
2 o# [) z- w# z" }* b如附件所示。

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子