• DVAD
  • Восстановленный участник
  • На форуме с 15 июля 2004г.
  • Сообщений: 58
  • Спасибо: 0

Тема: Программная отрисовка полилиний в 2002 и 2005

Установил себе 2005 акад. радовался. но возникла такая проблема. у меня был макрос в excel, который отрисовывал схемы в акаде. среди прочего была отрисовка полилиний. так в 2002 отрисовывал, а в 2005 - не хочет, выдает ошибку. поменял в preferences excel-я autocad 2002 на autocad 2005 (вместе не хочет подключать) - стало наоборот - в 2005 отрисовывает, а в 2002 - ошибка.
Может как-то можно решить эту проблему, чтобы и в том и в том отрисовывал? Заранее спасибо.

  • callisto
  • Восстановленный участник
  • На форуме с 17 июня 2004г.
  • Сообщений: 204
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

...подключаем телепат.dll - и пытаемся выяснить  :)))
какая ошибка-то ???

  • callisto
  • Восстановленный участник
  • На форуме с 17 июня 2004г.
  • Сообщений: 204
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

зы. вдруг пришла мысль... - а не изменилось ли что-нибудь в объектной модели, а ???
но текст ошибки все-таки хочеться посмотреть  ;)

  • DVAD
  • Восстановленный участник
  • На форуме с 15 июля 2004г.
  • Сообщений: 58
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

> callisto
вот кусок кода

    Dim Acad As Object
    Dim AcadDoc As Object
    Dim objPline As AcadPolyline
    Set Acad = GetObject(, "Autocad.Application")
    Set AcadDoc = Acad.Documents.Add(SDBAcadTemplate)
    Ppoints(0) = 54: Ppoints(1) = 150: Ppoints(2) = 0
    Ppoints(3) = 90 + ii * 20 + 5: Ppoints(4) = 150: Ppoints(5) = 0
    Set objPline = AcadDoc.ModelSpace.AddPolyline(Ppoints)
    objPline.SetWidth 0, 0.3, 0.3

на строке Set objPline=... выдает "Type mismatch"
P.S. как оказалось не хочет ставить другой тип линии (загруженный в чертеж), менять слои и многое другое.
проблема бы решилась, наверно, если бы можно было в references подключить и autocad2002 и autocad2005

  • На форуме с 21 апреля 2004г.
  • Сообщений: 86
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

не получится подключить в один проект эти две библиотеки.
а версия софта у всех в группе должна быть одна. дабы не ловить вот таких граблей!

  • DVAD
  • Восстановленный участник
  • На форуме с 15 июля 2004г.
  • Сообщений: 58
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

> Дмитрий
что одна версия софта - это понятно. не понятно другое - почему он полилинию отрисовать не может? полилинии как в 2002 были так и в 2005 остались. свойства-методы те же.

  • На форуме с 21 апреля 2004г.
  • Сообщений: 86
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

ну воообщем случае это выглядит так:
ваш код дергает библиотеку 2002, та лезет в ядро 2005 и получает по шаловливым ручкам! интерфейс между библиотекой и ядром изменился...

  • DVAD
  • Восстановленный участник
  • На форуме с 15 июля 2004г.
  • Сообщений: 58
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

чего же он кусками как-то изменился. ну ладно, забудем про 2002 и будем только 2005. иначе я думая никак.

  • IGU
  • Восстановленный участник
  • На форуме с 28 января 2005г.
  • Сообщений: 1
  • Спасибо: 0

Re: Программная отрисовка полилиний в 2002 и 2005

2 DVAD
Однако много времени уже прошло, но если проблема еще не решилась, то можно попробывать поменять определения
AcadPolyline на AcadLWPolyline и
AddPolyline на AddLightWeightPolyline.
Видимо в 2005 окончательно отказались от поддержки старого формата плиний.