Перейти к публикации

Api Cim_e6


Рекомендованные сообщения

Господа! Помогите разобраться с API функциями.

В документации к CimE6 есть примеры программирования в VBasic для функций CimESuite

и с ними все более или менее понятно, а вот с чисто API функциями примеров под VB нет и

непонятно как с ними работать. Нельзя ли выложить на форум пример какой-нибудь простенький. Например как получить список состава сборки...

Ссылка на сообщение
Поделиться на других сайтах


Нельзя ли выложить на форум пример какой-нибудь простенький. Например как получить список состава сборки...

А почему бы не сразу пример формирование сборочной спецификации? :blink::smile:

Ссылка на сообщение
Поделиться на других сайтах

А почему бы не сразу пример формирование сборочной спецификации? :blink::smile:

<{POST_SNAPBACK}>

Про состав сборки просто сказано для примера :rolleyes: .Есть например функция GetModels ( ), но как я ее некрутил нехочит она работать под VB. :surrender:
Ссылка на сообщение
Поделиться на других сайтах
  • 3 недели спустя...

Про состав сборки  просто сказано для примера :rolleyes: .Есть например функция GetModels ( ), но как я ее некрутил нехочит она работать под VB. :surrender:

<{POST_SNAPBACK}>

Скорее всего чисто API функции не для VB... Cimatronу УРА!!! :bleh:

А вот здесь уж совсем непонятно в чем дело...

CreateText не работает выдает сообщение дескать метод непреемлем для объекта. Непонятно.... :g:

Private Sub Кнопка3_Click()

Dim Drw As Boolean

Dim drSh As DrSheet

Dim tMP As String

Dim oParams(6) As Double ' Variant

'эта функция работает

Drw = gSuite.Drafting.GetActiveSheetObjectName(drSh, tMP)

txt1.Text = txt1.Text + vbCrLf + tMP

oParams(0) = 0

oParams(1) = 10

oParams(2) = 0

'Drw = gSuite.Drafting.CreateNewSheet("asdasd") 'это тоже работает

'эта вот функция неработает почему-то

Drw = gSuite.Drafting.CreateText(drSh, tMP, oParams, 3, "Arial", False, False)

End Sub

Ссылка на сообщение
Поделиться на других сайтах
  • 5 недель спустя...

Скорее всего чисто API функции не для VB... Cimatronу УРА!!! :bleh:

А вот здесь уж совсем непонятно в чем дело...

CreateText не работает выдает сообщение дескать метод непреемлем для объекта. Непонятно.... :g:

Private Sub Кнопка3_Click()

Dim Drw As Boolean

Dim drSh As DrSheet

Dim tMP As String

Dim oParams(6) As Double ' Variant

'эта функция работает

Drw = gSuite.Drafting.GetActiveSheetObjectName(drSh, tMP)

txt1.Text = txt1.Text + vbCrLf + tMP

oParams(0) = 0

oParams(1) = 10

oParams(2) = 0

'Drw = gSuite.Drafting.CreateNewSheet("asdasd") 'это тоже работает

'эта вот функция неработает почему-то

Drw = gSuite.Drafting.CreateText(drSh, tMP, oParams, 3, "Arial", False, False)

End Sub

<{POST_SNAPBACK}>

Нее функции работают под VB нормально (даже GetModels) и получить состав сборки оказалось пара пустяков...

А вот чертежные функции у них даже из Хелпа последних версий убраны ведать там боольшие проблемы...

А вот интересно такой параметр как Номер позиции в сборке это что - аттрибут или сугубо внутрий параметр Симатрона.

Ссылка на сообщение
Поделиться на других сайтах
  • 1 месяц спустя...

На американском форуме Симатрона по этой ссылке на тему -

<noindex>API - User Functions</noindex> можно взять некоторые функции.

Ссылка на сообщение
Поделиться на других сайтах

Да , неплохие там штучки есть. Мне поравился полигон (равносторонний многоугольник). Только центр его всегда совпадает с UCS 10_1 .А Text in tree непонятно как работает. И работает ли вообще? Это я про Е-7.

Ссылка на сообщение
Поделиться на других сайтах

Жизнь заставила построить эвольвенту. Поискал в стандартных функция Элита не нашел.Может не там искал. Пришлось написать API функцию к ней еще и спираль архимеда присовокупил. Вроде и ничего получилось... :bleh:

Может кому надо :rolleyes:

Ссылка на сообщение
Поделиться на других сайтах
  • 2 недели спустя...

Жизнь заставила построить эвольвенту. Поискал в стандартных функция Элита  не нашел.Может не там искал. Пришлось написать API функцию к ней еще и спираль архимеда присовокупил. Вроде и ничего получилось... :bleh:

Может кому надо :rolleyes:

<{POST_SNAPBACK}>

Маласть доработал функцию. Теперь она строит кривую полюбому уравнению.

Также может получить точки из текстового файла

Подробности в архиве...

CurveFn.rar

Ссылка на сообщение
Поделиться на других сайтах

Маласть доработал функцию. Теперь она строит кривую полюбому уравнению.

Также может получить точки из текстового файла

Подробности в архиве...

<{POST_SNAPBACK}>

А можно исходный код? Или хотя бы пример добавления своих выпадающих списков в меню?

Ссылка на сообщение
Поделиться на других сайтах

А можно исходный код? Или хотя бы пример добавления своих выпадающих списков в меню?

<{POST_SNAPBACK}>

Вообще-то в помощи данный вопрос изложен хорошо и есть пример.

Прикладываю файл из хелпа.

VB_Create_Command.zip

Ссылка на сообщение
Поделиться на других сайтах
  • 2 недели спустя...

Создал небольшую функцию построения эскиза шестеренки(для Cim E6.02).

В функции реализован один метод задания данных: модуль и число зубьев.

К недостаткам относится - отсутствие радиусов у основания зуба и его вершины(уж больно сложно это сделать) :thumbdown: .

Если функция будет востребована можно расширить варианты задания параметров колеса, и еще чего-нибудь добавить/исправить .

Высказывайте пожелания... :bleh:

Gear.rar

Ссылка на сообщение
Поделиться на других сайтах

Во первых , большое спасибо за работу над API . Верной дорОгой идёте. Но шестерёнка ещё далека от совершенства. Я говорю про основание зуба. Лучше уж перевести из Ай-Ти. Извините ,что смотрю в зубы дарёному коню.

Ссылка на сообщение
Поделиться на других сайтах

Во первых , большое спасибо за работу над API . Верной дорОгой идёте. Но шестерёнка ещё далека от совершенства. Я говорю про основание зуба. Лучше уж перевести из Ай-Ти. Извините ,что смотрю в зубы дарёному коню.

<{POST_SNAPBACK}>

Доработал функцию,проверяю. При тестировании получил такую картину(см.рисунок).

Белым и коричневым цветом профиль импортированый из IT.Синий цвет - эскизы созданые в Элите.

В IT при построении колес с числом зубьев 60 и модулем 1 и 3 строится страный контур.

Ссылка на сообщение
Поделиться на других сайтах

To: kvin

Господа я так понял что все пишут в Сьюте. Может у кого чего завалялось в чистом АРI, очень нужны исходники.

Что касается зубьев, если я не ошибаюсь IT строит зубья по стандарту DIN а он немного отличается от ГОСТ-а вчастности высота ножки по DIN 1,2*m(модуль) по ГОСТ 1,25*m. Есть еще некие расхождения.

Ссылка на сообщение
Поделиться на других сайтах

Это более упрощенные методы и функции.

CimESuite is a user-friendly collection of wrapper methods for Cimatron E's API.

In other words, it contains ready-made functions for various Cimatron E applications.

Ссылка на сообщение
Поделиться на других сайтах

Это более упрощенные методы и функции.

CimESuite is a user-friendly collection of wrapper methods for Cimatron E's API.

In other words, it contains ready-made functions for various Cimatron E applications.

<{POST_SNAPBACK}>

Так бы сразу по русски и писали :doh: .

Хотелось бы конечно обходится без них но получается, т.к. больно сложно да и невсегда понятно как пользоваться API функциями.

Выкладываю доработаную функцию построения шестеренок.

Gear.rar

Ссылка на сообщение
Поделиться на других сайтах

Присоединяйтесь к обсуждению

Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.

Гость
Ответить в тему...

×   Вставлено в виде отформатированного текста.   Вставить в виде обычного текста

  Разрешено не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отобразить как ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставить изображения напрямую. Загрузите или вставьте изображения по ссылке.

  • Сейчас на странице   0 пользователей

    Нет пользователей, просматривающих эту страницу.




  • Сообщения

    • maxx2000
      Подушную малость. Чё там. Уже в упор научились резьбу резать без выходной канавки?
    • ispite
      Здравствуйте, не могу построить стандартную сетку, что не позволяет дальше провести расчёт. Получается сделать сетку "на основе кривизны", но солид отказывается считать, после нажатия кнопки "запустить исследование" происходит сбой. https://disk.yandex.ru/d/D8wvRbYMW1lWjQ
    • ddm
      изготовить по чертежу с последующим покрытием,цинкование ,по 1000 шт каждой позиции ,предложение отправить на почту qwer463@yandex.ru
    • sklide008
      И еще можно ли задать горчие клавиши на кнопки открыть, скрыть и тд?
    • sklide008
      Подскажите, пожалуйста, в инвенторе есть такой пункт упорядочи по алфавиту дерево. Здесь найти такого не могу, пытался treesorter ставить но он добавляет просто в папку а не сортирует в дереве. Есть ли такой макрос чтобы все детали в дереве по порядку и алфавиту шли?
    • stanislavz
      Есть станок с данным контроллером. Все работает. Недавно была проблема с передачей данных - установил запасной контроллер. А запасной контроллер сказал нет работе. Проблема была в программе компьютера для передачи данных. Грустно, досадно, контроллер был куплен как рабочий. Как бы и не горит, но необходимо поправить. Плата управления с процессором mc68020, память hm628128-10. Память буферным питанием от 3 батареек + 0,5 Фарада на плате как буфер для замены батареек на 1 сутки. Лежало долго, без батареек. Симптомы: После первого включения, в памяти были и программы и параметры (0 странность). Честно, удивило. Но - система жутко тормозит, отклик на нажатие кнопки 3-5 секунд. В таком режиме сумел закачать машинные параметры под свой станок. Но это заняло час.. 4 строки и ждет секунд 10 итд. Есть видео. Перекинул с рабочего контроллера, БП, плату плц, ээпром плц - все то же. Проверил осциллографом кварцы живые , частота есть, амплитуда хорошая. 1 странность - после манипуляций по замене батарейки, старые записи из памяти исчезли. Ничего не коротнул. Возможно 0,5 Ф был не заряжен. Там тоже необходимы сутки для зарядки. Но как оно было запечатоно до этого - мистика. 2 странность. Если плата лежит ночь без питания, только с буфером - потом 2-3 минуты работает хорошо. 3 аналогично работает 2-3 минуты если питание отключить и очистить питание памяти (выпаял 0,5 Ф буфер с платы) Проверка памяти на старте есть. Проходит хорошо. На зависает, на холодную пайку не похоже. Шевелил / двигал все. Да и не виснет, именно тормозит. При том если оставить на час - тоже все стабильно плохо. Если набрать быстро 5 символей- экран сразу пуст, но после задержки символы будут на экране. Заказал второй процессор и память. 10 штук. Подавал прямо 5 вольт на память - все так же. Токи потребления между плохой и хорошей платой смогу проверит.    
    • brigval
    • Ветерок
      "увеличение оптимизации". Оптимизацию невозможно ни увеличить, ни уменьшить.
    • gudstartup
      @boomeeeer может от страны зависит
    • david1920
      нет время нет заниматься да и информации новой нет Это я на других станках делал
×
×
  • Создать...