关于用TABLEFILE作时间记录问题

nathen

各路高手,路过有空,帮帮小弟解决以下的问题.本人万分感激.

8 |# f: i7 t4 a3 s问题:
. O4 q5 W& y" M$ u利用TABLEFILE记录N个不同的SINGLEPRO的PROCTIME.
# G- j3 E- E5 v1 V+ R0 C但是在记录过程中TABLEFILE 每行只记录一条数据.
我的表格记录情况如下模型的TABLEFILE.请各路大侠帮忙看看.
5 H. R0 @" }& R: \) y% U2 n
我的想法是.一行可以记录多台SINGLEPRO的PROCTIME...
' ~8 [& r# v" g/ L. [* p: [- |
我解释的可能不是很清晰,
7 y' G5 _- `/ \$ F, D请大家下载来看看..另METHOD是这样写的:
; @9 y+ A1 b- e
(entity:object)
is
& V* R$ }8 ?) c# F/ |8 Srow_1,row_2,row_3:integer;

do
0 e( S% a1 a; i$ Q1 y
6 X8 X2 W2 R, K, i7 ?   
inspect ?.name
# y5 l& h; k: b  d4 kwhen "SingleProc" then
& [' d7 K9 T" u) R2 Z  
row_1:=TableFile.YDIM+1;
8 O9 \$ ~  r3 W3 z  s   
TableFile["singleproc",row_1]:=@.name;
  l% {% O5 U1 Y2 {6 s! X4 aTableFile["pro",row_1]:=SingleProc.proctime;
6 N( z: c6 L0 h6 m@.move;
   
1 G$ v  @2 t% Z  fwhen "SingleProc1" then
& X# `% m; `6 J4 X! @5 E  
row_2:=TableFile.YDIM+1;
5 W3 h7 |: w+ P% P   
TableFile["singleproc1",row_2]:=@.name;
TableFile["pro1",row_2]:=SingleProc1.proctime;
1 H7 y" r3 }' d& g8 I& `6 z@.move;
0 Q7 q! q4 c, i6 r/ |
when "SingleProc2" then
6 c4 ]9 B) s2 F  
( M! \( D8 S& A/ l* d6 u/ t+ @row_3:=TableFile.YDIM+1;
6 z* c* `  @0 O* w2 f# N1 q& ?9 \  BTableFile["singleproc2",row_3]:=@.name;
9 c+ t6 S( d9 d7 HTableFile["pro2",row_3]:=SingleProc2.proctime;
@.move;
- `5 [1 k' e- a! S# m+ _8 g
end;
* Q7 d1 m* v0 ~6 s
! h* Y( z" G* W, _& W# s5 C
end;
; s7 Z* o& `: P8 i" p; r! X/ f
[ 本帖最后由 nathen 于 2008-12-10 18:13 编辑 ]

沙沙

问题出在这里了：
- f% ~2 a* ~" a) X) z: J7 Zrow_1:=TableFile.YDIM+1;
! s! l, T. J$ t" W2 l4 H: {row_2:=TableFile.YDIM+1;
3 k, Z, l, z6 m! Q% |  a3 Orow_3:=TableFile.YDIM+1;
你用这些语句，使得row_1，row_2，row_3每次都在TableFile.YDIM的基础上加1，所以它们永远都不会相等。
改成这样吧：
row_1:=?.statNumin;
/ p9 s& W! M$ o% @( m5 Zrow_2:=?.statNumin;
6 U4 A" L8 D" r2 h( y' Zrow_3:=?.statNumin;

nathen

感激你哦.我今晚终于可以睡个好觉了.
" [! ~- E! w* w! f. p' ^8 l1 F能否给个联系方法.
4 g# y/ W+ a# H2 C% }以后有问题可以向你请教

nathen

问题解决后的模型.
以供大家以后的学习/
# e- j* |$ W: E9 O再次感谢沙沙