本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 ) S* Z. k# e+ w; h: \; d
# {4 u) C6 D, \* H7 `* [各位老师好!
$ X" p$ s, V$ h5 C3 y 我在使用plant simulation时出现错误
/ J! s; ~8 F* Y% P' I" L \源码如下
- E! b/ T. L% \" I9 Y4 Z- q& _% m" _0 A+ `
var m,n :integer;
- Z( O5 d) B7 I0 r+ Evar Name :string;
/ k2 Y/ i7 n% u1 Cvar Obj :object;
% k2 E q+ S l
( F N7 x$ b' X" c m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;: K9 C' S* W! [& h s$ X' ^' @! M
Name := sprint ("OutPut_Line",m); --生产线名称
2 c: Q8 w6 L( Q9 y7 V5 j Obj := str_to_obj(Name); --转换成对象变量0 d8 V& X6 l. y$ c5 _+ ]1 R
Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法
" N' u3 _6 J% T* L" `9 E& s; ~ If m>1 then --第二条线要计算产出率& w6 i9 c ~1 G
Name:=Sprint("OutPut_Line",m); --产出率3 I: k: J, k/ P2 ?
Obj :=str_to_obj(Name); --转换成对象变量
& e4 W8 w9 J/ r# t7 y Obj.val := n*100/OutPut_Line1; --计算产出率
f) c1 q- l! e end;
& {3 v: S/ p# U8 K1 c
; ^% _1 A. \: n& D经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,1 K% ?6 w4 c, S4 U v4 t
例如Obj := str_to_obj(“coat”);
* V. `! Z! M4 V0 S+ K3 A! ? |