掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
バイナリファイルの書き込み (ID:39463)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
igy様 ありがとうございました。 紹介してくださったサイト(はじめてのDelphi(その6−2))は以前にも拝見しました。ここには構造体?とかが出てきてSizeOfなどがわからずにパスしてしまいましたが今回は原理もわからないままに試行錯誤した結果次のようなもので一応目的のデータができ、読み取りテストでも成功しました。 procedure binwt(bfile:string); var i:integer; sbf:file; begin AssignFile( sbf, bfile ); Rewrite( sbf, 4 ); // *1 for i := 1 to ndat do begin BlockWrite( sbf, VLng[i], 1 ); // *2 BlockWrite( sbf, VSgl[i], 1 ); end; CloseFile( sbf ); end; *1はSizeOfというところに4を入れてみました。これは1レコードあたりのサイズと解釈しましたがよろしいでしょうか? *2のところの1はサンプルのままとしましたがこの意味は何でしょうか? 結果はオーライのようですが自信がもてません。問題点、パラメーターの意味などをご指導くださるようよろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.