本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 : l) I5 u7 v6 H Q7 q3 S( i" q
- D& a; K& J: q
各位老师好!% A- E% ^4 ^3 O- ~) @- `
我在使用plant simulation时出现错误
" ~; O! y, k. W- A1 Z源码如下) f8 b+ A) K& Q/ \6 b
5 b1 |) A& p0 E% U, q; v; u" Avar m,n :integer;5 O, \9 W7 ]6 r2 k6 m. b$ r8 X( |
var Name :string;
! c5 Z# v% }& |( Q5 Uvar Obj :object;
$ ~5 N/ a: o- O3 B9 _
8 b5 Y) j1 g5 A" c m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;9 } [% T2 A" ^: u# C
Name := sprint ("OutPut_Line",m); --生产线名称
, Z/ V0 Y" `+ d8 C/ n$ f) t Obj := str_to_obj(Name); --转换成对象变量
" T& }9 M+ V* ?( r$ _ Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法# o: k. z- E9 C* W
If m>1 then --第二条线要计算产出率. r$ T2 _5 P$ d2 Q: t2 q$ {. m ~: H' I4 |
Name:=Sprint("OutPut_Line",m); --产出率
6 x8 [, {" M' p Obj :=str_to_obj(Name); --转换成对象变量
4 G) H0 L% S; f( ]: k! p7 F Obj.val := n*100/OutPut_Line1; --计算产出率
: b9 p: M+ X6 ~! k5 B6 x end;
5 ^2 H# i4 _8 U6 U
! N& K S0 U7 }2 h1 E4 |. j经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,
) X. M. P$ v* W" R3 I4 m$ Q例如Obj := str_to_obj(“coat”);
: G K' T) ?7 V* T+ |& ` |