掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
バイナリファイルの読み込み (ID:27525)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
HOta様、ご回答をありがとうございました。 Str[i]というスタイルで取り出せればあとは何とか工夫して、と思って朝からこれに取り組んでいましたがストリームというものは初めてなので上手くいきません。初歩的と思いますがサンプルコードに関して再度質問させていただきますので宜しくお願いします。 1.下記のコードで試すと「ストリームからの読み込みエラー」で止まります。 2.SetLengthでもStrの配列領域を確保してありStr[i]でデータを取り出していますので配列宣言が必要ではないかと試しましたがわかりませんでした。 3.FS.Sizeを見ようとステップ実行しましたが表示されませんでした。 ストリームというものが抽象的に見えて理解できていませんが宜しくご指導ください。 Procedure Gread(Gfile:string); var FS :TFileStream; Str:String; // Array of string; Tgt1,Tgt2:String; i:Integer; begin Tgt1:= '12'; Tgt2:='10'; FS:=TFileStream.Create(gfile,fmOpenRead); Try SetLength(Str,FS.Size); FS.ReadBuffer(Str,FS.Size); /// ここでエラー発生 //for i:=1 to Length(Str) do // if Str[i] = Tgt1 then // if Str[i + 1] = Tgt2 then // {ここから後ろがデータ} Finally FS.Free; End; end; 1.
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.