本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑
`" O$ ]7 \7 J; B2 v, T" L4 i+ ~% p2 W$ W
各位老师好!7 |# g: O& p& G
我在使用plant simulation时出现错误
' ~& e- } y2 d* E- m源码如下
1 n- s1 f& Y, K( S6 q/ D7 n! Y _# t% M( J4 w
var m,n :integer;
; H( _, S& J' x- V" K, J; svar Name :string;: T. U, ~ v3 w7 B4 n
var Obj :object;
" N0 T" R+ o2 G2 D" A8 g+ t; Y! L/ a
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;' i5 Z+ i7 Z# E7 j g
Name := sprint ("OutPut_Line",m); --生产线名称- L5 u8 v, {2 C' J) Z0 _1 N6 `
Obj := str_to_obj(Name); --转换成对象变量0 r1 B! r1 A8 M: ]9 S" U) k0 M
Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法( i+ B6 s* L: l" E- s; Z
If m>1 then --第二条线要计算产出率
) l+ j4 z7 w* h, B! V1 U4 g Name:=Sprint("OutPut_Line",m); --产出率
' |( f! t" l7 c5 I1 d Obj :=str_to_obj(Name); --转换成对象变量' a4 p2 m2 B/ m) P" V c7 y+ f9 e
Obj.val := n*100/OutPut_Line1; --计算产出率
0 Z: c9 Y2 a) G" G end;
0 N+ j* ]: s1 k3 ~ E3 T( Q/ b8 M. F3 N# v( W; s
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,
4 E, f1 u+ k/ |* }; n5 `& H例如Obj := str_to_obj(“coat”);
9 o4 N% X6 O$ d+ T/ t; q8 Y* n- @ |