Archive for 2007年1月

スケルトンを使った設計手順

スケルトンを使った設計手順 キャビネット編
派生パーツって便利だなぁ、と思わせてくれます。
3DCADってこういう考え方を先に教えるべきだとつくづく思う。

No Comments

近くにある気になってた(BlogPet)

大きいマジとか、大きいシェフなど載ってた
椿山荘のシェフ?
アズネット多摩
メモがわり
近くにある気になってた
と、ゆりが考えてるみたい♪

*このエントリは、BlogPet(ブログペット)の「うり坊」が書きました。

No Comments

vbastmt

VBAをコマンドラインから実行することができます。
vbastmt
どういう使い方があるのかな・・・。

5 Comments

Defpointsをrename

Defpoints って rename できたんですね。
知らなかった・・・。

5 Comments

ゆりの(BlogPet)

きょううり坊はサーバーへマークされたみたい…
きょううり坊は、パソコンをオンしなかったよ。
ゆりの、マークしたいなぁ。
きのうゆりで、サーバーを愛用したよ♪

*このエントリは、BlogPet(ブログペット)の「うり坊」が書きました。

No Comments

ダイナミックブロックの値

ダイナミックブロックの値の種類と値を取得
(defun y_dyblklst(
E_NAME
/
V_OBJ
VARPRO
I
V_OBJ_BL
N_LST
DAT
D_LST
)
(setq V_OBJ (vlax-ename->vla-object E_NAME))
(setq VARPRO (vlax-variant-value (vla-GetDynamicBlockProperties V_OBJ)))
(setq I (vlax-safearray-get-l-bound VARPRO 1))
(while I
(setq V_OBJ_BL (vlax-safearray-get-element VARPRO I))
(setq N_LST (append N_LST (list (vla-get-PropertyName V_OBJ_BL))))
(setq DAT (vla-get-value V_OBJ_BL))
(cond
((= 2 (vlax-variant-type DAT))
(setq DAT (vlax-variant-value DAT))
)
((= 5 (vlax-variant-type DAT))
(setq DAT (vlax-variant-value DAT))
)
((= 8 (vlax-variant-type DAT))
(setq DAT (vlax-variant-value DAT))
)
(T
(setq DAT (vlax-safearray->list (vlax-variant-value DAT)))
)
)
(setq D_LST (append D_LST (list DAT)))
(setq I (1+ I))
(if (> I (vlax-safearray-get-u-bound VARPRO 1))
(setq I nil)
)
)
(list N_LST D_LST)
)
(("X 距離" "Y 距離" "Origin" "反転状態" "側溝反転" "ルックアップ")
(77.9525 24.6063 (0.0 0.0 0.0) 1 1 "拝み"))
こんな感じ。

No Comments

続けるには[Enter]キーを

続けるには[Enter]キーを押してください:
がうざいアナタへ。
表示できなくはないですが、この変数、他のことも制御しているそうです。
設定したら必ず元に戻しましょう。
QAFLAGSを 6 に設定して下さい。
元に戻すには 0 です。

4 Comments