Информационный портал для профессионалов в области САПР
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Форумы CADUser → Программирование → Delphi → Вставка и редактирования блока с помошью Delphi
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Добрый день. Может кто-нибудь подсказать как в Delphi сделать вставку блока с аттрибутами из файла...и потом чтобы можно было отредактировать эти аттрибуты в любой момент (делаю заполнение штампа с возможностью редактирования)...или вышлите пожалуйста пример...очень надо плиииз...
Разобрался УРРАААА!
разобрался расскажи другим
Что конкретно интересует?
не пойму никак как из делфи что-нибудь нарисовать в текущем чертеже. все время открывается новый чертеж при первом запуске моей проги, дальнейшее последующее построение без проблем.
ламерский вопрос, конечно, но все-таки.
Объект Aplication у меня не создался (tlb) так что приходится через document
var Acad : AcadApplication;
AcadDoc: AcadDocument;
procedure AcadConnect;
begin
try
Acad := GetActiveOleObject('AutoCAD.Application') as AcadApplication;
AcadDoc := Acad.ActiveDocument as AcadDocument;
except
showmessage(Не могу установить связь с AutoCAD!');
Application.Terminate;
end;
end;
- процедура соединяется с текущим активным листом AutoCad, и в нем производишь нужные тебе действия :).
А спасибо, теперь стало понятно, что модель comOBJ я не объявил.
А как создавать примитивы у получилось через:
AcadDoc.ModelSpace.AddText(ttt, StP, Height).Update;
т.е. у меня получается либо в модели либо в листе, или я все еще "детские" вопросы задаю? Или я при прорисовке должен это програмно проверять и учитывать?
var Text : acadText;
Line : AcadLine;
begin
Line := AcadDoc.ModelSpace.AddLine(Параметры);
Text := AcadText. ModelSpace.AddText(Параметры);
end;
Почитай справку по VBA...примеры переводятся очень просто под Delphi...пиши на мыло мне если есть затруднения...
поправка Text := AcadDoc.ModelSpace.AddText()
Мне это все прекрасно понятно, а не понятно как что-либо на экране померить, в VB для этого есть ф-я getDistance, а в методах ModelSpace я ничего подобного не нашел.
Читай хелп...на такие вопросы не отвечаю!
Добрый день уважаемые знатоки AUTOCAD кто нибуть может мне подсказать как програмео сделать маштабирование чтобы чертёж ровно встал в окне AUTOCAD&
Здравствуйте. А можно вопрос по теме, так как всетаки вставить в текущий документ готовый блок сохраненный в файле dwg.
У меня есть куча готовых блоков надо их на листе скомпоновать, ну там по опред. координатам и т.д.
через bloks.add нефурычит, или я че неправильно делаю
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Форумы CADUser → Программирование → Delphi → Вставка и редактирования блока с помошью Delphi
Форум работает на PunBB, при поддержке Informer Technologies, Inc
