本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 " j& t6 m' S5 P! _
) V4 z) e! Z& u! D F; z
各位老师好!- g7 K- U& n# E; _% R+ V
我在使用plant simulation时出现错误
C% L p+ q. {" Z9 v源码如下
; Y* g1 v9 P$ O' N/ K4 b6 {* y0 V1 Y% x4 W/ ?2 \# @
var m,n :integer;( h4 G/ Z* o4 H& E9 y
var Name :string;
0 l2 i$ y! h& D' q' U$ U) qvar Obj :object;
3 m% k, w; N$ S
/ G% L# Z* j5 L5 v m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;
# `: v5 _: `& c2 _, t Name := sprint ("OutPut_Line",m); --生产线名称
( ~3 y( K, z7 Z/ i- y! n% U+ D Obj := str_to_obj(Name); --转换成对象变量
9 @ O. `$ p8 P: F7 O1 I+ x" `% K Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法( T: ?7 |2 ~2 ~; t- [ z
If m>1 then --第二条线要计算产出率; J4 G7 j1 i6 w
Name:=Sprint("OutPut_Line",m); --产出率3 d$ N- U1 X% N1 g
Obj :=str_to_obj(Name); --转换成对象变量8 \+ B% D: _, Z5 U2 u
Obj.val := n*100/OutPut_Line1; --计算产出率, a- U/ P1 A- G3 } J
end;
. [' U6 C1 C9 f% N
" m" r8 k) j' ^经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,& k: E9 x: C. K' R z8 ~2 k& D b
例如Obj := str_to_obj(“coat”); ; w" @: C, R0 t# G. n
|