QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 4093|回复: 26
收起左侧

[求助] 关于“先选择后执行”被修改

[复制链接]
发表于 2011-3-16 10:08:47 | 显示全部楼层 |阅读模式 来自: 中国云南昆明

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
请教高手,我用的2007版本的CAD,刚装上时都是先选择后执行的操作,后来打开其他公司发来的图纸后,就变成“先执行后选择”操作,在命令行输入行输入:pickfirst将值改为1后可操作了,但之后每次打开不管什么图纸还是“先执行后选择”操作,都要修改设置,挺麻烦的。
: L7 |1 }) i( P9 _5 |) U请教各位高手,怎么才能让“先选择后执行”操作一直不变,不用每次打开图纸都修改。谢谢!!!
发表于 2011-3-16 10:54:20 | 显示全部楼层 来自: 中国台湾
Type: Integer& B- F& @: d+ E
Saved in: Registry& S' K6 }: ^* F; E
Initial value: 1
( m* `0 T5 c* _: J" }1 y. yControls whether you select objects before (noun-verb selection) ( s; p% @5 A" V1 {. t& P
or after you issue a command.+ ~. b2 q2 h- h$ _0 R* X! a
, ~9 a8 q) C5 ?: e; j, C
0 Turns off PICKFIRST; you select objects after you issue a command + L( q% V6 `# ~) c
1 Turns on PICKFIRST; you select objects before you issue a command 2 U( a5 G* j& t  J! u$ G
==============================================
' w8 _6 o2 ^+ R; j) z5 a9 ^' G4 V
command: (findfile "acad2007doc.lsp")
* Q- M. V: f2 x& s) dAcad会回应路径,若找不到就自建一个
0 n2 F5 z" O2 j& D% E% N
  A! B0 f, S2 I文件最末修考成
8 _( b7 {. d) g9 `8 z) u==================* w( u& `! n+ l% z
;; Silent load.
+ Q8 L/ `2 @; ?+ Q! d2 n  q(SetVar "PickFirst" 1)
! ^# _* b0 t# p) e  c  e
(princ)

评分

参与人数 1三维币 +5 收起 理由
2005llnn + 5 应助

查看全部评分

 楼主| 发表于 2011-3-16 14:27:49 | 显示全部楼层 来自: 中国云南昆明
不是不知道怎么用,难道是加入小程序,还请细说,谢谢
 楼主| 发表于 2011-3-16 14:49:48 | 显示全部楼层 来自: 中国云南昆明
我在acad2007doc.lsp里加入这段程序,原来的绘图和标注菜单消失了,只有到菜单栏“绘图”“标注”里找,并且选择模式里仍然只有“用shift键添加到选择集”和“对象编组”前打勾,仍然不行。' r6 T# Q9 z% p7 |3 ?! f

2 g1 c! }5 R" e" b还请支招。谢谢。
发表于 2011-3-16 16:09:23 | 显示全部楼层 来自: 中国台湾
请上传 acad2007doc.lsp 文件作参考
 楼主| 发表于 2011-3-16 17:24:55 | 显示全部楼层 来自: 中国云南昆明
已经压缩上传,谢谢

acad2007doc.rar

8.35 KB, 下载次数: 5

发表于 2011-3-16 17:35:51 | 显示全部楼层 来自: 中国台湾
已修订
. h5 S+ s7 C" t; j* }: `9 F; I
8 }* n8 E8 o9 o加入了 (SetVar "PickFirst" 1)

acad2007docPickFirst1.Rar

7.91 KB, 下载次数: 3

 楼主| 发表于 2011-3-16 17:54:38 | 显示全部楼层 来自: 中国云南昆明
用已修订的程序,还是不行
发表于 2011-3-16 18:23:51 | 显示全部楼层 来自: 中国台湾
打开空白文件( K2 r5 m# j7 M
验证PickFirst的值
. {3 |& v& H* c& q- l- z9 r1 k6 ~6 {
& H  c4 H' a# ]- [! _Command: PickFirst, y! c5 D' P; P# |
Enter new value for PICKFIRST <1>:
 楼主| 发表于 2011-3-17 09:51:46 | 显示全部楼层 来自: 中国云南昆明
一样的效果,打开新文件,命令行输入pickfirst显示“0”,输入1后保存,关闭。再打开一新文件,还是“0”
发表于 2011-3-17 09:59:46 | 显示全部楼层 来自: 中国台湾
可有第三方插件会自动加载?
 楼主| 发表于 2011-3-17 10:33:46 | 显示全部楼层 来自: 中国云南昆明
没有
发表于 2011-3-17 10:54:57 | 显示全部楼层 来自: 中国台湾
修订再试
' L# M# }+ i9 ~4 d# h--------------------! q- J7 L+ x5 N5 W
; C8 F0 h8 P& C6 |4 b
;; Silent load.+ P- e1 o/ L3 R6 _
(SetVar "PickFirst" 1)
7 \7 f; R. t' R/ p  s/ m(princ "\n*********先选择后执行的操作 ok ******")   ; <=== 确认命令列可见这个提示讯息
) [1 f! D# p5 \) \/ Y(princ)
 楼主| 发表于 2011-3-17 11:08:18 | 显示全部楼层 来自: 中国云南昆明
还是不行,命令行也没那个提示信息
发表于 2011-3-17 11:20:42 | 显示全部楼层 来自: 中国台湾
依 2# 再次确认文件路径) x: X$ F, ]4 |: f( A& Y" l/ a7 Y# I
command: (findfile "acad2007doc.lsp")& m! |$ S  Z/ k4 P7 Y9 p
若正确9 O5 R& r2 L! h4 B+ b
再查有无如下的文件
% G; E* O( }' ^, ^7 `' w; C& U$ q5 Acommand: (findfile "acad2007doc.Fas")
8 N7 m* f7 S" J8 |3 a/ jcommand: (findfile "acad2007doc.Vlx")
 楼主| 发表于 2011-3-17 11:35:18 | 显示全部楼层 来自: 中国云南昆明
命令: (findfile "acad2007doc.lsp")
) |9 |( ~, `+ b. H  I7 ~& W"D:\\Program Files\\AutoCAD 2007\\support\\acad2007doc.lsp"
  |+ C: |" ~# k命令: (findfile "acad2007doc.Fas")1 Z/ V' O2 l' h; q- u$ d
nil
  b8 |# k* i9 L8 d3 y$ V' C) w命令: (findfile "acad2007doc.Vlx")
# B7 e) H: T8 Y. c% o. Dnil
发表于 2011-3-17 11:42:22 | 显示全部楼层 来自: 中国台湾
命令: (Load "acad2007doc.lsp")8 U8 P' b# p5 O8 X: a& A
7 k. ?7 N- M* x4 [
! P( x- ?$ u7 b: p) P
*********先选择后执行的操作 ok ******       5 r/ d$ S3 n# N3 Z- h

% i0 y# ?% t+ ]- z可见上列讯息?2 ^, m9 |; @1 r) J
 楼主| 发表于 2011-3-17 11:45:17 | 显示全部楼层 来自: 中国云南昆明
命令: (Load "acad2007doc.lsp")# O4 d/ T, [7 T( ]7 T: W
AutoCAD 菜单实用程序已加载。
7 Y. k3 [6 n0 s- M' T. u*********先选择后执行的操作 ok ******
发表于 2011-3-17 11:47:07 | 显示全部楼层 来自: 中国台湾
再试
8 Z0 A9 f- }6 {命令: (Load "acad2007doc")
 楼主| 发表于 2011-3-17 11:51:22 | 显示全部楼层 来自: 中国云南昆明
命令: (Load "acad2007doc.lsp")- E; f8 s/ L# d, p3 k+ i
AutoCAD 菜单实用程序已加载。: r6 M1 k" Q3 E' Q0 X7 `
*********先选择后执行的操作 ok ******" X9 l3 r+ g& S# q
命令: pickfirst
% p! Q8 }: O* x7 v6 e输入 PICKFIRST 的新值 <1>:
4 y6 x( L% e: _$ [) E, Z
* k4 I' V# C  {; q, g; ~( F但重新打开新建页面,输入pickfirst又变为0了
发表于 2011-3-17 11:55:28 | 显示全部楼层 来自: 中国台湾
您先行參考下启动加载 .....
$ L0 Q7 |5 E- F( e3 p2 l# I* l) Whttp://www.google.com/search?as_ ... +%E6%90%9C%E5%B0%8B
 楼主| 发表于 2011-3-17 11:57:52 | 显示全部楼层 来自: 中国云南昆明
新建一个,输入ap,加载程序里竟然没有acad2007doc.lsp,要手动加载了
发表于 2011-3-18 09:01:39 | 显示全部楼层 来自: 中国台湾
本帖最后由 SunVei 于 2011-3-18 11:52 编辑
. f9 q/ t3 _1 ^, w( _; C, f5 N$ F
, l# J  Z5 k. @5 L3 ]9 W% ]/ Z参考 '启动加载' 了?
; j, U3 t% c: g: F0 D) K0 G( b8 A/ Y; q& s+ S# l+ y: i) V# J# X7 G' D
查其中有无定義了 S::Startup 函式
, u3 l. j- p% N1 K9 S7 Kexample:' \+ C- S9 V* @- V6 `
Command: !S::Startup
1 Y3 ?# A1 t8 d1 O#<SUBR @03a43924 S::STARTUP>
 楼主| 发表于 2011-3-18 09:55:29 | 显示全部楼层 来自: 中国云南昆明
命令: !S::Startup9 X' D  {) b3 d9 \, g+ C' I( a
#<SUBR @07ab3a28 S::STARTUP>
 楼主| 发表于 2011-3-18 10:04:17 | 显示全部楼层 来自: 中国云南昆明
我从另外一台机子上拷贝一个acad2007doc.lsp(那台机子cad正常使用)到本机的相应位置,还是没有作用,晕了
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表