本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑
& D+ G: K( w! M9 c% C. j% S" p0 a9 P4 I5 W/ \- G4 k+ X0 D
各位老师好!) Y7 H6 ]3 l1 @6 m. j1 ~ H
我在使用plant simulation时出现错误
2 J% A6 o+ F6 h% Y源码如下
" X* s0 Q% M- P0 j0 H0 U; U" @3 Q# O z. Y$ O
var m,n :integer;
# a, ]: t% U( k8 A" e; ivar Name :string;
3 R1 i" E) G3 \2 a. _5 l! ovar Obj :object;: F9 G7 F. _" Y- Y; F9 Q9 D
; G9 F1 ?$ o( F+ J/ d! q. Z) Z m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;3 D+ t0 i8 A* Y" z! q
Name := sprint ("OutPut_Line",m); --生产线名称9 n* d4 X% t, d3 o1 R
Obj := str_to_obj(Name); --转换成对象变量
+ i# c! x. j# F: w. ~ Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法' o. l) }# b4 M' K1 Q
If m>1 then --第二条线要计算产出率# H7 L& L. e( D* C4 Z! v# z' O
Name:=Sprint("OutPut_Line",m); --产出率
0 p$ ?0 `5 R1 b6 u4 r& y" _+ T Obj :=str_to_obj(Name); --转换成对象变量
% V4 g* o* O j% x1 U" F Obj.val := n*100/OutPut_Line1; --计算产出率$ @0 [2 `3 D8 ~' ^% c2 A
end;
) j; l8 g! K8 o: q' c- o$ G4 v) m4 G' _ H- F
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,
: M' i% b# j1 Q9 \例如Obj := str_to_obj(“coat”); ; N9 a) k! C( O
|