Выделение прямых линий с чтением из файла с координатами точек
 

Есть файл содержащий координаты точек. Каждая пара координат с новой строки. Файл формируется при обходе изображения с левого верхнего угла. Необходимо сформировать массив линий. Массив для хранения линий (пишу в Delphi):

Line=record
lBeg,lEnd:TPoint; //начало и конец линии
end;

LineArr:array[1..n] of Line;
-----------------
Выделять линии как горизонтальные, так и вертикальные. В линиях могут быть разрывы до k единиц. Гор. линия может уходить вниз/верх на одну единицу, верт. линия может уходить влево/вправо на одну единицу. При этом необходимо определять не составляющие отрезки, а начало и конец всей линии.

Помогите советом или кодом.