本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 ; ^% z; ^) x! o; i$ V
$ v8 F2 h9 u( \: b
各位老师好!
/ s' }9 F+ ?% G2 _! W 我在使用plant simulation时出现错误# }0 n: I0 c9 G2 J& o1 W3 F7 k
源码如下: i0 \9 r- F4 G
# U$ R/ O; {+ e. m" @5 c/ f7 W# [var m,n :integer;1 i9 j. `1 C; X& y
var Name :string;& t1 {- M, ^6 n' X; j3 c9 w
var Obj :object;6 y- i) d+ `0 x" n
0 X7 r1 @4 G, m; Q/ T8 E
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;+ w! J/ s& `8 ?" t
Name := sprint ("OutPut_Line",m); --生产线名称
- ?3 w" }% ^( |$ i+ f8 U Obj := str_to_obj(Name); --转换成对象变量
: P6 E/ ]$ {- X5 c Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法4 G* n+ M! V: @4 @
If m>1 then --第二条线要计算产出率& e2 U3 P4 w% C+ o
Name:=Sprint("OutPut_Line",m); --产出率
" h& ~% }; [1 X$ `- A( [ Z9 ~/ [ { Obj :=str_to_obj(Name); --转换成对象变量( q* G z/ C4 H. G+ L5 h" ]" r( s2 l
Obj.val := n*100/OutPut_Line1; --计算产出率
! z) p# k. i0 x end;# ?# }# \. s+ _; V' i$ a! u
! C0 J% j5 i' x9 P经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,
3 X. S2 o4 G/ q! ?例如Obj := str_to_obj(“coat”); - A0 R, f W: j( h
|