for local i := 1 to parttab.yDim loop
2 o& Z, P+ O/ o* G! y- O$ C! e% Q: |0 |
4 x. J; o" s6 i9 w* _ for local j := 1 to parttab.xDim loop: a8 P( G6 z0 U: T9 ]; u
, a! x) b. P1 _" k1 v part := parttab[j,i];
% [6 Q8 s4 T; D: N* U* o) E; F) q; o# E
DestinationTab.setCursor(1,1);0 W- v7 |4 |( ?, J: O
if not DestinationTab.find(track) then6 s% P- W) ~8 [& f9 x. l0 Z7 V
DestinationTab[1, DestinationTab.yDim + 1] := track;
` e5 s9 V4 [# c; Q, {6 b end;6 x5 b9 W! V- @0 I9 `
next;
2 O/ B3 h2 p5 A% Z# P) f* t. u" p ~' j& v+ e8 n/ E" K
next;
/ j1 d5 P3 V/ z% v$ c9 _& i# B3 ], {( m' R; d; c' f* M
-- sort destination table( e- e- z# y% J+ A/ [' l
DestinationTab.sort(1,"up"); 4 {9 Z( D! y8 n
9 ]* m$ G5 @$ P' h/ w1 c @.Destination := DestinationTab;* | O+ v( @/ s8 |. o9 c; N
" b8 v) y% Z6 E+ bend;9 x5 y6 h8 V5 Q! f
新人求教,红色部分解释下吧,多谢 |