本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑
) D* n2 B7 Y, a4 g# A5 Z1 F( u% m! ~& |! j# t
各位老师好!+ R, f+ Q& s q# E, G m3 m
我在使用plant simulation时出现错误
; o0 t$ \+ P+ o2 J源码如下
* z; ~( R6 _% J% f& w# m6 H( b! _9 j; I% @: E7 `! \! U
var m,n :integer;& y Q5 q3 g2 Q6 x
var Name :string;
0 m1 v3 F' f* }% b0 Tvar Obj :object;* i2 y2 b( b, V3 J8 O, f
; t" |2 W6 n! \
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;
% k. v% c) X: v) d4 L, I Name := sprint ("OutPut_Line",m); --生产线名称7 _2 b8 [, {* B( R: W; L4 `4 p
Obj := str_to_obj(Name); --转换成对象变量. D; D/ e+ H! S4 E o
Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法. Z! n& L5 ?+ R. D6 b
If m>1 then --第二条线要计算产出率
- ~( {4 P& ?: Z Name:=Sprint("OutPut_Line",m); --产出率
( [; }6 g8 z) E2 \3 M Obj :=str_to_obj(Name); --转换成对象变量9 w: }( r4 v/ \0 M) i' N
Obj.val := n*100/OutPut_Line1; --计算产出率
: f* I8 w9 r8 E8 h8 B. Z end;. R: B0 E5 V2 W" n# b! U; |
* z% u1 ?: `: P) o( U2 }( D; p
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,
+ }6 E8 h9 v6 X& q/ N& o6 P. m例如Obj := str_to_obj(“coat”);
' ^+ p1 i" _ @' L4 G7 w |