Свойства из информационного окна МЦХ модели

Автор krugerogk, 07.03.19, 11:31:10

« предыдущая - следующая »

0 Пользователей и 1 гость просматривают эту тему.

krugerogk

Подскажите пожалуйста как программно получить значение площади поверхности детали или сборки. (значение "площадь" из расета МЦХ модели)


Sabahs

pFaceDefinition:IFaceDefinition
pFaceDefinition.GetArea(ST_MIX_MM);

Интерфейс - IMassInertiaParam

EKosarev

а можно объяснение для тех кто только начал разбираться. мне вот нужно значения мцх в файл текствовый выгрузить, или лучше в dxf
я вот из за малого количества знаний только вот так смог сделать делаю в Delphi


Kompas:= KompasObject(CreateOleObject('Kompas.Application.5'));
      Kompas.Visible := true;
           Doc:=ksDocument3D(Kompas.Document3D);
           doc.Open('C:\Users\ekosarev\Desktop\3Д\111.m3d',False);
    myPart:=ksPart(Doc.GetPart(pTop_Part));
      MPar:=ksMassInertiaParam(myPart.CalcMassInertiaProperties(ST_MIX_MM));
            pFaceDefinition.g
     Kompas.ksMessage(
      'площадь='+(FloatToStr(mpar.f))+' '+
      'масса тела='+(FloatToStr(MPar.m))+' '+
      'плотность материала='+(FloatToStr(MPar.r))+' '+
      'объем тела ='+(FloatToStr(mpar.v))

Sabahs

В текстовый файл выгрузить не проблема, создать файл и записать то, что в сообщении выводилось.
В DXF, создать документ КОМПАС, чертеж или фрагмент, создать текст из сообщения и конвертировать его в DXF, как это сделать, ищите на форуме.

EKosarev


Sabahs

Поиск в интернете, отменили?
Это к КОМПАС-3D не относится.

EKosarev

да я понял уже что не относится) я просто две недели как взялся за изучение, приходится все сразу учить отсюда и туплю так
вы уж простите меня просто еще не разобрался до конца  :o: