本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 , Q/ e/ M% N% ^" R$ P- H
) U" ?# g I2 [# N( ?
各位老师好!
0 K7 _8 a8 N4 Q/ U j& J0 @& ] 我在使用plant simulation时出现错误' v0 ~+ J4 V9 e3 p
源码如下
! E [( l4 ?, ~/ \' B+ d3 ~
* z! S/ o9 w" o; C5 n( h# {var m,n :integer;2 X: o( N4 H8 R9 r
var Name :string;
8 E6 {# Y! d" W& c) xvar Obj :object; F7 }- X, U p3 G4 l# n
9 f$ O5 t, X% N4 c
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;7 _# Q4 h# k: G/ p! H; G
Name := sprint ("OutPut_Line",m); --生产线名称3 |5 d! H* \: t) T; @
Obj := str_to_obj(Name); --转换成对象变量
. I- \% Q, R5 y8 Z! i9 b4 T5 i Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法" {, m. M4 F2 c9 Q
If m>1 then --第二条线要计算产出率6 ~& E% f6 u* R$ ?1 D$ T
Name:=Sprint("OutPut_Line",m); --产出率
) r! b! `3 N" Q' e7 k R' K: B/ O Obj :=str_to_obj(Name); --转换成对象变量
! l+ m$ s5 ]1 Z, M2 \, U: c( c0 V Obj.val := n*100/OutPut_Line1; --计算产出率
% L% u% O# O# l- L# C end;' w$ b: [7 C5 ^2 a
) ~& D' h' z. ]4 F经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行," `6 m" D6 _0 h+ n# L, G9 R$ q
例如Obj := str_to_obj(“coat”);
: R4 }3 F* r4 [ |