Archive for category AutoCAD

画層フィルタ

画層フィルタの数が100以上だと自動的に削除してくれるというけど、
んなこたぁ滅多にないだろ、と思ってたら、来ましたよ!
filter.jpg
ファイルを開いたらこのダイアログボックスが!
おお!これぞ世に聞くアレね!
filter2.jpg
私には信じられませんよ。
897って一体・・・。
ちなみに消しても100MBぐらいしか減りませんでした。
ちょっとがっかり。
てなこと書いてないで仕事しろって。
ちょっと現実逃避でした。

Read the rest of this entry »

4 Comments

スクリプトメーカー裏技

ファイルを選ぶ時の裏技(?)
1~10のファイルを選ぶ場合は、
Shift押しながら2~10を選び、最後にCtrl押しながら1を選ぶ。
すると、あ~ら不思議、1~10まで順番に入ってるじゃないの!
100枚とか選ぶと順番入れ替えるのも大変なので、
私は重宝してる技です。
別にスクリプトメーカーに限ったことではないのだけれど。

No Comments

印刷スタイルテーブル

アクティブなレイアウト(モデル含)のスタイルテーブルの変更

(vlax-put-property
(vlax-get-property
(vlax-get-property
(vlax-get-acad-object)
'ActiveDocument
)
'ActiveLayout
)
'StyleSheet
"Default.stb"
)

No Comments

ポリラインの接線

道路の測点を打ったり、幅員描くLISPを書き直そうとしてたら、いいもの見つけた。
導関数
そういえば、微分習ってた時に、接線とかなんとか先生が言ってた気が。
もっと早く気づけばよかったよ。

;;ポリライン上の任意の点においての接線と接線の垂直線を描くVLISP
(vl-load-com)
(defun c:test(
/
e_name
e_obj
pt
param
pt2
pt3
)
(setq e_name (car (entsel)))
(setq e_obj (vlax-ename->vla-object e_name))
(setq pt (getpoint))
(setq param (vlax-curve-getParamAtPoint e_obj pt))
(setq pt2 (vlax-curve-getFirstDeriv e_obj param))
(setq pt3 (vlax-curve-getSecondDeriv e_obj param))
(command "xline" pt (mapcar '+ pt pt2) (mapcar '+ pt pt3) "")
)

No Comments

オブジェクトプロパティ管理が動かない

どんなオブジェクトをクリックしても、反応しなくなりました。
本来なら「何も選択されていません」と表示されている場所が真っ白。
qselectまで動作しません。
思い当たるとすれば、
・他のソフトのインストール
・AutoCAD2005のSPのインストール
ぐらいだけど、だからと言って何かできることもない。
サポートの電話では
「申し訳ありませんが、再インストールしてみて、直らないようであれば、
再度お問い合わせ頂いてもよろしいでしょうか?」
なんて言ってる自分が恨めしい。
再インストールなんて面倒だよぅ。
と泣き言を思っていたら、レジストリの修復で直りました。
よかった~。

2 Comments

バージョン変換

私のAutoCADは2000なの。
でも他社から来たデータは2004形式・・・。
どないせーっちゅーんじゃ。
というアナタの為に。
DWGgateway
ファイルのバージョンアップ、バージョンダウンが思いのまま。
R2.5形式まであるのが笑える。
あくまで、自己責任で。

1 Comment