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

roger

        for local i := 1 to parttab.yDim loop
0 }& i; P$ X( `' k, l                               
                for local j := 1 to parttab.xDim loop
6 l; c1 _3 y0 r2 Q3 n* F                       
5 [8 F" E$ s. L6 \. i, y0 K                        part := parttab[j,i];
8 k+ [" N6 |" {
* w2 ^/ Q& {9 J; b0 J1 t       DestinationTab.setCursor(1,1);
                        if not DestinationTab.find(track) then
                                DestinationTab[1, DestinationTab.yDim + 1] := track;
2 R# M1 Q. ?$ ?; _  n0 }4 F                        end;
                next;
7 R# L  |1 X) J7 [6 r2 T8 o- K: ?
        next;

# q, @  W4 P6 y0 n        -- sort destination table
& J& V4 L7 v( {        DestinationTab.sort(1,"up");       
' e5 W0 m8 o. f3 c
        @.Destination := DestinationTab;
+ A* {3 W* u9 ~6 |
end;
! g2 m" x" J4 j, e* p$ x; A新人求教，红色部分解释下吧，多谢

东方子

刚开始的意思是part中的零件都是从parttab取得
& ]' Z3 \5 o4 F7 j8 r下面的意思是在DestinationTab中查找track，如果查找不到后将现有的track放在DestinationTab第一列的最后一行，以此类推。
2 q- e5 e/ f! N, s0 \  T  r最后一行是让进入到DestinationTab中的track按照时间进行排序