烦请解释下代码，有点疑惑

roger

        for local i := 1 to parttab.yDim loop
* y" ]1 k. w8 k' o/ n) q8 a                               
4 ]( N# y+ p5 [8 x) s) }( t- O6 g) f                for local j := 1 to parttab.xDim loop
                       
7 D8 ?% c# W" X5 C7 w& w5 R: j; N                        part := parttab[j,i];
3 b! H; |2 [' A6 w6 v
       DestinationTab.setCursor(1,1);
                        if not DestinationTab.find(track) then
* R1 w- c% g9 M+ t. _6 \                                DestinationTab[1, DestinationTab.yDim + 1] := track;
! L# G3 ~) Q2 G5 u* f4 L                        end;
+ I( c4 Q# z8 v. S1 \- l                next;
6 S0 R, m6 ~1 H
" c6 j1 t' n# ?) `! a        next;
- |8 Z5 @! x, ~! L$ f
6 P( i% [) s% b. ~) @4 K        -- sort destination table
        DestinationTab.sort(1,"up");       
& Q  ?1 p7 h4 m+ G
4 s; \- c# b3 U/ v" R3 R        @.Destination := DestinationTab;

end;
新人求教，红色部分解释下吧，多谢

东方子

刚开始的意思是part中的零件都是从parttab取得
下面的意思是在DestinationTab中查找track，如果查找不到后将现有的track放在DestinationTab第一列的最后一行，以此类推。
' K3 H( k# A: R. J+ A& @最后一行是让进入到DestinationTab中的track按照时间进行排序