BlockRead, BlockWrite




構造体の配列なんかをファイルに読み書きするメソッド。結構便利。

var
F: File;
Data: array[0..DATA_SIZE - 1] of TData
begin
AssignFile(F, filename);
ReWrite(F, SizeOf(TData));
BlockWrite(F, Data, DATA_SIZE);
CloseFile(F);
end;



コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です