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

xinzhihuoyan

新手求助
$ I, Y. L" J  p/ I. P使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
6 O. Z9 H+ n) c3 a(attribute: string; oldValue: any)
! ]9 F  q$ W4 _* M/ G+ E7 Y1 _is
        do
        if ?.Pause then
* w8 B# r! t6 ~! m                ?.CurrIconNo:=2;
* \9 E8 V1 k0 [+ n( f% R        elseif ?.failed then
                ?.CurrIconNo:=3;
. @, M* t. l/ b  r2 B        else
                ?.CurrIconNo:=1;
7 L, x0 [* p/ B+ k# g* w; E        end;
end;

& ]) N$ t' `# N1 ]控制台报错信息：
$ L2 [7 A6 \, g* V1 B" H9 I方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

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

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

dongshui8558 发表于 2016-10-31 13:00
' x: l9 j% \: b+ V上传个Demo模型看看，你的问题在于调用这个method的程序，错误是？是空对象。 ...

+ j2 l0 ]* q, ~  f3 k我把demo上传了，帮忙看看。不甚感激。

xinzhihuoyan

安装例子的说法是不同的状态singleproc会有不同的颜色来表示。
6 y, M! ?" B9 h( T* j" Y( m@和？在sim-talk中的用法能不能指点一下。谢谢

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
' W$ ^8 p( f, |# @& I% i5 g) g(attribute: string; oldValue: any)
; u5 T) M  k/ C' H2 Q+ Lis
do
        if ?.Pause then
( Q: L6 u2 {" a' n: j: `                ?.CurrIconNo := 1;
        elseif ?.failed then
! O1 P8 |6 o) q2 l. R7 g" ~                ?.CurrIconNo := 2;
9 }9 p, @, T! p$ E9 v& `        else
4 T) I1 n+ ~! u; y) m' r/ x9 J! \                ?.CurrIconNo:=0;
0 n0 N$ q, h+ N* @* d+ b; r5 B        end;
* h3 D, b/ Q& N+ K* z7 ~end;

dongshui8558

在SingleProc中添加一个Observer，然后加入相关状态属性变化的响应即可。
如附件所示。

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子