关于用TABLEFILE作时间记录问题

nathen

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

问题:
利用TABLEFILE记录N个不同的SINGLEPRO的PROCTIME.
但是在记录过程中TABLEFILE 每行只记录一条数据.
) @. l" i+ v* [* T. ]. S我的表格记录情况如下模型的TABLEFILE.请各路大侠帮忙看看.
8 A8 d0 C! I; t3 _
* f  O( t2 {4 k& D我的想法是.一行可以记录多台SINGLEPRO的PROCTIME...
9 U* F  i  i! w! D% o/ D
/ z- a$ }2 }% {: Q4 \3 k; V我解释的可能不是很清晰,
# N* a" F3 N9 r3 I% p1 X& |% f$ M请大家下载来看看..另METHOD是这样写的:
, u2 |. _8 h" C
(entity:object)
is
row_1,row_2,row_3:integer;
/ K: I# q. V1 j' H0 p  N
* E. }9 ~+ J" I3 |4 Ido

   
* u2 R, I; g6 U9 Z$ }' Ginspect ?.name
& H' X; u4 _% Fwhen "SingleProc" then
) p  X# O! K' v: D  
row_1:=TableFile.YDIM+1;
   
TableFile["singleproc",row_1]:=@.name;
5 ^+ _4 N! v* U3 w2 `$ J/ ZTableFile["pro",row_1]:=SingleProc.proctime;
9 r+ p8 x! F; W& Z  A@.move;
   
' C" \( S; i! U# ?+ twhen "SingleProc1" then
  
row_2:=TableFile.YDIM+1;
6 u- r+ V, w9 C+ Q- M* R/ Z   
3 u0 K1 W3 D3 F2 j, uTableFile["singleproc1",row_2]:=@.name;
TableFile["pro1",row_2]:=SingleProc1.proctime;
* x" y/ R* @7 I4 w3 @@.move;

when "SingleProc2" then
  
row_3:=TableFile.YDIM+1;
" R6 e4 A$ A( N7 a$ B; w' ?TableFile["singleproc2",row_3]:=@.name;
TableFile["pro2",row_3]:=SingleProc2.proctime;
( K$ s! |  D% _* s8 M@.move;

end;

+ f( p' r- t0 n- I
end;

2 H# E, I$ \6 b- o6 ^# n& B[ 本帖最后由 nathen 于 2008-12-10 18:13 编辑 ]

沙沙

问题出在这里了：
- p5 h% f+ h  c: b6 c+ Arow_1:=TableFile.YDIM+1;
row_2:=TableFile.YDIM+1;
row_3:=TableFile.YDIM+1;
你用这些语句，使得row_1，row_2，row_3每次都在TableFile.YDIM的基础上加1，所以它们永远都不会相等。
8 Q) B8 |. t& |( E, n; t) M/ p改成这样吧：
! l1 m6 |/ Y$ trow_1:=?.statNumin;
( b7 G/ `' C5 J- P% ]4 erow_2:=?.statNumin;
row_3:=?.statNumin;

nathen

感激你哦.我今晚终于可以睡个好觉了.
7 F7 P; F& F5 R9 Q1 Z$ M$ t9 S能否给个联系方法.
1 y1 {! c. T/ K1 [* J) F以后有问题可以向你请教

nathen

问题解决后的模型.
" Q9 y+ q; N# \5 t以供大家以后的学习/
1 S9 ^- t6 s+ i, f: D" J5 j0 t再次感谢沙沙