「Vle-read-string」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP}} ; 構文 : (vle-read-string ''fptr'' ''numChars'') ; 機能 : 与えられた文字列長を使用するか、0x0 EOS文字が見つかるまで、フ…」)
 
編集の要約なし
23行目: 23行目:


<pre class="brush:autolisp;">
<pre class="brush:autolisp;">
(setq f (open "c:\\temp\\sample.txt" "wb"))
; "モジダヨー"の保存から復元
; "モジダヨー"の2進バイナリ
(setq str "モジダヨー")
(vle-write-string  f "111000111000001110100010111000111000001010111000111000111000001110000000111000111000001110101000111000111000001110111100"  0)
(setq f (open "c:\\temp\\sample.txt" "w,ccs=UNICODE"))
(vle-write-string  f str 0)
(close f)
 
(setq f (open "c:\\temp\\sample.txt" "w,ccs=UNICODE"))
(vle-read-string f 0)
(close f)
(close f)


(setq f (open "c:\\temp\\sample.txt" "rb"))
(setq f (open "c:\\temp\\sample.txt" "rb"))
(vle-read-string  f 0)
#<FILE "c:\\temp\\sample.txt">
"111000111000001110100010111000111000001010111000111000111000001110000000111000111000001110101000111000111000001110111100"
(vle-read-string  f 8)
(close f)
(close f)


40行目: 45行目:
* [[vle-read-string]]
* [[vle-read-string]]
* [[vle-write-string]]
* [[vle-write-string]]
 
* [[open]]




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

2022年12月10日 (土) 15:33時点における版

構文
(vle-read-string fptr numChars)


機能
与えられた文字列長を使用するか、0x0 EOS文字が見つかるまで、ファイルから文字列を読み込む。


引数
  • fptr : (open <fname> "rb" ) などのバイナリーモードオプションで返されるファイルディスクリプタ値
  • numChars : もし <= 0 なら、ファイルは次の EOS 0x0 文字に出会うまで一文字ずつ読み込まれる。
もし > 0 ならば、numChars 文字が文字列から読み取られる。
これにより、長さのプレフィックスを使用する方法と、0x0 EOS識別子を使用する方法の2つの主要なストレージメカニズムで文字列を読み込むことができる。


戻り値
LISP文字列


サンプル
; "モジダヨー"の保存から復元
(setq str "モジダヨー")
(setq f (open "c:\\temp\\sample.txt" "w,ccs=UNICODE"))
(vle-write-string  f str 0)
(close f)

(setq f (open "c:\\temp\\sample.txt" "w,ccs=UNICODE"))
(vle-read-string  f 0)
(close f)

(setq f (open "c:\\temp\\sample.txt" "rb"))
#<FILE "c:\\temp\\sample.txt">
(vle-read-string  f 8)
(close f)



関連事項