本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑
) ]; p9 w+ K- u: U& D& \) I Z! F2 w& D9 b( c! K) C h1 m( J- b7 ~
各位老师好!
9 L" x$ x( x" o 我在使用plant simulation时出现错误
: a$ h# B( t% m8 E' L源码如下* o! n8 m% D4 X8 J; H& A; Y
O9 B" k3 J: a- Q% a5 _% A% ?var m,n :integer;! B% S |( Y' `1 I$ f% k" j" B) Y
var Name :string;/ }+ D% u9 s3 r: w
var Obj :object;6 s7 s! ~" N6 w5 @
2 k+ n. s( q' @2 k' K% G5 ]: Y m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;
5 R5 w1 \' F) f# |$ O+ ]% w) H Name := sprint ("OutPut_Line",m); --生产线名称
. f/ ~: t9 o/ d) E3 R3 P6 s4 H Obj := str_to_obj(Name); --转换成对象变量
7 T( Z; `, C8 C# n1 V Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法
$ l( T' ~, D1 z3 G If m>1 then --第二条线要计算产出率
8 b% D3 U$ d: q7 O& C Name:=Sprint("OutPut_Line",m); --产出率/ T& d" `# ]* D" I
Obj :=str_to_obj(Name); --转换成对象变量2 \* r% M; B# P% M
Obj.val := n*100/OutPut_Line1; --计算产出率, v! N7 G# f7 A6 ]8 J- S
end;
& M2 {) H9 ~: L3 q
& m3 c/ c. \% l" ` W2 z经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,* {" E& I7 O1 ~
例如Obj := str_to_obj(“coat”);
C0 ~6 p# M7 I9 r% O |