[penb]

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

[Дима_]

Ну допустим длинну как таковую не изменить т.к. длинна характеристика вычисляемая, но изменить координату начальной или конечной точки разумеется можно - надо изменить свойства StartPoint и/или EndPoint.

[penb]

Сообщение от Дима_ Ну допустим длинну как таковую не изменить т.к. длинна характеристика вычисляемая, но изменить координату начальной или конечной точки разумеется можно - надо изменить свойства StartPoint и/или EndPoint.

Да, это верно. Если быть точнее, я хотел спросит, как получить доступ к этому конкретному объекту не по клику мышки, а по его имени? Как узнать это имя?

[Дима_]

Что значит "это имя" - у Вас есть объект модели (листа, блока) в нем есть последовательность ссылок на объекты - какой из них "этот" и как его получить знать можете только Вы - можно "попросить" указать мышкой, можно "отсортировать" по определенным признакам (слой, цвет, длинна, координаты и пр.) А можно просто взять первый из последовательности - что Вам нужно-то?

[penb]

На сколько я представляю, у каждого объекта есть свой уникальный идентификатор. Как я прочтиал, для текущего сеанса это свойство ObjectId, для любого момента времени это свойство Handle. Отсюда я делаю вывод, что зная ObjectID или Handle данной линии, я могу обратиться свойствам именно этой линии. Получается очень странно, что я обращаюсь к объекту по отфильтровывая его по совокупности неуникальных признаков (типа длины и цвета), а не обращаюсь к нему по его уникальному имени. Конечно, может acad просто так реализован - тут уж ничего не поделаешь, но это очень необычно.

[Дима_]

Разумеется есть, только чтоб его получить - надо обратиться к объекту (который надо как-то выбрать) - зачем он Вам? Вы можете просто сохранить ссылку на конкретный объект, т.к. если Вы "сохраните" только ObjectID Вам, чтоб его (сам объект) найти, придется опять-таки фильровать все объекты по "уникальному" признаку.
з.ы. я если честно совсем не улавливаю ход Ваших мыслей.

[penb]

Дмитрий, поясните, что такое "сохранить сслыку на конкретный объект"?

[Дима_]

Вот Вам пример из справки Автокада:

Код:

[Выделить все]

Sub Example_Diameter()
    ' This example creates a Circle object in model space and
    ' returns the diameter of the new Circle
    
    Dim circleObj As AcadCircle
    Dim centerPoint(0 To 2) As Double
    Dim radius As Double
    
    ' Define the new Circle object
    centerPoint(0) = 0: centerPoint(1) = 0: centerPoint(2) = 0
    radius = 5#
    
    ' Create the Circle object in model space
    Set circleObj = ThisDrawing.ModelSpace.AddCircle(centerPoint, radius)

    ThisDrawing.Application.ZoomAll
    
    MsgBox "The diameter of the new Circle is: " & circleObj.Diameter
End Sub

circleObj - это ссылка на "свежесозданный" круг - меняйте у него все что хотите.

[penb]

Сообщение от Дима_ Вот Вам пример из справки Автокада: circleObj - это ссылка на "свежесозданный" круг - меняйте у него все что хотите.

Понял. Но я имел в виду немного другое.
Даю обобщённый пример: человек открыват определённый готовый dwg, у него там какой-то чертёж, а сам он в акаде еле шарит. Ему надо издать скажем ещё 50 аналогичных документов, которые буду отличаться 5-6 геометрическими характеристиками какой-то детали. Чтобы не двигать всё руками, предполагается написать приложение VBA, которое по заданным значениям переменных характеристик перестраивало бы чертёж. Грубо говоря из прямоугольника со сторонами 2 и 3 сделать прямоуголник со сторонами 5 и 6, написавав в диалоге "5" и "6". Очевидно, что есть два пути:
- пишем процедуру, которая строит чертёж с нуля по заданным параметрам;
- берём готовый шаблонный чертёж и меняем характеристики нужных объектов;

Второе имха более рационально, вот я и пытаюсь узнать, как средствами VBA получить доступ к конкретным уже существующим объектам. Типа "хочу удлиннить эту линию!" Пишу что-то типа: линия.имя_линии.конец = (100,500)

[Дима_]

Я бы сделал (да и не раз уже делал) так - берется шаблон (блоки?)- а всё изменяемое пересоздается программно - т.к. создать по параметрам в абсолютном большинстве случаев проще чем "подправить" (т.к. надо учитывать, что там уже направлено).

[Сергей Богатов]

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

[Boxa]

2 penb
Если я вас правильно понял, то вам нужно искать в справке информацию по методам: HandleToObject и ObjectIDToObject
Там очень понятные и подробные примеры на нужную вам тему.

ЗЫ.
Хотя я бы порекомендовал обратиться к Динамическим блокам. Они созданы специально для решения подобных вашей задач без всякого программирования.