type TPath=record Path: array of TPoint; end; var Paths: array of array of TPath; массив массива, значения которого - массив [изображение] А вы говорите "рекурсия".