本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 7 G9 j, w3 _" m! }+ O
6 _! x9 e. {9 q6 c7 ^
各位老师好!
6 _3 U1 V) U L& x1 M 我在使用plant simulation时出现错误
' Q# h- X u' ?. x3 W' a: v源码如下
+ v# @& W; n2 R/ ~( f5 ^ w5 B: I: Z" c( J/ E" W! o `
var m,n :integer;
. `% u& f! j0 z+ g6 O* kvar Name :string;8 a' A! \9 ~+ o& l
var Obj :object;, C. _! W$ g3 J+ b
( e4 C3 H$ S5 q: H
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;3 Z9 Z2 Z4 A, P+ i" Y: t+ D
Name := sprint ("OutPut_Line",m); --生产线名称( ?, I& T# C+ S8 p/ y4 P
Obj := str_to_obj(Name); --转换成对象变量% p0 z6 Z. Z, }
Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法
7 v* Y* b' s2 M8 P; {2 c% Y If m>1 then --第二条线要计算产出率7 H) i [ b% C! x, @
Name:=Sprint("OutPut_Line",m); --产出率
1 \) P1 }/ \% r" t Obj :=str_to_obj(Name); --转换成对象变量
2 e$ m$ {9 A. C! c/ ?0 w Obj.val := n*100/OutPut_Line1; --计算产出率
5 }8 x! X j# L end;# T& v% j5 v9 j) b6 Z( E& V6 ~9 q
9 m. J+ _1 n' f2 F: p+ o
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,+ T$ C) }: v+ n, A
例如Obj := str_to_obj(“coat”); 0 A9 B3 O; M+ J+ P) C& Z
|