本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 $ U8 V3 V% [3 m, X5 x/ B8 i
7 ]5 Y; o6 e/ e9 p
各位老师好!
7 ?5 {) ?$ [! x& l/ G 我在使用plant simulation时出现错误
4 C4 S9 v" j8 I1 I源码如下+ c) d/ U8 K) O4 d
4 V/ a" w4 x$ L- }" y5 C9 C2 z3 ~var m,n :integer;0 l Y: _5 u' c4 h+ F+ Y
var Name :string;8 z# _2 |% I$ u/ Y
var Obj :object;
: g6 K+ o A7 S+ U; n8 a& K3 k9 w$ [8 P0 q) z( a2 ~) E# F
m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;
' T6 w! z8 N0 e0 v6 ]& [ Name := sprint ("OutPut_Line",m); --生产线名称
" ?' ]0 Z; J' b. W- L/ B Obj := str_to_obj(Name); --转换成对象变量
4 H3 v+ L: [7 {% } Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法5 M) D; O" v) ]3 J4 F, I
If m>1 then --第二条线要计算产出率3 s! n3 B1 l% l1 j2 {: G
Name:=Sprint("OutPut_Line",m); --产出率
; w( b5 P' L% T( g Obj :=str_to_obj(Name); --转换成对象变量
- h9 G7 Y( ?3 J Obj.val := n*100/OutPut_Line1; --计算产出率
8 H/ v! X( W+ q+ x' w( t4 v% W# m end;( q& a# K$ w. O, I
7 I/ z$ g* c( T" i3 v, C# R
经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,/ _ a' T. a% ]' `% L
例如Obj := str_to_obj(“coat”);
0 d! \3 {2 ^- w- G: C7 b |