for local i := 1 to parttab.yDim loop! X" r! L- Q0 e5 ?1 n4 G
5 g5 E- O9 X" ]
for local j := 1 to parttab.xDim loop
* M- K6 G1 }3 D4 o+ P4 Y; z ! U. Q8 A8 Q. C$ e. Q, T$ ?
part := parttab[j,i];
4 k7 d: ~- a4 j" }: _( ~
7 h2 M) N* n5 d7 J- n0 j9 ]( G. e DestinationTab.setCursor(1,1);+ A: U0 k9 o* D9 Q8 S
if not DestinationTab.find(track) then
3 c x5 Y5 ^# R" k; R0 D0 N- ^1 R DestinationTab[1, DestinationTab.yDim + 1] := track;4 a. S$ I2 n) m, W, n
end;& L x( y( j7 K L
next;
) i3 s: l, m( U; R" [$ Q- ]- d" t) p
next;2 l/ v! [8 N1 l* R( }
, T! {+ c) ^# R+ W5 c. K ^ -- sort destination table
; L1 O: ?5 g) x' d8 W8 a DestinationTab.sort(1,"up");
b& j- `# r$ p ^/ k5 s
4 j3 v$ |1 C8 @& P( r @.Destination := DestinationTab;
3 ~* w# K! c/ z' b; B) B# a. A8 y3 ^% W L0 T( H! l ]- v; M
end;( `2 i# f) V8 ]0 N. V9 @4 Z
新人求教,红色部分解释下吧,多谢 |