for local i := 1 to parttab.yDim loop
4 Y+ M# t7 w$ N2 Y
7 z9 ~ k+ K1 B, m for local j := 1 to parttab.xDim loop( |' a$ L; H$ p8 M ^( o
# k: _% C# _. f N% j3 {
part := parttab[j,i];# I; B, C) x) D, N2 N4 ~8 z& K
( p8 K! Z: O5 A' Q
DestinationTab.setCursor(1,1);# [5 [, O7 e/ y% B
if not DestinationTab.find(track) then
5 v+ y0 M* L* u/ j4 N) J! r9 R; | DestinationTab[1, DestinationTab.yDim + 1] := track;
! C( ]& Q' P. N end;
' N% A, V5 O8 `' d- y2 k next;: r0 z3 h9 A/ ~$ t* d( l& G8 O
- J3 p) L( d( f, g( d9 k next;
4 g9 Y4 C& v0 Y3 J3 h2 h( e& F
% A0 i [5 M( `; @ j3 g -- sort destination table3 U/ |! E0 i0 O2 U' [( Q
DestinationTab.sort(1,"up"); # ~0 u8 v- T2 ^& ]1 C
/ B4 F' E3 F/ i: i9 m" g Q2 q8 V
@.Destination := DestinationTab;2 g- _4 ^5 u1 X$ n0 J& U3 @8 @% u
- c( q2 [5 T0 b! {( H3 C" e/ i' h
end;* G7 U7 Q' I6 O5 d
新人求教,红色部分解释下吧,多谢 |