for local i := 1 to parttab.yDim loop% X# L: z0 n. o1 Q( ^1 J
$ e: z& P! X( ^; S' `) A
for local j := 1 to parttab.xDim loop
3 [7 N) h4 Q4 W$ Z
# V$ i( L9 E3 z( _& a- Q part := parttab[j,i];
4 d# `2 R' c: t. p+ k$ R3 y8 V4 |; J$ E( z& \
DestinationTab.setCursor(1,1);% _+ P4 L5 }' o% p7 e
if not DestinationTab.find(track) then
# ?! C: e& S( y3 C E9 R G DestinationTab[1, DestinationTab.yDim + 1] := track;
/ x* Q! F6 @' C4 N# X* i6 ~ end;' h A: y1 S9 c8 w0 F
next;
" P0 m6 }( E/ r d
0 e: W* W1 {8 `6 ~* { next;% X/ { k" y& }" A1 k
. l# L! u0 F: |; F# u4 B* r2 U -- sort destination table
. Q& w. O. C/ G8 y0 c DestinationTab.sort(1,"up");
2 ? l: ?* S0 }3 w3 w& R# e( m( T j. L& V% n$ F, H' u
@.Destination := DestinationTab;/ V; B- D( t' G7 @" A
" J' @- C& d! m" G' P7 ?3 N
end;% m9 L i% w2 v1 O' n% _
新人求教,红色部分解释下吧,多谢 |