for local i := 1 to parttab.yDim loop
6 M: j5 P/ P a- t ( @5 J" R: p6 f' z/ i7 |. l1 U' J- n
for local j := 1 to parttab.xDim loop9 d; E$ K! T9 |% t* T5 C
6 l! S" c; b" \, J. V/ Q part := parttab[j,i];
& F0 g- N( C% G% o C$ q, ^
; L" R _% v& u; C/ c1 A! C DestinationTab.setCursor(1,1);
5 X0 A, X; f% C if not DestinationTab.find(track) then
, B1 q& D. M. L DestinationTab[1, DestinationTab.yDim + 1] := track;* \1 v+ }) w- {: P1 p4 a5 [
end;; c' I( E1 m5 ?
next;
% U% E3 e R2 f" @4 f0 _
4 l) g. |4 f9 B! H next;
& P7 t5 a3 U( m1 ]& t g% F% \2 l; ~) G2 K+ [" @8 R
-- sort destination table
" B. f) _7 S3 z9 o$ T2 R4 [5 L' M L% J/ ] DestinationTab.sort(1,"up"); & M2 J6 @/ W* b8 l6 E3 K7 v
. m0 o3 n% A$ S; N3 T" i1 Y: g @.Destination := DestinationTab;
7 g" y2 R, R; Y) R8 [6 h9 ]% U0 Y( {7 L! e- v
end;) ~$ Q' w( ?1 v/ L4 n1 @9 W
新人求教,红色部分解释下吧,多谢 |