关于用TABLEFILE作时间记录问题

nathen

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

问题:
0 Q% B6 {, Y9 E" A利用TABLEFILE记录N个不同的SINGLEPRO的PROCTIME.
4 o4 }+ d0 l# F- g! x但是在记录过程中TABLEFILE 每行只记录一条数据.
我的表格记录情况如下模型的TABLEFILE.请各路大侠帮忙看看.
2 K, X1 C8 G. B' p" w. }, L: M7 d6 b
% C$ p3 ?# T) t& R& f/ t- |我的想法是.一行可以记录多台SINGLEPRO的PROCTIME...
+ Z" s/ K0 ?. e
8 b$ K+ i& H  j$ z. V我解释的可能不是很清晰,
; w3 O% o, o6 i2 |请大家下载来看看..另METHOD是这样写的:

: s' a- T3 g9 O6 j(entity:object)
is
3 Y; }% C; c' ?; d$ J: [row_1,row_2,row_3:integer;

' x# V% l: p: R/ k! C6 G8 y! ^do
3 H, e/ h$ M+ [- b; z* n
. f- {" Q( C2 W6 _0 |& b   
% x. \, j$ [# [+ x6 Zinspect ?.name
when "SingleProc" then
- s. E* O' x* w, Q( ], g  
7 Q; H* h) U+ T/ W% ?  Vrow_1:=TableFile.YDIM+1;
   
1 E; V; o1 i% q+ R/ }8 i/ BTableFile["singleproc",row_1]:=@.name;
TableFile["pro",row_1]:=SingleProc.proctime;
  K7 X9 Z+ ?, [8 W9 O) V& H# m3 |; I@.move;
5 Z5 Z7 c$ @) f* g, M( n$ _% b   
6 A9 x( r  V1 X7 H8 b* fwhen "SingleProc1" then
+ n- \$ T7 F5 v" ~. o, Q  
4 c0 W2 d3 z* x1 d5 z( ~row_2:=TableFile.YDIM+1;
   
TableFile["singleproc1",row_2]:=@.name;
0 C5 l8 x' J8 JTableFile["pro1",row_2]:=SingleProc1.proctime;
5 Q3 H5 e- J7 r% ^( j( P5 L. i. @@.move;

/ D, {1 j% g0 e6 h% T" t3 wwhen "SingleProc2" then
. V" F- ~0 v* h: y" g# c  
row_3:=TableFile.YDIM+1;
6 f( X( |3 {- G9 i) Z* Z/ u% g- [TableFile["singleproc2",row_3]:=@.name;
/ N+ P1 f! G# ?; I: V  ETableFile["pro2",row_3]:=SingleProc2.proctime;
- w* l- X* B% i5 L" d7 j@.move;
9 D/ f1 b) P. N7 B( k8 X% k$ n
2 E2 z4 N" j$ p; K6 zend;
. b: T+ q/ H% i9 m( n

5 Z! i; ~- ^$ l, X. T# Kend;
) ?, ]! u0 g) ]: G' X8 `
[ 本帖最后由 nathen 于 2008-12-10 18:13 编辑 ]

沙沙

问题出在这里了：
/ e9 D: l; [8 c$ Jrow_1:=TableFile.YDIM+1;
# C7 g. Q9 H% e( I- irow_2:=TableFile.YDIM+1;
+ q* Z# G0 g1 ~( grow_3:=TableFile.YDIM+1;
你用这些语句，使得row_1，row_2，row_3每次都在TableFile.YDIM的基础上加1，所以它们永远都不会相等。
改成这样吧：
row_1:=?.statNumin;
row_2:=?.statNumin;
row_3:=?.statNumin;

nathen

感激你哦.我今晚终于可以睡个好觉了.
; `* T5 y6 g# a$ w4 U% q+ P能否给个联系方法.
8 Q* n" U, Q7 L9 _9 v$ Z以后有问题可以向你请教

nathen

问题解决后的模型.
以供大家以后的学习/
& }- ]) L+ i+ I, D1 Y再次感谢沙沙