Последние ответы

Продам чертежи деталей дробилок, мельниц и т.д. (в компасе)

Здравствуйте.
Мало, что понимаю в этом вопросе.
Взял с форума.

Visual Basic

Dim Points(0 To 3) As Double ' координаты концов отрезка
'Define the polyline Coordinates XY, XY, XY .....
ThisDraving.Utility.GetEntity PLYline, Points, "Выберите отрезок"

'Run the dimension code

Dim dimObj As AutoCAD.AcadDimAligned
Dim point1(0 To 2) As Double
Dim point2(0 To 2) As Double
Dim location(0 To 2) As Double

'CREATE THE LENGTH DIMENSION
' Define the dimension
point1(0) = PLYline.Coordinates(0): point1(1) = PLYline.Coordinates(1): point1(2) = 0
point2(0) = PLYline.Coordinates(2): point2(1) = PLYline.Coordinates(3): point2(2) = 0
location(0) = 100: location(1) = 150: location(2) = 0

' Create an aligned dimension object in model space
Set dimObj = ad.ModelSpace.AddDimAligned(point1, point2, location)
dimObj.TextOverride = "ololo"


Если ответ полный бред просьба сообщить :)

Как в vba autocad изменить размер в размерной линии на свою текстовую строку, в свойствах размера это можно сделать просто, но операторами как это сделать неочевидно

Здравствуйте, необходимо отсечь часть фигуры от общей детали (пересечение 2х фигур). Буду благодарен любому совету!

Если ставлю буртик то автоматом не могу изогнуть лист, если же изгибаю по линии то после этого не могу поставить буртик. Подскажите как решить эту проблемму

Сможете закинуть файл на сервер в интернет типа depositfiles / ifolder / rapidshare - посмотрим.
Причина может быть как в CorelDRAW так и нет. Точно сказать можно только проанализироваав конкретный файл.
Можешь попробывать вот этот онлайн сервис https://onlinefilerepair.com/ru/coreldraw-repair-online.html или как альтернативу попробывать программы https://www.repairtoolbox.com/ru/coreldrawrepair.html CorelDraw Repair Toolbox или RRF (Rapid recovery files)
Иногда помогает отключение использования FontNavigator в CorelDraw->Tools->Options->Text->Fonts
Также восстановление XML воркспейса путем удержания F8 при запуске Draw
Будет у вас время и интерес - возьмите тот файл, откройте где открывается (в Х3), удалите половину содержимого, сохраните под новым именем и попробуйте открыть там где он всегда падал. Продолжайте удалять пока не найдете глючный объект. После этого кидайте на препарацию.

Нашла еще один способ печати, но он слегка муторный. Перевести все листы в ПДФ. Получится книга. Потом эту книжечку отправить на печать, но уже выбрать пункт "пользовательский масштаб". Потобрать нужный у меня для Adoba получился 105% и печатать еще одну ПДФ-книгу. Поля в ней получаются небольшие. И после всего этого кошмара отправить на нужный принтер.

Дамы и господа, кто знает ответьте на вопрос темы! А то как-то слегка печатать проблемно=)

Доброго времени суток. Как у любого проектировщика есть большое количество чертежей в модели. И печатать это количество слегка проблематично. Решила для ускорения вышеописанной процедуры создать на каждый чертеж лист, (Чертежи из проекта в проект расположены на одном месте) так сказать потратить один раз немного времени, чтобы потом не париться. И тут при настройке КАЖДОГО листа в диспетчере параметров листов возникает вопрос: на каждый лист по отдельности нужно указывать принтер. Если вдруг он поменяется (например с №1 на №2), появляется необходимость по каждому листу (а их около 66) лазить и менять принтер с 1 на 2й. Есть конечно возможность перевести все это дело в ПДФ и отпрвить на принтер №2, но тут возникает проблема: при переводу в ПДФ поля чертежей увеличиваются, что не очень прокатывает.
Самый главный вопрос: есть ли возможность по всем листам понять принтер, "одним кликом", не заходя в каждую вкладку листа?

Работаю с большим (по объёму, 80 Мб) cdr-документом, содержащим 2 большие bmp-картинки + куча векторных объектов. Регулярно делаю backup'ы...
С какого-то чудесного момента последние cdr-файлы перестают открываться. Вначале грузит-грузит и где-то на последней трети файла Corel'ом генерируется ошибка (заголовок окна - "Microsoft Visual C++ Runtime Library"):

Runtime Error!
Program ...\CORELDRW.EXE

This application has requested the Runtime to terminate it in an unusual way.
Please contact the application's support team for more information.

После этого сам Corel закрывается...
Такое наблюдается и в 12-м, и в 13-м (X3) Corel'е...

Глюки, связанные с объёмом файла, исключены, поскольку в предыдущей аналогичной ситуации был взят самый последний из нормально открывающихся cdr-файлов, работа с ним была продолжена, причём далее количество объектов было создано гораздо больше, чем имелось в тех cdr-файлах, которые не открывались...

Оперативной памяти достаточно (поведение Corel'а проверялось на 3-х компах, на одном из которых 2 Гб оперативки). Виртуальной памяти и места на винте предостаточно...

На компах, где всё проверялось, стоят нормальные Windows XP Professional SP1 и Windows XP Professional SP2. Инталляторы 12-го и 13-го Corel'ов одни и те же...

При сохранении cdr-файлов (которые не открываются) и создании их backup'ов никаких проблем не возникало...

На всех компах (и разогнанных, и не разогнанных) и на всех виндах (и SP1, и SP2) одно и то же... И с 12-м, и с 13-м Corel'ом...
Дело либо в некорректности сохранения cdr-файлов Corel'ом, либо (судя по названию окошка с ошибкой) в Visual C++ Runtime Library в винде...

На microsoft'е нашёл 2 статьи с данной ошибкой:
1. http://support.microsoft.com/kb/906899/ru - не совсем то...
2. http://support.microsoft.com/kb/884538/ru - ситуация ближе всего. Нужно обновление, исправляющее этот глюк. Тока поиск на microsoft недостаточно гибок - нельзя вести поиск по ключевым словам в описании update'ов (тока в названии update'а), да и максимальный период - год (либо все даты релиза)... А всего update'ов выше крыши (читать-то нужно описание)... В общем, пока не нашёл...

Для исправления глюка сделал следующее:
1. Поставил Service Pack (SP1) для Corel Draw 12 , ситуация не изменилась...
2. Обновил dll'ки для mfc 7.1, ситуация не изменилась...
3. Заменил файлы Msvcrt.dll и Msvcirt.dll с 7-ки на 6-ку. Замена одного из этих файлов (не помню точно, какого) никак себя не проявляет, а при замене другого Windows XP не грузится...
____________________________________________________________
При попытке импорта cdr-файла в новый пустой документ Corel Draw генерирует ошибку (название окна - CorelDRAW):

An invalid argument was encountered.

Посему вопрос: что за некорректные аргументы находит Corel ? Аргументы в cdr-файле или аргументы выполнения каких-то команд ?

Я так понял у Вас текст однострочный. Можно его переделать в многострочный.
Express - Text - Conver Text to Mtext

Материал проверил. Перевел Вас в Вип группу.

скинул диплом, надеюсь подойдет

Доброго времени суток дорогие друзья!

Вопрос на мой взгляд покажеться легким для Профессионалов, но тем не менее, есть текст очень много и много текста.

И так я использовал комманду _find и нашел похожие тексты, поменял но ни как не могу добавить 2 строчку, так как в оригинале он на 1 языке а мне надо на 2 языках.

Вопрос, можно ли в строке замены в _find добавить 2 строчки вместо 1 строчки? Или существует ли другие способы замены текста?

Может конвертировать в PDF и там уже поменять?

Добрый день уважаемые форумчане.
15 лет работал в Auto CAD. Писал приложения на Lisp. Но времена меняются и сейчас перешел на SolidWorks. Потихоньку его постигаю.
Вот возникло ряд вопросов на которые не нашел ответы ни в литературе ни в инете.
Задача заключается в том, что бы в примечание вписать толщину детали из листового металла, ее номер и количество из спецификации.

Примечание должно выглядеть следующим образом:

ПОЗ. 1 - 1 шт.
Ст 3, 0.8 мм.
Зашивка

Вписка материала $PRPVIEW:"Description" где в параметр Description я сохраняю материал.
Вписка названия $PRPVIEW:"SW- Имя файла(File Name)"

Как вписать материал (Ст 3) и название детали я нашел а вот как вписать толщину материала позицию и количество пока нигде найти не могу.
Подскажите пожалуйста если не сложно.

Это слои чертежа, который вставлен как ссылка.