本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑
: }& Z# @+ [, i z7 s. w0 f6 V4 }4 Z: f) N
各位老师好!: q& a" y1 w; O7 j6 b/ D( k1 L
我在使用plant simulation时出现错误
/ V0 e0 o1 U0 f9 A( \源码如下/ i$ v4 t' z& |4 y# ]7 _2 A
4 V- c9 a- [- h! V
var m,n :integer;
& J8 ^) n6 X6 F, Z- E! b& {var Name :string;
: K& D( \& B; a" Nvar Obj :object;2 I+ I/ @; V( Y$ j* Y
$ D) T5 k- H Z) W2 t
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;$ s% B( [6 T k' x$ J+ p
Name := sprint ("OutPut_Line",m); --生产线名称( Z- ?5 o# n7 k4 M, G2 L- r+ P. ~$ l
Obj := str_to_obj(Name); --转换成对象变量
" a* n" V i5 b4 W Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法4 T* s- v H# d7 O }
If m>1 then --第二条线要计算产出率
5 v7 E5 f' N. W& \( t# e% P Name:=Sprint("OutPut_Line",m); --产出率
& p6 G# m% V8 n1 y ], X* n Obj :=str_to_obj(Name); --转换成对象变量
1 C# j# r& j( ?- p$ g Obj.val := n*100/OutPut_Line1; --计算产出率
) }# H" S7 A! D4 C: _- Q# | end;
( o& `# J5 u# A8 @/ ~! O$ l h" Q7 S% i9 V+ x3 m) S
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,
" |' U* y1 X$ |0 B. E N例如Obj := str_to_obj(“coat”); 0 W$ B1 x+ e, J( X$ t( V
|