Найти площадь подобъекта полигонального объекта
function GetSubObjectArea(soIndex: integer): double;
soIndex
площадь подобъекта