关于用TABLEFILE作时间记录问题

nathen

各路高手,路过有空,帮帮小弟解决以下的问题.本人万分感激.
' ?8 ~: N( M& f' i' _9 v
2 D* y: [/ v* k5 m问题:
. f+ z6 u6 o# O8 w9 N/ a利用TABLEFILE记录N个不同的SINGLEPRO的PROCTIME.
8 X" O6 L: N! ?+ R但是在记录过程中TABLEFILE 每行只记录一条数据.
3 ?# g$ s9 t2 W$ m" P3 f0 ^我的表格记录情况如下模型的TABLEFILE.请各路大侠帮忙看看.

$ R, N1 E$ k$ V: t% R) ]0 I我的想法是.一行可以记录多台SINGLEPRO的PROCTIME...
* @/ p* u7 N! T. d7 \6 l
我解释的可能不是很清晰,
请大家下载来看看..另METHOD是这样写的:

6 r+ @$ T# ~- W" S0 K3 [& q(entity:object)
is
2 V& k& {$ [7 ^row_1,row_2,row_3:integer;

do

   
inspect ?.name
when "SingleProc" then
! Q; R7 d& e! j* w  i  
row_1:=TableFile.YDIM+1;
1 W/ K# Y# ]1 I0 j1 L   
4 K) c0 [; s( g  V6 g: PTableFile["singleproc",row_1]:=@.name;
TableFile["pro",row_1]:=SingleProc.proctime;
@.move;
   
7 S4 T1 B  A( m' S8 v8 n  c7 Nwhen "SingleProc1" then
  
" f1 X/ H& W1 S) I; ?& urow_2:=TableFile.YDIM+1;
   
TableFile["singleproc1",row_2]:=@.name;
TableFile["pro1",row_2]:=SingleProc1.proctime;
@.move;
' ?: h0 l1 Q3 P  e
when "SingleProc2" then
/ p; f* k0 Y  B. ]0 C  
row_3:=TableFile.YDIM+1;
TableFile["singleproc2",row_3]:=@.name;
. C" ]% G. D/ Y' h$ QTableFile["pro2",row_3]:=SingleProc2.proctime;
@.move;

end;
# s0 C5 v8 x/ L$ o# ~) c% F
9 o) j" y- ?3 _7 D; y
end;
  `! g1 V; o1 C3 Q7 B+ x
[ 本帖最后由 nathen 于 2008-12-10 18:13 编辑 ]

沙沙

问题出在这里了：
row_1:=TableFile.YDIM+1;
row_2:=TableFile.YDIM+1;
& T; x1 b/ y6 ]0 {" K4 qrow_3:=TableFile.YDIM+1;
你用这些语句，使得row_1，row_2，row_3每次都在TableFile.YDIM的基础上加1，所以它们永远都不会相等。
改成这样吧：
row_1:=?.statNumin;
7 M) H3 b. \( \* N. a% w# rrow_2:=?.statNumin;
5 M: k3 x; m8 z  Vrow_3:=?.statNumin;

nathen

感激你哦.我今晚终于可以睡个好觉了.
能否给个联系方法.
以后有问题可以向你请教

nathen

问题解决后的模型.
3 l7 Q, y9 R4 |7 ~. \3 h以供大家以后的学习/
再次感谢沙沙