<ruby id="bdb3f"></ruby>

    <p id="bdb3f"><cite id="bdb3f"></cite></p>

      <p id="bdb3f"><cite id="bdb3f"><th id="bdb3f"></th></cite></p><p id="bdb3f"></p>
        <p id="bdb3f"><cite id="bdb3f"></cite></p>

          <pre id="bdb3f"></pre>
          <pre id="bdb3f"><del id="bdb3f"><thead id="bdb3f"></thead></del></pre>

          <ruby id="bdb3f"><mark id="bdb3f"></mark></ruby><ruby id="bdb3f"></ruby>
          <pre id="bdb3f"><pre id="bdb3f"><mark id="bdb3f"></mark></pre></pre><output id="bdb3f"></output><p id="bdb3f"></p><p id="bdb3f"></p>

          <pre id="bdb3f"><del id="bdb3f"><progress id="bdb3f"></progress></del></pre>

                <ruby id="bdb3f"></ruby>

                ThinkChat2.0新版上線,更智能更精彩,支持會話、畫圖、視頻、閱讀、搜索等,送10W Token,即刻開啟你的AI之旅 廣告
                [^_^]:http://bbs.mjtd.com/forum.php?mod=viewthread&tid=108062&extra=page%3D2%26filter%3Dtypeid%26typeid%3D107 操作步驟: 1、輸入命令 ng:dim 2、指定文字偏移,默認為20 3、繪制標注 4、指定文字偏移方向 效果圖 ![](https://box.kancloud.cn/05d7b5278841a0618358f3c80e86a2a5_752x366.gif) 源碼 ``` (DEFUN C:ng:dim () (vl-load-com) (setq acadObj (vlax-get-acad-object)) (setq docObj (vla-get-ActiveDocument acadObj)) (setq dis(getreal "標注文字的偏移距離:")) (if (null dis) (setq dis 20) ) (COMMAND "_dimaligned" pause pause pause) ;(princ "eeeee") (SETQ dimEnt (entlast)) (setq dimObj (vlax-ename->vla-object dimEnt)) (setq p1Obj (vla-get-ExtLine1Point dimObj)) (setq p2Obj (vla-get-ExtLine2Point dimObj)) (setq textPosition (vlax-safearray->list (vlax-variant-value (vla-get-textPosition dimObj)))) (setq p1 (vlax-safearray->list (vlax-variant-value p1Obj))) (setq p2 (vlax-safearray->list (vlax-variant-value p2Obj))) (setq angleP1P2 (angle p1 p2)) (setq midPoint (polar p1 angleP1P2 (/ (distance p1 p2) 2))) (setq textDir (textDirection p1 p2 textPosition)) ;(princ (strcat "textDir:" (rtos textDir))) (setq textPoint (polar midPoint (+ angleP1P2 textDir) dis) ) (vla-put-textPosition dimObj (vlax-3d-point textPoint)) (print textPoint) ; ; (setq myresult ; (vla-AngleFromXAxis ; (vla-get-utility docObj) p1 p2)) ) ;用于判斷標注文字在標注基線的順時針方向還是逆時針方向 (DEFUN textDirection (startP endP textP / angle1 angle2 _temp) (DEFUN _temp(angle1 angle2) (and (>= angle2 angle1) (<= (- angle2 angle1) (/ pi 2))) ) (setq angle1 (angle startP endP)) (setq angle2 (angle startP textP)) (cond ( (_temp angle1 angle2) (/ pi 2) ) ( (progn (setq angle2 (+ angle2 (* 2 pi))) (_temp angle1 angle2) ) ( / pi 2)) (t (- (/ pi 2))) ) ) ```
                  <ruby id="bdb3f"></ruby>

                  <p id="bdb3f"><cite id="bdb3f"></cite></p>

                    <p id="bdb3f"><cite id="bdb3f"><th id="bdb3f"></th></cite></p><p id="bdb3f"></p>
                      <p id="bdb3f"><cite id="bdb3f"></cite></p>

                        <pre id="bdb3f"></pre>
                        <pre id="bdb3f"><del id="bdb3f"><thead id="bdb3f"></thead></del></pre>

                        <ruby id="bdb3f"><mark id="bdb3f"></mark></ruby><ruby id="bdb3f"></ruby>
                        <pre id="bdb3f"><pre id="bdb3f"><mark id="bdb3f"></mark></pre></pre><output id="bdb3f"></output><p id="bdb3f"></p><p id="bdb3f"></p>

                        <pre id="bdb3f"><del id="bdb3f"><progress id="bdb3f"></progress></del></pre>

                              <ruby id="bdb3f"></ruby>

                              哎呀哎呀视频在线观看