VB: экспорт API Inventor с неправильным масштабом - PullRequest
Новая
       63

VB: экспорт API Inventor с неправильным масштабом

0 голосов
/ 21 октября 2018

Итак, я работаю над проектом, чтобы экспортировать .ipt как любой файл CAD одним нажатием клавиши.Я получил это работает, но всякий раз, когда я экспортирую в .stl, масштаб неверен.Его экспорт как опция "Единицы" установлен в см, а не мм.

Это моя реализация: 

Imports Inventor
Dim ThisApplication As Inventor.Application

В подпрограмме запуска: 

InitializeComponent()

Try
    ThisApplication = Marshal.GetActiveObject("Inventor.Application")
Catch ex As Exception
    MsgBox(ex.ToString())
    MsgBox("Unable to get Inventor")
End Try

Этот код используется для открытия окна экспорта: 

Dim Commander As CommandManager
Commander = ThisApplication.CommandManager
Dim Controler As ControlDefinition
Controler = Commander.ControlDefinitions.Item("AppFileExportCADFormatCmd")
Call Controler.Execute()

Но всякий раз, когда окно экспорта открывается через мою программу, масштаб экспорта неверен, но когда я открываю окно вручную, все в порядке.Что-нибудь добавить к вызову API, чтобы получить желаемый масштаб?

...