Dilma писал(а):
не все было правильно перенесеноПеренесено правильно, однако тот факт, что линк на момент поиска его предполагаемого пути уже есть является несколько неординарным.
Вобщем если внести изменения вот так:
pt := cgt.elGetPt(e,j);
if (cgt.ptGetLinkPoint(pt)<>0) and (pt<>point) and (cgt.ptGetLinkPoint(pt)<>point) then
begin