关于用TABLEFILE作时间记录问题

nathen

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

- \1 B& ^1 S; S2 d. L问题:
利用TABLEFILE记录N个不同的SINGLEPRO的PROCTIME.
5 Q$ ^8 A+ Z9 h' m) H$ u  |6 O但是在记录过程中TABLEFILE 每行只记录一条数据.
我的表格记录情况如下模型的TABLEFILE.请各路大侠帮忙看看.
6 A8 B! R" d+ p3 E/ v1 [
我的想法是.一行可以记录多台SINGLEPRO的PROCTIME...
4 y) H* h# n9 a$ m; O+ x
我解释的可能不是很清晰,
请大家下载来看看..另METHOD是这样写的:

(entity:object)
is
* b) x+ o, y' n$ }. Q3 ]& m* _" ]row_1,row_2,row_3:integer;
! P3 O$ i, [) F( V" L) y. [
) y' k6 `6 h! v0 ?2 n6 k1 I3 Cdo

   
inspect ?.name
. R- b, e1 [2 I+ iwhen "SingleProc" then
  
/ ?( w6 c2 P- \0 m* {row_1:=TableFile.YDIM+1;
   
8 y5 O3 w# X6 l9 ITableFile["singleproc",row_1]:=@.name;
TableFile["pro",row_1]:=SingleProc.proctime;
; U! `0 s6 t% Q: P@.move;
/ n* g2 M! u6 x! P" i- i6 X; v   
! P" t& w, \2 E1 R8 P+ W8 Pwhen "SingleProc1" then
  
row_2:=TableFile.YDIM+1;
   
TableFile["singleproc1",row_2]:=@.name;
8 x7 L( y$ d- _TableFile["pro1",row_2]:=SingleProc1.proctime;
@.move;
/ B6 e% `1 |) P& K6 w  [
2 q( b5 o: b0 @6 S. ~& _) Qwhen "SingleProc2" then
: M  k1 j6 K2 i/ X2 q1 r( j4 Q  
5 p8 N1 a3 g3 a1 Lrow_3:=TableFile.YDIM+1;
+ ]( e) j+ P, m! w5 f% u( rTableFile["singleproc2",row_3]:=@.name;
! d2 m. {- b8 ~' V! }% WTableFile["pro2",row_3]:=SingleProc2.proctime;
$ E, P2 ?4 m: w+ b3 F@.move;
6 I- z" [( B' W" e' [# N& Z4 L
9 p: E+ d0 r3 S7 d& Z5 kend;

7 }: m! a" k; `  Z
: h7 ]+ m1 ~/ P! Nend;
; v1 o6 l; [( V; b
1 N& _( C/ x  i! a[ 本帖最后由 nathen 于 2008-12-10 18:13 编辑 ]

沙沙

问题出在这里了：
9 z8 U0 z# Z" s( m  X. R, krow_1:=TableFile.YDIM+1;
row_2:=TableFile.YDIM+1;
row_3:=TableFile.YDIM+1;
你用这些语句，使得row_1，row_2，row_3每次都在TableFile.YDIM的基础上加1，所以它们永远都不会相等。
改成这样吧：
row_1:=?.statNumin;
' ?/ G. m. u8 ]# }+ `row_2:=?.statNumin;
row_3:=?.statNumin;

nathen

感激你哦.我今晚终于可以睡个好觉了.
3 |- U5 ~9 n2 H. Y5 k& v- L能否给个联系方法.
以后有问题可以向你请教

nathen

问题解决后的模型.
# f! P3 h. Q' P# _. c: C- D以供大家以后的学习/
再次感谢沙沙