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

xinzhihuoyan

新手求助
使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
(attribute: string; oldValue: any)
1 [* J3 Q( J6 O5 R% Z5 o. \is
        do
) q  r8 t$ N* R  v! a3 E# |3 W        if ?.Pause then
0 A$ G9 \4 e, Q7 s                ?.CurrIconNo:=2;
        elseif ?.failed then
5 d6 ^5 x2 l3 l9 a" W+ ^8 o( @8 `                ?.CurrIconNo:=3;
" w; W- j& o4 i3 f8 p2 \( P        else
. W9 u- @" m* v1 Y0 v% q                ?.CurrIconNo:=1;
1 ]2 E5 |: J' x8 x        end;
end;
$ \4 C: `# |/ B
控制台报错信息：
方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

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

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

dongshui8558 发表于 2016-10-31 13:00
2 @8 v8 Q5 Q1 C; ~7 z上传个Demo模型看看，你的问题在于调用这个method的程序，错误是？是空对象。 ...

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

xinzhihuoyan

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

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
(attribute: string; oldValue: any)
3 j: L+ Q, [" ~0 |is
do
6 q$ `) a9 }/ K) H) l# _6 j        if ?.Pause then
                ?.CurrIconNo := 1;
$ ^- Z1 J5 D. c/ A        elseif ?.failed then
                ?.CurrIconNo := 2;
        else
                ?.CurrIconNo:=0;
        end;
end;

dongshui8558

在SingleProc中添加一个Observer，然后加入相关状态属性变化的响应即可。
, {! Z+ I- J" ]3 r1 \6 e如附件所示。

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子