指定した場所の読み込み

[kawa]

初めての投稿のkawaです。
よろしくお願いします。

現在、"00.txt"というテキストファイルに、それぞれの能力値を書いて、
(例えば、
HP(150)
MP(120)
みたいに)
HPとMPの()の中だけをそれぞれ読み込むというプログラムを作りたいのですが、
どのような関数を使えば良いのかわかりません。
何を使えばいいのでしょうか？

[konisi]

Openでファイルを開いた後でInput#でとりあえず文字を読み込んで、
あとは文字列系の関数で150等の数値文字列を切り出して(Mid$等で)
Valで数値に変換するのはどうでしょうか？

＃似たような事をもっと楽にIniファイルでも出来るので、そちらも検討してみてください。

[kawa]

Mid$を使ったらできました、ありがとうございます。
ところで、ActiveBasicでのiniの扱いはどうするのでしょうか。

[konisi]

読み込むだけなら、GetPrivateProfileString関数でいけます。

定義

コード: 全て選択

Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (lpAppName As *Byte,lpKeyName As *Byte,lpDefault As *Byte,lpReturnedString As *Byte,nSize As DWord,lpFileName As *Byte) As DWord

詳しい使い方はWebで調べてみてください。

[kawa]

そうなんですか、パラメータが多くて難しそうですが、やってみます。
ところで、何度も申し訳ないのですが、
Mid$関数で改行は何バイトとして数えればいいのでしょうか。
改行のバイト数が分からないので改行無しでやっていたのですが、
やっぱり見づらいので・・・。
それともMid$では改行は読み込めないのでしょうか。

[三毛CAT]

Windowsの場合、改行は2バイトです。
Chr$(13)+Chr$(10)や、半角の￥ｒ￥ｎで表せます。

サンプルコード [ここをクリックすると内容が表示されます]

iniファイルには、こういうものもあります。
これも参考になると思います。

[konisi]

Windowsの場合、改行は2バイトです。
Chr$(13)+Chr$(10)や、半角の￥ｒ￥ｎで表せます。

Windowsの場合というよりは、文字セットの改行コードがCR+LFの場合にそうなります。

S-JISを読み込むことが前提なら
・文字コードが0か、10か、又は13の時(0は文字列の終端)
・文字コードが128以上の時(2バイト文字か、半角仮名文字)
の2つに注意すれば大抵は問題なく動作すると思います。