for local i := 1 to parttab.yDim loop
" W( S0 H$ m U; l; { ; E3 Z) B" k% z$ Q
for local j := 1 to parttab.xDim loop3 W7 J" [6 q" O
3 Z6 c! x& s2 l. J- b" k* L0 v" ] part := parttab[j,i];
. J4 Q% O; G/ g% a# y3 @' D/ [ T4 p. q& T1 ~9 e) K' n
DestinationTab.setCursor(1,1);
$ S. g/ U5 _, b& @& w& i if not DestinationTab.find(track) then
" U; Z/ {* p1 Q DestinationTab[1, DestinationTab.yDim + 1] := track;, X/ G; t! q) v% d
end;$ z# j5 e, Y6 i9 E' t' V
next;5 A5 i: p6 y( e, d3 ?6 K
+ _9 i% x- G# r$ d/ Z. ~, A+ B
next;
. M$ ?* r: v$ _; Z, f5 \; I, ?) p3 ^6 | l: `- Y- v
-- sort destination table) w% M) I' q# C$ \
DestinationTab.sort(1,"up"); . v" f: e/ y; G5 _, e
' m, ~: ~4 V+ t0 M
@.Destination := DestinationTab;
: Q, S- \; v+ H; ?0 K r2 V l4 I( t9 O4 D' M# w3 G$ ^& }
end;) J l* M0 O) ]' a T( c
新人求教,红色部分解释下吧,多谢 |