Точка пересечения 2-х линий

Question

Здравствуйте.

Есть линии, некоторые пересекаются, некоторые отстают друг от друга на какую-то дельту. Хочется найти приблизительные координаты соприкосновения (крайней близости) 2-х линий.

Как это можно сделать по средствам avenue?

Answer 1

Может кому-нибудь пригодится про пересечения:

for each i in theFTab
  for each j in theFTab
    if ((theFTab.ReturnValue(shapeField,i)).Intersects(theFTab.ReturnValue(shapeField,j))) then
      if (i <> j)    then      
        x = ((theFTab.ReturnValue(shapeField,i)).PointIntersection(theFTab.ReturnValue(shapeField,j))).ReturnCenter .ReturnProjected(_theProjection).GetX
        y = ((theFTab.ReturnValue(shapeField,i)).PointIntersection(theFTab.ReturnValue(shapeField,j))).ReturnCenter .ReturnProjected(_theProjection).GetY
      end  
    end
   end
end