本帖最后由 墨明棋妙 于 2017-11-11 10:33 编辑 - y/ a) l+ F7 f! b& T
; T# A- b6 H2 J; t5 _+ }6 Z3 {
各位老师好!/ ^0 C& G$ u/ m! }
我在使用plant simulation时出现错误2 _8 u2 _! H0 X8 H* G8 R
源码如下; n2 H; X( V/ v1 V( M
' O- P( h. |4 Y8 ~& _- [
var m,n :integer;# n% I, Z \3 V& j5 k8 }
var Name :string;
/ `* z& {8 a ]2 V- W, Evar Obj :object;1 U0 D7 D( e- i9 r) r/ j4 l. |
* b' [& A. n" S/ Y( K7 L/ I, h m := str_to_num (omit("darian1",1,5)); --先取Drain*后面的数字,在转换成整型数据;3 e5 Z3 N- n) {9 s. f' _& T. U- f
Name := sprint ("OutPut_Line",m); --生产线名称4 ^/ x2 Q; w; F0 g% \4 v# Z
Obj := str_to_obj(Name); --转换成对象变量
% n1 |$ q# W. R Z6 r Obj.val := ?.StatNumIn; -- ?代指当前调用Method的物流对象,该Method想做成通用的方法0 i! K3 X% w- p! u1 Q
If m>1 then --第二条线要计算产出率
) {8 Z/ `4 {1 _( | Name:=Sprint("OutPut_Line",m); --产出率- o9 O) Y) g; N& M ~" k
Obj :=str_to_obj(Name); --转换成对象变量
, X' m# ]: U. Z" G9 v! d1 J9 | Obj.val := n*100/OutPut_Line1; --计算产出率
' F- M! t% v* { end;' ] K* F$ i# U3 i: _" }9 U
$ m0 P( B) j" e+ m3 k9 z% o经调试错误出现在Obj := str_to_obj(Name); 显示Name 不是有效的路径,请老师解惑,我使用一个确定的字符串也不行,& H/ O$ J! e$ a3 E x: Q" U2 G$ N
例如Obj := str_to_obj(“coat”); ; x+ L2 Q+ {! _' K$ {' t
|