Найти длину полилинии
function GetPolylineLength(pBuf: PDoublePoint; Index, Count, oType: integer; nEndPoint: integer = -1): Double;
pBuf
oType
Index
nEndPoint
длина полилинии