2008/12/24 7.12.04
・スクリプトに新機関数 GetLineLength(),GetText()の追加

スクリプト投稿の　[232] CSV読み込み　を実行してみて下さい。
この手法により色々な外部データ読み込みが可能となります。

おおっ、早速叶えてくださってありがとうございます！
これでまた鍋CAD以外を使う必要がなくなりました:-)

管理人様：

> 2008/12/24 7.12.04
> ・スクリプトに新機関数 GetLineLength(),GetText()の追加
>
> スクリプト投稿の　[232] CSV読み込み　を実行してみて下さい。
> この手法により色々な外部データ読み込みが可能となります。

この GetText() ですが、ヘルプにある要素編集関数
;; 　function GetText(Id:integer):string;
;; 　要素IDのテキストを返します。
とは別物ですよね？

こんにちは。

> この GetText() ですが、ヘルプにある要素編集関数
> ;; 　function GetText(Id:integer):string;
> ;; 　要素IDのテキストを返します。
> とは別物ですよね？

う〜ん別なんですが、関数名も引数も同じですね。
戒名を近所のお寺に頼んでみますので、少々お待ち下さい。

こんばんは。

> う〜ん別なんですが、関数名も引数も同じですね。
> 戒名を近所のお寺に頼んでみますので、少々お待ち下さい。

雰囲気から linein(REXX) とか readline が思いつきますが、マイナーな linein なら使われてないのでは？

;; 済みません、pascal 詳しくないです(^_^;

> 雰囲気から linein(REXX) とか readline が思いつきますが、マイナーな linein なら使われてないのでは？
>
> ;; 済みません、pascal 詳しくないです(^_^;

そうですねPascalの標準入出力であるReadlnを忘れていました。