図脳RAPID用：猿真似Sample(テスト版)

図脳RAPIDに附属の「OLE Automation マニュアル ver.1.240」に掲載されている サンプルプログラムをVBScriptで再現しようと試みたものです。 動作にはWindowsScriptingHostが必要です。 え〜と、ひとつお断りしておきますが、 このスクリプトは一部機能が正常に動作しません。 完全に動作するものをお望みの方は、Delphi版の方をどうぞ。

予定の機能としては、「一要素消去」と「文字列描画」があったんですが、 このうち「文字列描画」がうまく動きません。 具体的には、GetSnapPoint でエラーが出てしまいます。 試してみると、VBScriptからは利用できないメソッドが結構出てきました。 主にGet系(情報取得)のメソッドでエラーになるケースが多く、 VBScriptで既存の図面を加工するのは、ちょっと苦しいようです。 ちなみに言語をJScriptに代えても、上記と同じエラーが出るそうです。 おそらくActiveRubyとかでも(WSHを使う以上は)ダメなんでしょうね。(T_T)