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

xinzhihuoyan

新手求助
2 c0 B) {: I) @. L% h/ @9 g; D4 H使用软件版本12，根据plant simulation 教材做的案例，下面这个代码没法通过。请各位大神帮助提示错在那里。
(attribute: string; oldValue: any)
is
        do
( l# W7 U1 M. [$ o$ ?        if ?.Pause then
                ?.CurrIconNo:=2;
        elseif ?.failed then
                ?.CurrIconNo:=3;
- x" W3 i# X+ s2 }! c$ g  r4 t        else
                ?.CurrIconNo:=1;
% p8 a4 x, O$ L6 c* N; |2 w, p        end;
; J5 ~, L2 }" G4 b% p  aend;

3 T- H  o5 f5 @9 O7 h0 l, B$ K控制台报错信息：
方法 '.模型.框架.SetIcon'（位于第 4 行）出错: 'void' 无法接受方法 'Pause'。

dongshui8558

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

xinzhihuoyan

还请帮忙看看，谢谢啦

xinzhihuoyan

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

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

xinzhihuoyan

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

dongshui8558

应该是0,1,2，不能等于3，是从零开始算的。
) k) y- p1 k! }; m. }(attribute: string; oldValue: any)
& K# m* }0 b  Pis
6 f1 }6 C% t+ n' g/ tdo
% b. C' o0 O6 I% y+ X6 J# s7 L) }0 |        if ?.Pause then
" X! @5 W2 D6 |/ H6 }- j" D0 [  ~                ?.CurrIconNo := 1;
        elseif ?.failed then
                ?.CurrIconNo := 2;
6 U3 D; F& J+ ^/ c        else
* c* v% `% B4 c1 V, C) }                ?.CurrIconNo:=0;
        end;
end;

dongshui8558

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

xinzhihuoyan

非常感谢您的指点

devin

非常實用的例子