Открыть STP

Автор graphdark, 26.02.23, 12:39:59

« назад - далее »

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

graphdark

Не думал, что проблема, но
    Doc3D.Open(FileOpenDialog1.FileName,false);Вертает пустой документ. Как правильно step открыть?

graphdark

procedure TOpenMod.OpenBtnClick(Sender: TObject);
var
  Doc3D : ksDocument3D;
  addParam : ksAdditionFormatParam;
  place : ksPlacement;
begin
  Doc3D := ksDocument3D(kompas.ActiveDocument3D);
  if Doc3D = nil then
  begin
    ShowMessage('3D doc not active');
    exit;
  end;
  place := ksPlacement(Doc3D.DefaultPlacement);
  addParam := ksAdditionFormatParam(Doc3D.AdditionFormatParam);
//  addParam.Init;
  addParam.SetObjectsOptions(0,1);
  addParam.SetPlacement(place);
  if FileOpenDialog1.Execute then
  begin
    Doc3D.LoadFromAdditionFormat(FileOpenDialog1.FileName,addParam);
  end;
end;
Чот не хватает кажись, но метод тот. addParam как-то хитро работает, все равно пустая модель.

Михаил88

можно так

documents = application.Documents
kompas_document = documents.Open(r"C:\Users\root\Downloads\test.stp", True, False)

открывает нормально

Михаил88

и на API5 тоже открывает

document3D = kompas_object.Document3D()
document3D.Open(r"C:\Users\root\Downloads\test.stp", False)

Vellar

Доброго всём времени.
Подскажите пожалуйста, есть для КОМПАС приложения, аналоги Feature Recognition (это для Inventor), которые из STEP формата позволяют построить полноценную 3Д-модель с историей операций?

KrissKross

может вам подойдет

Уникальный конвертер ИНТЕРМЕХ из иностранных CAD в КОМПАС-3D
https://isicad.ru/ru/articles.php?article_num=22750