本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 ; u2 P8 i; [( c
* {- y) B4 ?0 M9 ?" \
各位老师好!6 g% |8 S G+ ?# t0 I8 R. B
我在使用plant simulation时出现错误
2 Q' h$ u2 H N$ @, h2 [; ^7 V源码如下
q' P- d0 E. h" D, z
3 U9 x3 R0 y& ~6 Evar m,n :integer;) C5 T) g9 f0 m0 x6 _
var Name :string;2 D6 L; x' g; p2 ^
var Obj :object;! x8 b6 E, u) F+ {
9 l G! m$ F: Q" L2 X& K6 ^
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;
! g* ?% ~5 p: \ Name := sprint ("OutPut_Line",m); --生产线名称
" E% z' g! g! p- J! f4 ~1 r$ k Obj := str_to_obj(Name); --转换成对象变量
$ n' t; x' ?: c* \, Q Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法3 O9 L q$ J+ B# ^
If m>1 then --第二条线要计算产出率8 c, |" y1 c0 x3 q$ D$ X* U
Name:=Sprint("OutPut_Line",m); --产出率1 w+ a; ]0 r$ c0 X8 k# V
Obj :=str_to_obj(Name); --转换成对象变量
. @7 t( W' A5 Q& X6 x: h Obj.val := n*100/OutPut_Line1; --计算产出率" \' |8 J& L# X7 B+ ?* O
end;* U1 t! K4 T) u ~- \
3 W9 J* c, X9 E经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,0 h' P4 r% [6 H" [' ^3 V6 e
例如Obj := str_to_obj(“coat”);
; X7 u1 l0 ^& N6 P% n |