「Write-line」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成: ; 構文 : (write-line ''string'' [''file-desc'']) ; 機能 : スクリーンまたは開いているファイルに文字列を書き出す。 ; 引数 :* string : 文字列…)
 
編集の要約なし
14行目: 14行目:


; サンプル
; サンプル
: 新しいファイルを開く。
<pre class="brush:autolisp;">
(setq f (open "c:¥¥my documents¥¥new.tst" "w"))  
; 新しいファイルを開く。
#<file "c:¥¥my documents¥¥new.tst">
(setq f (open "c:¥¥my documents¥¥new.tst" "w"))  
: write-line 関数を使用して、ファイルに 1 行書き出す。
#<file "c:¥¥my documents¥¥new.tst">
(write-line "To boldly go where nomad has gone before." f)  
; write-line 関数を使用して、ファイルに 1 行書き出す。
'''"To boldly go where nomad has gone before."'''
(write-line "To boldly go where nomad has gone before." f)  
: 文字列は、ファイルを閉じるまでは、物理的に書き出されない。
"To boldly go where nomad has gone before."
(close f)  
; 文字列は、ファイルを閉じるまでは、物理的に書き出されない。
nil
(close f)  
 
nil
</pre>


[[Category:AutoLISP]]
[[Category:AutoLISP]]

2013年4月1日 (月) 16:25時点における版

構文
(write-line string [file-desc])


機能
スクリーンまたは開いているファイルに文字列を書き出す。
引数
  • string : 文字列。
  • file-desc : 開いているファイルのファイルディスクリプタ。
戻り値
クォーテーションで囲まれた標準形式の string。ファイルに書き出される場合、クォーテーションは出力されない。
サンプル
 ; 新しいファイルを開く。
(setq f (open "c:¥¥my documents¥¥new.tst" "w")) 
#<file "c:¥¥my documents¥¥new.tst">
; write-line 関数を使用して、ファイルに 1 行書き出す。
(write-line "To boldly go where nomad has gone before." f) 
"To boldly go where nomad has gone before."
; 文字列は、ファイルを閉じるまでは、物理的に書き出されない。
(close f) 
nil