Определение площади фигуры

[JohnSmith]

Добрый деньб уважаемые Знатоки!
Второй день пытаюсь написать скрипт для получения площади фигуры.
Нашел как вызвать саму функцию "Площадь", но вот как передать ей объект нужной фигуры не понимаю. Должно быть нужно установить координаты внутри нее и осуществить "щелчок", только как это сделать ?
Возможно есть какие то более рациональные варианты - буду рад если поделитесь идеями)

[p3452]

Смотри пост №7

[JohnSmith]

Да, забыл уточнить, что фигуры в 2д

[Sabahs]

Grupp - Указатель на группу содержащую контур.
Grupp:=NewGroup(0);
EndGroup;
SelectGroup(Grupp,1,100,100,-100,-100); // Ловушка для контура
if Grupp<>0 then Properties:=ksInertiaParam(Kompas.GetParamStruct(ko_InertiaParam));
if Properties<>nil then
 begin
   if(iMath.ksCalcInertiaProperties(Grupp,Properties,ST_MIX_MM))=1 then
    begin
      F:=Properties.F; // Площадь
    end;
   Properties:=nil;
end;