Настройка и работа с Pro100
- Автор темы Alex Bolton
- Дата начала
-
- Теги
- мебель
Некоторые без када жить не могут...
А некоторые качают модельку в Макс и там рендерят (правда знаю что конвертор который был к версии 3.70 рвал при рендеринге детали на куски... Чёрт его знает... может и интересно...
Что? в версии 3,70 бил експорт? в каком формате? какой конвертер? у меня эсть 3,51, 4,16, 4,26 и 4,28 версии, давайте 3,70 с этом конвертер - мне нужен експорт, чтоб сделал чертежи с отверстия для всех детали в автокаде....
Ок, попаду домой попытаюсь найти в старых дисках
Конвертер в DXF
Похоже cthu не скоро доберется...)))))
Вот конвертер в DXF - hxxp://kseda.ho.com.ua/PROSTO.rar
Уверенно работает с верией PRO100 3.5 и ниже (можно еще попробовать на 3.7)
Плагин для Автокада, идущий в комплекте, встраивается в версии AutoCAD 2002 и ниже. (Мной проверено на 2000 и 2000i).
Пользуйтесь пока не появилась 4.4. Надеюсь, что в новой версии эта функция будет встроеная и рабочая!
P.S.: Кому интересно, вот пример конвертации: hxxp://kseda.ho.com.ua/stol.rar
Похоже cthu не скоро доберется...)))))
Вот конвертер в DXF - hxxp://kseda.ho.com.ua/PROSTO.rar
Уверенно работает с верией PRO100 3.5 и ниже (можно еще попробовать на 3.7)
Плагин для Автокада, идущий в комплекте, встраивается в версии AutoCAD 2002 и ниже. (Мной проверено на 2000 и 2000i).
Пользуйтесь пока не появилась 4.4. Надеюсь, что в новой версии эта функция будет встроеная и рабочая!
P.S.: Кому интересно, вот пример конвертации: hxxp://kseda.ho.com.ua/stol.rar
Последнее редактирование модератором:
У тебя в редактировании форм не видно сетку или ее не выводит на печать?
Если первое, то ее надо просто включить...
Если второе, то не знаю почему это происходит...
Во втором случае могу посоветовать печатать не из редактирования формы, а из самой программы (используй вид "План"). Для удобства можешь сделать сетку погуще:Инструменты - Конфигурация - закладка Правка....
В редакторе форм сетку видно хорошо. При выводе на печать она еле различима. А из самой программы ложу деталь на пол или на стену
делаю прозрачной(контуры) на печать выходит деталь сетки нет вообще.
Если детали не прозрачные сетка есть но тогда от неё пользы мало.
Вид план использовал-сетку на печать не даёт.
делаю прозрачной(контуры) на печать выходит деталь сетки нет вообще.
Если детали не прозрачные сетка есть но тогда от неё пользы мало.
Вид план использовал-сетку на печать не даёт.
Ага добрался, да только вижу что уже нашлиcthu, добрался до дома то?
Всё то ты знаешьZheka написал(а):
-----------------------------------------------------------------------
Добавлено позднее:
Написал программу в екселе по конвертированию цены с PRO100 в Excel
Основные функции:
- Копирование с PRO100 спецификации по материалам
- Сделать проект в PRO100
- Вызвать сумму в спецификации
- Нажать кнопку копировать
- Запустить спецификацию в Excel
- Перейти на страницу "Импорт с PRO100"
- Нажать кнопку "Импорт с PRO100"
- На закладке спецификация будут Ваши данные
Код:
Sub blank()
'///////////////////////
' Макрос1
' Макрос записан 06.07.2007 Yason
' http://forum.yason.org.ua
'///////////////////////
'Очистка спецификации
Sheets("Спецификация").Select
Range("B16:E70,H16:K70").Select
Selection.ClearContents
Range("B16").Select
Sheets("Импорт PRO100").Select
'Вставка копированного текста из PRO100
Range("E1").Select
ActiveSheet.PasteSpecial Format:="Текст", Link:=False, DisplayAsIcon:= _
False
Range("E1").Select
' Поиск пустой ячейки
Do While Not IsEmpty(ActiveCell.Value)
ActiveCell.Offset(1, 0).Select
Loop
'Выделение заданных ячеек листа
Dim strSelTop As String, strSelBottom As String
' Перемещение на один курсор вверх
strSelBottom = ActiveCell(0, 1).Address
strSelTop = Cells(1, ActiveCell.Column + 3).Address
Range(strSelTop & ":" & strSelBottom).Select
'Фильтровка по алфавиту
Selection.Sort Key1:=Range("E1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
' Вставка списка в спецификацию
Selection.Copy
Sheets("Спецификация").Select
Range("B16").Select
Selection.PasteSpecial paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _:=False,
Transpose:=False
Sheets("Импорт PRO100").Select
Columns("E:K").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("E1").Select
End SubТамже находится готовый файл спецификации
---------------------------------------------------------------------------
Добавлено позднее:
Может быть из-за старого принтера.
Насколько понимаю тебе такое необходимо оч редко
В таких случаях делай экспорт в *.jpg
или пользуйся конструкторской программой, например Базисом
Добавлено позднее:
Кстати, нечто подобное можно создать для конвертора раскроя в катинг..
или 2D-Place... Оно нужно???
Последнее редактирование модератором:
Принтер новый 2007 г. HP
Раньше пользовался 4.16 сетку давала из редактора форм довольно таки
жирную. Большую радиусную деталь например столешницу комп.стола
повторить намного проще при наличии сетки. Незнаю может попробовать
4.28 поставить говорят она притормаживает немного.
Раньше пользовался 4.16 сетку давала из редактора форм довольно таки
жирную. Большую радиусную деталь например столешницу комп.стола
повторить намного проще при наличии сетки. Незнаю может попробовать
4.28 поставить говорят она притормаживает немного.
