tbasic forum
掲示板 => Tiny Basic for Windows => スレッド開設者: satoma より 2019年 2月 22日 , 午後 01:30:29
-
1MByteくらいのXML fileをテクストとして読み込んで解析を行ないたいのですが、以下のようなサンプルだと256Byteまでしか読み込まない(A$が256Byte?)のですが、A$のサイズを拡大する方法、あるいは別のうまい方法があればご教授ください。
open "C:\test\test.txt" for input as #1
input #1, A$
print A$
close #1
-
こんばんは,
テキストファイルの読み込みは
ReadAllLines
を使うのが良いでしょう。数メガのファイルでもすぐに読み込めます。
使い方は,ヘルプの当該項目,あるいは,BASIC入門「ファイル操作」の22ページ付近に書いてあります。
例えば,
dim RText$(10000)
F$="C:\test\test.txt"
RText$()=ReadAllLines(F$)
For i=1 to Val(RText$(0))
Print RText$(i)
Next i
End
で,ファイルが読み込まれ,画面に表示されます。
お試しください。
-
回答ありがとうございます。
大きなサイズの文字型変数を定義してファイルを一気に読み込むようなことはできないのでしょうか?
-
こんにちは,
>大きなサイズの文字型変数を定義してファイルを一気に読み込むようなことはできないのでしょうか?
可能です。文字列変数は特に指定しなくても,大きな文字列でも読み込めます。
ReadAllText
を使えば,文字列にテキストファイル全体を一度に読み込むことができます。
If FileExists("Mytext.txt") then
A$=ReadAllText("Mytext.txt")
End If
Print A$
End
勿論,この場合,A$には改行コード(CRLF)が含まれますから,その処理はユーザー側で行う必要があります。
-
できました。ありがとうございます。