本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 & m& _& ?1 D1 X, m$ z i4 y
4 D C+ K3 [3 n/ o x0 E! U" H
各位老师好!: B7 \; @- {* _8 F8 g
我在使用plant simulation时出现错误! u, I2 s* k9 P9 _& C( d
源码如下- X: U7 ? Q9 J3 U
7 p5 _. X# }4 E. j1 a; d5 M) ^$ l
var m,n :integer;
: ` @$ e/ R9 }' lvar Name :string;4 B ]# E' d& ^- H
var Obj :object;
2 x7 }9 E5 d! j2 V# I, C3 n
" r5 Y" w7 z$ r3 o. q/ ] m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;/ q/ n8 o8 C; M0 w; L3 P$ y$ j
Name := sprint ("OutPut_Line",m); --生产线名称8 ]7 d1 \ ?8 f7 l$ }1 ?. x) R
Obj := str_to_obj(Name); --转换成对象变量
: s" Z* I* a$ F3 H1 c7 N+ m Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法
% x- T; c& b; d1 g6 ]3 r# q1 u If m>1 then --第二条线要计算产出率
2 Z! [, L# \- |4 }% Q Name:=Sprint("OutPut_Line",m); --产出率6 U& p9 y0 U% I
Obj :=str_to_obj(Name); --转换成对象变量
9 U; M; v" A( z- n0 K4 M1 [- ^ Obj.val := n*100/OutPut_Line1; --计算产出率
7 \: e: m! L: k$ m2 ]6 f end;
3 D, @6 Q- n( b F* l" s% O: P M. x, a; Y; r
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行," x3 B4 g6 `; }! P" ^& i9 b. i/ L
例如Obj := str_to_obj(“coat”); 7 ^. f- F/ f8 U! x
|