TFileStreamを使用してファイルの出力をするには？

解決

チャーリー  2004-12-02 18:10:48  No: 12038  IP: 192.*.*.*

こんにちは。
TBC=record
BColor:string;
BirthYear:string;
end;
レコード型で保存して、ファイル名'ハルウララ.TXT'があったらデータを読み出したい。
テキストファイルは改行をつかって保存。
---------
167777215(BColor)
2000(BirthYear)
---------
BirthYearだけデータから読み出す場合FileStreamではどうすればいいのでしょうか。

編集 削除
りおりお  2004-12-03 10:57:18  No: 12039  IP: 192.*.*.*

なんか、タイトルと質問の内容が違いますね。

>BirthYearだけデータから読み出す場合FileStreamではどうすればいいのでしょうか。

これは面倒です。改行を検出するコードが必要ですね。

ところで、以前からファイルの内容をテキストにすることにこだわっていますが、
そうであるなら、TFileStream を使うメリットは少ないです。TStringList や
AssignFile() などの低レベル関数を使った方がいいのではないでしょうか。

色も生誕年も符号なし整数ですからそのまま書き込めばファイルサイズも小さい
ですし、読み出しも固定サイズなので非常に楽になります。

編集 削除
チャーリー  2004-12-03 17:43:10  No: 12040  IP: 192.*.*.*

わかりました。
ためしてみます。

編集 削除
チャーリー  2004-12-03 17:43:12  No: 12041  IP: 192.*.*.*

わかりました。
ためしてみます。

編集 削除