for local i := 1 to parttab.yDim loop
! P6 t) X/ c ^6 O- |& O; X ! ]; k- G9 O% X2 o' q( L
for local j := 1 to parttab.xDim loop' B6 U& q6 ?/ a2 B1 s W7 W- e8 B4 E+ G" o! o
5 X4 e4 t- c% q' c
part := parttab[j,i];
1 P/ ^* U; w/ G* b Q) p% W) f0 a6 s: T
% i! E' N Q8 b DestinationTab.setCursor(1,1);
8 Q6 z0 _5 k) \1 W6 l* w if not DestinationTab.find(track) then
0 a: c; V- \% x# N4 j3 @ DestinationTab[1, DestinationTab.yDim + 1] := track;5 ^) b; W! H+ B/ Q: q
end;
2 i' L9 |2 |5 Z( M next;6 D. C* V9 ?: B) B9 z Q
( R. i9 m. a% i0 V4 n next;
2 M4 G" m# ~" b! f7 D) N
W9 ~. ^' v, g2 z2 G1 a0 W- @ -- sort destination table
6 `, ]" b6 j7 R7 [, x' G DestinationTab.sort(1,"up");
( D% z4 ~8 p; |' h: `2 {) x- K. t- Z' I
@.Destination := DestinationTab;4 x! }; n/ `' C/ n' l" z
$ N9 u- |6 z8 y( ^% Jend;8 b4 M7 S8 m) j: J0 B6 \6 A
新人求教,红色部分解释下吧,多谢 |