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

roger

        for local i := 1 to parttab.yDim loop
                               
$ A! m- ], `  t( A# k                for local j := 1 to parttab.xDim loop
                       
                        part := parttab[j,i];
) u4 c* X: x  }
       DestinationTab.setCursor(1,1);
                        if not DestinationTab.find(track) then
                                DestinationTab[1, DestinationTab.yDim + 1] := track;
+ a$ Q1 L- T4 P* f, g" H0 y                        end;
                next;

/ f7 z) Z0 `, w) A# H) m  ~        next;
+ B* x8 r7 f. i5 u4 i
. d# h' p2 X* M0 C: r        -- sort destination table
: m( w1 Z1 }' M9 I+ R        DestinationTab.sort(1,"up");       
! o9 R6 I7 y! d1 X4 H: _4 y
9 Z0 a; [; Q& S        @.Destination := DestinationTab;
, T1 H" a8 t- `1 Z5 P' B3 x
. \8 u8 I9 h, Q& v; E; P4 oend;
新人求教，红色部分解释下吧，多谢

东方子

刚开始的意思是part中的零件都是从parttab取得
0 E* D( C. D  S0 m& C下面的意思是在DestinationTab中查找track，如果查找不到后将现有的track放在DestinationTab第一列的最后一行，以此类推。
最后一行是让进入到DestinationTab中的track按照时间进行排序