При загрузке некоторых приложений AutoCAD (в моем случае это GeoCartogram v1.5, загружал в Civil 3D 2015) случается так, что выдается следующая очередь сообщений:
— «base.dcl» Не удается найти файл.
— Ошибка загрузки файла диалогового окна.
— Семантические ошибки в DCL-файле…
Причина: Один из стандартных путей доступа к файлам поддержки был удален.
Решение: Вручную восстановить недостающий путь доступа к файлам поддержки.
Все пути поддержки расположены в папке AppData. Расположение этой папки зависит от операционной системы.
Например, путь доступа к файлам поддержки на моем ПК выглядит так:
c:UsersВасилийAppDataRoamingAutodeskC3D 2015rusSupport
Чтобы добавить его в Civil необходимо зайти в Настройки во вкладке «Файлы» выбрать «Путь доступа к вспомогательным файлам«, далее «Добавить» и копировать наш путь.
Для того, чтобы настройки не сбивались при следующем запуске Civil, необходимо сохранить данный профиль на вкладке «Профили«.
Welcome ${RESELLERNAME} Customers
Please opt-in to receive reseller support
I agree that Autodesk may share my name and email address with ${RESELLERNAME} so that ${RESELLERNAME} may provide installation support and send me marketing communications. I understand that the Reseller will be the party responsible for how this data will be used and managed.
Email Address
Email is required
Entered email is invalid.
Добро пожаловать!
Войдите или зарегистрируйтесь сейчас!
Войти
-
Для того, чтобы настройки не сбивались при следующем запуске Civil, необходимо сохранить данный профиль на вкладке «Профили«.
Welcome ${RESELLERNAME} Customers
Please opt-in to receive reseller support
I agree that Autodesk may share my name and email address with ${RESELLERNAME} so that ${RESELLERNAME} may provide installation support and send me marketing communications. I understand that the Reseller will be the party responsible for how this data will be used and managed.
Email Address
Email is required
Entered email is invalid.
Добро пожаловать!
Войдите или зарегистрируйтесь сейчас!
Войти
-
- Регистрация:
- 29 сен 2012
- Сообщения:
- 7
- Симпатии:
- 0
Решил попробовать MAP 2015 sp2 на windows 8.1, все поставилось нормально, без ошибок, но при запуске программы начали выскакивать окна с ошибками:
1. «base. DCL»не удается найти файл.
2. Ошибка при загрузке файла диалогового окна
3. Семантические ошибки в DCL acadmap файла. DCL. См. файл acad. DCE сведения.
4. Семантические ошибки в DCL-файла ade. DCL. См. файл acad. DCE сведения.
В интернете нашел некоторые варианты решения данной проблемы, но в windows 8.1 они не срабатывают.
Может кто сталкивался с такой проблемой и ее решением для win8?#1
-
Форумчанин
Банально, но решается установкой семёрки.
#2
-
- Регистрация:
- 29 сен 2012
- Сообщения:
- 7
- Симпатии:
- 0
Нашел вот такое решение:
Решение:
добавить следующий путь поиска файлов поддержки в параметрах AutoCAD:
RXX C:users < пользователь > appdataroamingautodesk < product >. Xenusupport
вроде бы все нормально, но после перезагрузки путь исчезает, а ошибки повторяются. Может проблема с правами доступа к папкам и файлам?#3
-
Форумчанин
установкой 7-ки проблема не решается, у меня тоже самое, хз че делать,как сохранить профиль после добавления путя?
#4
Поделиться этой страницей
Issue
You saw the following error message when installing a Land F/X plugin, or when opening AutoCAD or F/X CAD:
«Base.dcl»
Can’t find file.
You might also see one or more of the following error messages:
Error loading dialog control file.
Semantic error(s) in DCL file
See file acad.dce for details.
Error in dialog file
warning: redefining object.
Symbol: «confirmbox».
Cause
This error can result from the accidental deletion of a particular entry in your Support File Search Path. It can also result from a damaged AutoCAD Roaming Support folder that needs to be re-created.
Solution
To address this error, open the AutoCAD Options dialog box:
Manage ribbon, Options button
type Options in the Command line
right-click in the Command line and select Options from the menu
Tools pull-down menu
The Options dialog box will open.
Select the Files tab, then expand the Support File Search Path item by clicking the plus (+) sign next to it.
In the expanded Support File Search Path folder, the top entry should be: C:Users*usernameAppDataRoamingAutodeskAutoCAD 20xxRXX.Xenusupport
(where *username is your Windows username, 20xx is your version of AutoCAD, and RXX.X is the name of the single folder in your AutoCAD version folder)
If the top entry in the Support File Search Path is NOT the path shown above, you’ll need to complete the following steps to correct the issue.
1. Ensure that your hidden files and folders are turned on.
2. Once you’re sure that your Hidden and System files are turned on, click Add. Then click Browse.
3. The Browse for Folder dialog box will open.
Scroll down and expand the entry for This PC (if you have Windows 10) or Computer (if you have Windows 7).
Then expand the Local Disk (C:) entry.
4. Once you’ve expanded the Local Disk C: entry, expand the following entries:
- Users
- your username (example: Jason)
- AppData (Note: you won’t see this folder unless you have your hidden files and folders enabled.)
- Roaming
- Autodesk
- AutoCAD 20xx (where 20xx is your version of AutoCAD or F/X CAD)
- Rxx.x (The exact name of this folder will vary depending on your version.)
- enu
Then highlight the folder Support and click OK.
This folder tree will be added to the Support File Search Path.
5. The Support File Search Path will now include the folder tree you added:
C:Users*usernameroamingautodeskautocad 20xxrxx.xenusupport
Select this folder tree and click Move Up.
6. Continue to click Move Up until the folder tree is at the top of the list.
Then click OK to save the change.
7. Close and restart CAD. If you don’t see an error message and you can use our software without further issue, you’ve resolved the problem.
Still getting an error, or is the software otherwise not functioning correctly? If so, move on to the next step.
8. Open the Options dialog box again, and look for the path you just added (C:Users*usernameroamingautodeskautocad 20xxrxx.xenusupport) in the Support File Search Path.
If you don’t see the path, your next step should be to check ownership on the following folder: Users*usernameAppDataRoamingAutodesk (where *username is your actual computer username.) Follow our instructions to check and change ownership of folders in Windows.
The owner of that directory and all subdirectories should be SYSTEM. If it’s anything else, use the steps linked above to change the owner to SYSTEM.
9. After taking ownership of the folder path, you’ll see a check box to Replace owner on subcontainers and objects. Check this box, then click OK to close the dialog box.
10. Repeat the steps above to add it back to the Support File Search Path.
11. Close and restart CAD. If you don’t see an error message and you can use our software without further issue, you’ve resolved the problem.
Still getting an error, or is the software otherwise not functioning correctly? If so, move on to the next step.
12. Open the Options dialog box again, and look for the path you tried to add (C:Users*usernameroamingautodeskautocad 20xxrxx.xenusupport) in the Support File Search Path.
If the path is still missing, your AutoCAD Roaming Support folder is damaged. Your next step should be to follow our instructions to reset your AutoCAD profile.
Страницы Назад 1 2 3 Далее
Чтобы отправить ответ, вы должны войти или зарегистрироваться
RSS
Сообщения с 26 по 50 из 72
#26 11 августа 2005г. 19:35:42
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
Хорошо, буду пробовать.#27 Ответ от Владимир Громов 11 августа 2005г. 19:40:02
- Владимир Громов
- Активный участник
- На форуме с 10 июля 2004г.
- Сообщений: 8,349
- Спасибо: 4
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
А «доделать» состоит в следущем: надо написать еще программу отрисовки прямоугольника с заданными размерами и с базовой точкой привязки, отрисовки оси, отрисовки проекции (сечения), простановки размеров. Ось, проекция и размеры должны рисоваться в зависимости от наличия галочки в переключателях. Может, кто подключится, посмотрит твои картинки на webfile и доделает.
#28 Ответ от Forma 11 августа 2005г. 19:59:53
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
Не хочет. Пишет, что семантическая ошибка в dcl файле.
Никто не подключится! Откровенно говоря, я поражен отсутствием интереса. Эта целая серия: ролики, втулки и прочее, прочее. Они, что в AutoCAD не работают что- ли? Ничего не понимаю.#29 Ответ от Forma 11 августа 2005г. 20:01:25
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
Я открыл книгу Полищука «САПР…» Там ни слова об этом.#30 Ответ от Владимир Громов 11 августа 2005г. 20:38:47
- Владимир Громов
- Активный участник
- На форуме с 10 июля 2004г.
- Сообщений: 8,349
- Спасибо: 4
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Forma
Я вспомнил. Когда-то я записал в файл base.dcl дополнительное поле edit6_box с параметрами. В стандартной поставке инимальное поле edit8_box.
Попробуй заменить в файле dd_val.dcl edit6_box на edit8_box в обоих случаях, поля для ввода размеров немного удлинняться, но это ничего.#31 Ответ от Владимир Громов 11 августа 2005г. 20:48:45
- Владимир Громов
- Активный участник
- На форуме с 10 июля 2004г.
- Сообщений: 8,349
- Спасибо: 4
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
Посмотрел еще раз base.dcl. Там есть еще edit2_box, но это поле, наверное, будет очень коротеньким.
#32 Ответ от kpblc 12 августа 2005г. 08:25:49
- kpblc
- Активный участник
- Откуда: С.-Петербург
- На форуме с 29 ноября 2004г.
- Сообщений: 8,348
- Спасибо: 23
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Forma
ИМХО: попробуй MechaniCS 4.5 (вроде как собираются выпустить 5-ку, но не уверен) — там масса твоих задач решена.
Если что — почту знаешь #33 Ответ от Владимир Громов 12 августа 2005г. 11:13:10
- Владимир Громов
- Активный участник
- На форуме с 10 июля 2004г.
- Сообщений: 8,349
- Спасибо: 4
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Forma
Готовая программа:
Файл dd_val.dclsetval:dialog { label = "Параметры вала"; :column { :row { :image { color = black; acpect_ratio = 0.0; width = 18; height =4; key = "slide"; } :boxed_row { label = "Размеры в мм"; :column { fixed_width = true; :edit8_box { label = "D = "; width = 6; key = "d"; } :edit8_box { fixed_width = true; label = "L = "; width = 6; key = "l"; } } } } :row { :boxed_row { label = "Отобразить"; :row { : toggle { label = "Проекция Prj"; key = "pr"; } : toggle { label = "Ось"; key = "ax"; } : toggle { label = "Размеры"; key = "di"; } } } } } ok_cancel; }Файл dd_val.lsp
;************* dd_val.lsp *********************** ; Программа отрисовки ступени цилиндрического ; вала с диалоговым окном задания параметров. ; Автор Владимир Громов. Август 2005 г. ; ; (defun draw_val ( / p_prj dv lv pv p1 p2 p3 p4 p_prj pa1 pa2 ax11 ax12 ax21 ax22) (setq dv diam) (setq lv len) (setq pv (getpoint "n Укажите точку вставки вала: ")) (setq p1 (list (car pv) (- (cadr pv) (/ dv 2)))) (setq p2 (list (car pv) (+ (cadr pv) (/ dv 2)))) (setq p3 (list (+ (car pv) lv) (+ (cadr pv) (/ dv 2)))) (setq p4 (list (+ (car pv) lv) (- (cadr pv) (/ dv 2)))) (command "_PLINE" p1 p2 p3 p4 "_CL") (if (= prj 1) (progn (setq p_prj (list (+ (car pv) len dv) (cadr pv))) (command "_CIRCLE" p_prj (/ dv 2)) ) ) (if (= axis 1) (progn (setq pa1 (list (- (car pv) 3) (cadr pv))) (setq pa2 (list (+ (car pv) lv 3) (cadr pv))) (command "_-LAYER" "_m" "Axis" "_LT" "Centerx2" "Axis" "_C" 141 "Axis" "") (command "_LINE" pa1 pa2 "") (if (= prj 1) (progn (setq ax11 (list (car p_prj) (- (cadr p_prj) (/ dv 2) 3))) (setq ax12 (list (car p_prj) (+ (cadr p_prj) (/ dv 2) 3))) (setq ax21 (list (- (car p_prj) (/ dv 2) 3) (cadr p_prj))) (setq ax22 (list (+ (car p_prj) (/ dv 2) 3) (cadr p_prj))) (command "_LINE" ax11 ax12 "") (command "_LINE" ax21 ax22 "") ); progn ); if (setvar "CLAYER" slt) ); progn ); if (if (= dim 1) (progn (command "_-LAYER" "_m" "Dim" "_C" 3 "Dim" "") (command "_dimlinear" p1 p4 (list (car p1) (- (cadr p1) 10))) (command "_dimlinear" p1 p2 (list (- (car p1) 10) (cadr p1))) (setvar "CLAYER" slt) ); progn ); if ); defun (defun C:VAL ( / s lt dcl_id x y diam len prj axis dim done) (setvar "CMDECHO" 0) (setq slt (getvar "CLAYER")) ;Загрузка диалогового окна (setq dcl_id (load_dialog "dd_val")) (if (not (new_dialog "setval" dcl_id)) (exit)) ;Активизация переменных (setq x (dimx_tile "slide")) (setq y (dimy_tile "slide")) (start_image "slide") (slide_image 0 0 x y "W_31B") (end_image) (action_tile "d" "(setq diam (read $value))") (action_tile "l" "(setq len (read $value))") (action_tile "pr" "(setq prj (read $value))") (action_tile "ax" "(setq axis (read $value))") (action_tile "di" "(setq dim (read $value))") (action_tile "accept" "(setq done 1)(done_dialog)") (action_tile "cancel" "(setq done 2) (done_dialog)") (start_dialog) (unload_dialog dcl_id) (if (= done 1) (draw_val)) (if (= done 2) (princ "n Отмена.")) (setvar "CLAYER" slt) (princ) )Возможный макрос для кнопки или пункта меню:
^C^C^P(if (not C:VAL) (load "dd_val)) VAL
Здесь нет слайда. Его ты можешь сделать сам. Для этого нарисуй в AutoCAD’е рисунок наподобие твоего скриншота W_31B.BMP, зуммируй его до максимального видимого размера, после этого введи команду «_MSLIDE» («ДСЛАЙД»), сохрани слайд под именем W_31B туда же, где будут находиться файлы dd_val.lsp и dd_val.dcl.
Как ты понимаешь, однажды загруженная с помощью вышеприведенного макроса программа будет повторно вызываться по нажатию «Enter».#34 Ответ от Forma 12 августа 2005г. 13:37:35
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
Сейчас начну.#35 Ответ от Forma 12 августа 2005г. 15:07:06
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
1. При запускe с кнопки ничего не происходит. Вообще ничего.
2. При запуске в командной строке командой «val» пишет:
Command: val
((«_> и так до бесконечности. Затем по выходу
((«_> *Cancel*
; error: Function cancelled
3. При запуске в командной строке командой «_val»
Command: _val
; error: quit / exit abort
и пишет, что семантическая ошибка в dcl файле.
4. Чем можно посмотреть файлы sld ?#36 Ответ от Forma 12 августа 2005г. 15:09:13
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> kpblc
Да кто же мне даст такие бабки, что бы CAD’ы менять как перчатки ?#37 Ответ от kpblc 12 августа 2005г. 15:12:32
- kpblc
- Активный участник
- Откуда: С.-Петербург
- На форуме с 29 ноября 2004г.
- Сообщений: 8,348
- Спасибо: 23
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
Аааа, черт, совсем забыл — ты ж не в ГОСТах вынужден работать, сорри
если еще интересно — прошу в почту kpblc2000<<#>>yandex.ru
MechaniCS — не CAD, а оформилка с дополнительными примочками. Сделана под ГОСТы ЕСКД, но возможно применение и «просто так».#38 Ответ от Forma 12 августа 2005г. 16:42:38
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> kpblc
Еще раз. Да кто же мне даст такие бабки, что бы CAD’ы менять как перчатки ?#39 Ответ от kpblc 12 августа 2005г. 16:49:18
- kpblc
- Активный участник
- Откуда: С.-Петербург
- На форуме с 29 ноября 2004г.
- Сообщений: 8,348
- Спасибо: 23
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
Еще раз. См. почту.
#40 Ответ от Forma 12 августа 2005г. 16:52:00
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> kpblc
А-а-а. Вспомнил o MechaniCS . Я показывал demo версию. Цена не устроила.:(((#41 Ответ от kpblc 12 августа 2005г. 16:57:53
- kpblc
- Активный участник
- Откуда: С.-Петербург
- На форуме с 29 ноября 2004г.
- Сообщений: 8,348
- Спасибо: 23
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
Ну тогда извини
#42 Ответ от Forma 12 августа 2005г. 16:59:23
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> kpblc
Вот классно! Тусуюсь на форуме Consistent Software и не знаю ихних продуктов. Хучь бы рекламу повесили какую.#43 Ответ от Forma 12 августа 2005г. 17:00:09
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> kpblc
За что? Не понял #44 Ответ от kpblc 12 августа 2005г. 17:02:27
- kpblc
- Активный участник
- Откуда: С.-Петербург
- На форуме с 29 ноября 2004г.
- Сообщений: 8,348
- Спасибо: 23
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
За тормозанутость.
#45 Ответ от Forma 12 августа 2005г. 17:10:21
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
Для den-si (администратора). Насчет рекламы я погорячился. Прошу не удалять эту ветку. Она (ветка) очень для меня важна.
#46 Ответ от Владимир Громов 13 августа 2005г. 22:23:17
- Владимир Громов
- Активный участник
- На форуме с 10 июля 2004г.
- Сообщений: 8,349
- Спасибо: 4
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Forma
Прокол в памяти у меня вышел. В свое время я изменил файл «base.dcl», где описываются стандартные поля AutoCAD’а, чтобы в своих dcl-файлах не применять выражение @include и копирую этот «base.dcl» на все свои компьютеры.
Только у других-то этот файл стандартный. Тогда вот что надо сделать.
Следующие строки скопировать в файл base_plus.dcledit2_box : edit_box { edit_width = 2; edit_limit = 4; } edit4_box : edit_box { edit_width = 4; edit_limit = 6; } edit6_box : edit_box { edit_width = 6; edit_limit = 8; } edit8_box : edit_box { edit_width = 8; edit_limit = 10; }Вот новое содержимое файла dd_val.dcl
@include "base_plus.dcl" setval:dialog { label = "Параметры вала"; :column { :row { :image { color = black; acpect_ratio = 0.0; width = 18; height =4; key = "slide"; } :boxed_row { label = "Размеры в мм"; :column { fixed_width = true; :edit4_box { label = "D = "; width = 6; key = "d"; } :edit4_box { fixed_width = true; label = "L = "; width = 6; key = "l"; } } } } :row { :boxed_row { label = "Отобразить"; :row { : toggle { label = "Проекция"; key = "pr"; } : toggle { label = "Ось"; key = "ax"; } : toggle { label = "Размеры"; key = "di"; } } } } } ok_cancel; }Далее. При выполнении предыдущей программы не ставился знак диаметра. Вот подправленный код для файла dd_val.lsp
;************* dd_val.lsp *********************** ; Программа отрисовки ступени цилиндрического ; вала с диалоговым окном задания параметров. ; Автор Владимир Громов. Август 2005 г. ; ; (defun draw_val ( / p_prj dv lv pv p1 p2 p3 p4 p_prj pa1 pa2 ax11 ax12 ax21 ax22) (setq dv diam) (setq lv len) (setq pv (getpoint "n Укажите точку вставки вала: ")) (setq p1 (list (car pv) (- (cadr pv) (/ dv 2)))) (setq p2 (list (car pv) (+ (cadr pv) (/ dv 2)))) (setq p3 (list (+ (car pv) lv) (+ (cadr pv) (/ dv 2)))) (setq p4 (list (+ (car pv) lv) (- (cadr pv) (/ dv 2)))) (command "_PLINE" p1 p2 p3 p4 "_CL") (if (= prj 1) (progn (setq p_prj (list (+ (car pv) len dv) (cadr pv))) (command "_CIRCLE" p_prj (/ dv 2)) ) ) (if (= axis 1) (progn (setq pa1 (list (- (car pv) 3) (cadr pv))) (setq pa2 (list (+ (car pv) lv 3) (cadr pv))) (command "_-LAYER" "_m" "Axis" "_LT" "Centerx2" "Axis" "_C" 141 "Axis" "") (command "_LINE" pa1 pa2 "") (if (= prj 1) (progn (setq ax11 (list (car p_prj) (- (cadr p_prj) (/ dv 2) 3))) (setq ax12 (list (car p_prj) (+ (cadr p_prj) (/ dv 2) 3))) (setq ax21 (list (- (car p_prj) (/ dv 2) 3) (cadr p_prj))) (setq ax22 (list (+ (car p_prj) (/ dv 2) 3) (cadr p_prj))) (command "_LINE" ax11 ax12 "") (command "_LINE" ax21 ax22 "") ); progn ); if (setvar "CLAYER" slt) ); progn ); if (if (= dim 1) (progn (command "_-LAYER" "_m" "Dim" "_C" 3 "Dim" "") (command "_dimlinear" p1 p4 (list (car p1) (- (cadr p1) 10))) (setq diametr (strcat "%%c" (rtos diam))) (command "_dimlinear" p1 p2 "_t" diametr (list (- (car p1) 10) (cadr p1))) (setvar "CLAYER" slt) ); progn ); if ); defun (defun C:VAL ( / s lt dcl_id x y diam len prj axis dim done) (setvar "CMDECHO" 0) (setq slt (getvar "CLAYER")) ;Загрузка диалогового окна (setq dcl_id (load_dialog "dd_val")) (if (not (new_dialog "setval" dcl_id)) (exit)) ;Активизация переменных (setq x (dimx_tile "slide")) (setq y (dimy_tile "slide")) (start_image "slide") (slide_image 0 0 x y "W_31B") (end_image) (action_tile "d" "(setq diam (read $value))") (action_tile "l" "(setq len (read $value))") (action_tile "pr" "(setq prj (read $value))") (action_tile "ax" "(setq axis (read $value))") (action_tile "di" "(setq dim (read $value))") (action_tile "accept" "(setq done 1)(done_dialog)") (action_tile "cancel" "(setq done 2) (done_dialog)") (start_dialog) (unload_dialog dcl_id) (if (and diam len (= done 1)) (draw_val)) (if (= done 2) (princ "n Отмена.")) (setvar "CLAYER" slt) (princ) )Дополнительые замечания.
В файлы *dcl строки так и копируютя, начальной и конечной скобок (как в *.lsp) там нет. Все три файла:
base_plus.dcl
dd_val.dcl
dd_val.lsp
должны быть доступны для AutoCAD’а, т.е. находиться в папке, прописанной в путях доступа AutoCAD’а. Запускать просто код dd_val.lsp бессмысленно, если невозможно найти dd_val.dcl.
Копировать надо аккуратно, ничего не упустить.
Я проверял эту программу в 2002, 2005, 2006 и все работало.
А слайд можно посмотреть с помощью команды «_VSLIDE» («СЛАЙД»).#47 Ответ от Владимир Громов 13 августа 2005г. 22:47:25
- Владимир Громов
- Активный участник
- На форуме с 10 июля 2004г.
- Сообщений: 8,349
- Спасибо: 4
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Forma
Бесконечный повторговорит о том, что не хватает 1 или нескольких закрываающих скобок «)», надо было просто ввести эту скобку.
Сообщение; error: quit / exit abort
говорит о том, что не найден файл dd_val.dcl.
А сообщениесемантическая ошибка в dcl файле
связано как раз с отсутствием определения полей. Теперь они определены в дополнительном файле base_plus.dcl. В принципе ты можешь поиграть с атрибутом «label» — изменить слова и посмотреть, как изменится диалог. Вместо «edit4_box» можно написать другие названия из base_plus.dcl.
#48 Ответ от Forma 13 августа 2005г. 23:51:13
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
Сейчас начну пробовать.#49 Ответ от Forma 14 августа 2005г. 00:59:21
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
Давайте по шагам:
1. Беру файл base.dcl;
2. Из него делаю base_plus.dcl
3. В файл base_plus.dcl вставляю строки:
edit2_box : edit_box {
edit_width = 2;
edit_limit = 4;
}
edit4_box : edit_box {
edit_width = 4;
edit_limit = 6;
}
edit6_box : edit_box {
edit_width = 6;
edit_limit = 8;
}
edit8_box : edit_box {
edit_width = 8;
edit_limit = 10;
}
4. Теперь у меня два файла: base.dcl и base_plus.dcl;
5. Оба в папке: C:Program FilesAutoCAD 2006UserDataCacheSupport
Так? Не двинусь дальше пока не решу этот вопрос.#50 Ответ от Forma 14 августа 2005г. 03:22:18
- Forma
- Восстановленный участник
- На форуме с 22 июня 2005г.
- Сообщений: 1,782
- Спасибо: 0
Re: Запрос на создание программы или макроса «Параметрическая ступень вала цилиндрического»
> Владимир Громов
И вот фрагмент файла base_plus.dcl:// list_box : tile { // is_tab_stop = true; // height = 10; // width = 10; // } // edit2_box : edit_box { edit_width = 2; edit_limit = 4; } edit4_box : edit_box { edit_width = 4; edit_limit = 6; } edit6_box : edit_box { edit_width = 6; edit_limit = 8; } edit8_box : edit_box { edit_width = 8; edit_limit = 10; } // edit_box : tile { // fixed_height = true; // is_tab_stop = true; // } // // popup_list : tile { // is_tab_stop = true; // fixed_height = true; // } // // slider : tile { // is_tab_stop = true; // }Я правильно вставил строки?
Страницы Назад 1 2 3 Далее
Чтобы отправить ответ, вы должны войти или зарегистрироваться
-
если еще интересно — прошу в почту kpblc2000<<#>>yandex.ru
