|
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
如下一段代码,如将插入点设在第三象限,插入的对象才会出现在第一象限,且其位置不但与插入基点有关,而且与比例也有关系
+ Z$ n/ l7 F9 h: a/ a# U' d$ c/ p. S# b. ]4 ^. X
这是不是BUG呢?貌似这样设置没有任何好处啊; U8 u H( d# i$ m+ Y$ J
& p, I- |8 a2 Y0 x. c: [
+ N" M. z/ d2 u' N- & |8 u1 }, s# j+ r5 v, ]# b/ ]' G+ \
- Dim importFile As String/ Z, _5 O* A: F% N$ y( j& F% f# M
- Dim p1(0 To 2) As Double, E' B4 t: @; B) B7 G* o
- Dim scalefactor As Double
4 Z! o7 R" E& \3 T - importFile = "d:\import.dxf" ' Adjust path for your system
s7 g( G. X0 }: u+ ^2 C# w - p1(0) = -10000: p1(1) = -10000: p1(2) = 0
9 c$ S% q, s5 X f7 _0 b - scalefactor = 3
; ^1 z/ p0 A% L0 U/ z3 | - ThisDrawing.Import "C:\Program Files\uelevator\block2.dxf", p1, 2- R/ P* r# |/ D; }9 B
- $ I9 \# |$ d$ T2 e# z" V N" r
- ' Import the file7 F) ^/ B# o" Y3 |: j
- ThisDrawing.Import importFile, p1, scalefactor
" Y. Q) w* T$ ?& Y2 g: i - ZoomAll; w9 n* I: s0 r
- ' Scal = 508 E% D1 Z. c+ u( j% j; b
复制代码 |
|