掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
バイナリー・ファイルを読み書きするには? (ID:16430)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お忙しい所、申し訳ありません。 Delphi 7でbinary fileのread and writeをしようとしています。 現在は、 var buffer: array of Byte; stream: TFileStream; n: Interger; として、 stream:=TFileStream.Create('Sample.DAT', fmOpenRead); n:=0; while stream.Position < stream.Size do begin stream.Read(buffer[n], SizeOf(Byte)); n:= n+1; end; としています。 確かに読み取れますが、異様に時間がかかります。 stream.Read(buffer, stream.Size); などとすると、全く読み取れません。 どのようにすれば良いでしょうか。ヒントだけでもご教授下さい。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.