本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 & m+ P: T# C/ r$ S# u
, X0 U/ h- N+ c' M/ W2 E各位老师好!4 n/ g4 ^* H7 T2 W. L1 e/ c
我在使用plant simulation时出现错误- o1 |& K( Q9 L1 r$ y, r- |. J
源码如下
1 c2 @' c; M h/ f3 \' P0 d( O
6 N3 @: g o7 R; K+ P- avar m,n :integer;
) g; d: ?% g- C) {# Tvar Name :string;
+ ~' z3 I A7 ~9 O+ R: y8 N5 p wvar Obj :object;
0 v8 O; W% @6 H+ E
) d7 {% P8 c, |( v2 o7 G+ ~ m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;; z6 m5 U8 }7 s# c, a, g! A% {
Name := sprint ("OutPut_Line",m); --生产线名称
2 j7 t# a! C% v( q! u Obj := str_to_obj(Name); --转换成对象变量
" o* K1 o N; R& s' A Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法
' z& w$ m1 t3 Q If m>1 then --第二条线要计算产出率6 N) Y# ~ o5 V% D3 [
Name:=Sprint("OutPut_Line",m); --产出率
3 M! [8 G7 a% y+ K: G. ?0 C7 ` Obj :=str_to_obj(Name); --转换成对象变量
2 _- b/ q+ X" R; H; N/ K Obj.val := n*100/OutPut_Line1; --计算产出率' _0 W8 o3 A& c7 ]
end;
& B" o; ], l, u" ^& A( g8 O" H) }5 h: X4 Z0 C
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,6 f4 n/ {! P& Q
例如Obj := str_to_obj(“coat”);
% J) ~ ^- U$ ~ |