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

xinzhihuoyan

新手求助
使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
0 [! e$ }# O6 C$ x5 P* O(attribute: string; oldValue: any)
is
        do
        if ?.Pause then
- ~+ X! w3 x8 ?9 M                ?.CurrIconNo:=2;
! s+ F' S) ^1 v1 M        elseif ?.failed then
                ?.CurrIconNo:=3;
        else
                ?.CurrIconNo:=1;
        end;
8 X' |3 d6 z1 Kend;
3 `$ w4 A- c3 ]' r) }, p0 D
. s# q- k3 ]8 Y1 P. O4 M9 i控制台报错信息：
方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

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

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

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

* W: E9 S% X+ N2 Y我把demo上传了，帮忙看看。不甚感激。

xinzhihuoyan

安装例子的说法是不同的状态singleproc会有不同的颜色来表示。
* E: N+ p; }' I* N# R7 S' G@和？在sim-talk中的用法能不能指点一下。谢谢

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
! ?* P* X+ _9 |2 i, ^(attribute: string; oldValue: any)
9 H$ L+ e) O" h1 X0 r. W4 a! q8 sis
do
, `" E/ |6 j7 J2 m        if ?.Pause then
                ?.CurrIconNo := 1;
        elseif ?.failed then
- q) y! f( r% a. T; j                ?.CurrIconNo := 2;
2 E- G5 r% f7 B+ b        else
! n3 `. n7 M2 z$ J: O4 c# d; P- W                ?.CurrIconNo:=0;
        end;
end;

dongshui8558

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

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子